реструктуризация файлов, добавление вебчатов

2025-08-14 10:50:33 +03:00
parent 04b5259737
commit 3ac578b6e6
79 changed files with 10256 additions and 1284 deletions
@@ -0,0 +1,50 @@
+unit fNotify;
+
+interface
+
+uses
+  System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants, 
+  FMX.Types, FMX.Graphics, FMX.Controls, FMX.Forms, FMX.Dialogs, FMX.StdCtrls,
+  FMX.Edit, FMX.Controls.Presentation;
+
+type
+  TfrNotify = class(TFrame)
+    chEnNotify: TSwitch;
+    Label43: TLabel;
+    tbNotifyVolume: TTrackBar;
+    edtNotifyFileName: TEdit;
+    btnNotifyOpen: TButton;
+    btnNotifyCheck: TButton;
+    cbNotifyFileAgain1: TCheckBox;
+    btnNotifyCheckMod: TButton;
+    btnNotifyOpenMod: TButton;
+    edtNotifyFileNameMod: TEdit;
+    tbNotifyVolumeMod: TTrackBar;
+    Label50: TLabel;
+    chEnNotifyMod: TSwitch;
+    chEnNotifyVip: TSwitch;
+    Label51: TLabel;
+    tbNotifyVolumeVip: TTrackBar;
+    edtNotifyFileNameVip: TEdit;
+    btnNotifyOpenVip: TButton;
+    btnNotifyCheckVip: TButton;
+    cbNotifyFileAgain2: TCheckBox;
+    cbNotifyFileAgain3: TCheckBox;
+    btnNotifyCheckSub: TButton;
+    btnNotifyOpenSub: TButton;
+    edtNotifyFileNameSub: TEdit;
+    tbNotifyVolumeSub: TTrackBar;
+    Label52: TLabel;
+    chEnNotifySub: TSwitch;
+    OpenDialog1: TOpenDialog;
+  private
+    { Private declarations }
+  public
+    { Public declarations }
+  end;
+
+implementation
+
+{$R *.fmx}
+
+end.