init
This commit is contained in:
@@ -0,0 +1,61 @@
|
||||
unit fAutoActions;
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants,
|
||||
FMX.Types, FMX.Graphics, FMX.Controls, FMX.Forms, FMX.Dialogs, FMX.StdCtrls,
|
||||
System.Rtti, FMX.Grid.Style, FMX.Grid, FMX.ScrollBox, FMX.Edit,
|
||||
FMX.Controls.Presentation;
|
||||
|
||||
type
|
||||
TfrAutoActions = class(TFrame)
|
||||
GroupBox20: TGroupBox;
|
||||
edtMessage: TEdit;
|
||||
edtInterval: TEdit;
|
||||
btnAddMessage: TButton;
|
||||
btnRmMessage: TButton;
|
||||
btnEditMessage: TButton;
|
||||
btnNotifyTest: TButton;
|
||||
sgTimers: TStringGrid;
|
||||
ccTimerEnable: TCheckColumn;
|
||||
scTimerMessage: TStringColumn;
|
||||
icTimerInterval: TIntegerColumn;
|
||||
ccTimerO: TCheckColumn;
|
||||
GroupBox23: TGroupBox;
|
||||
edtBanWords: TEdit;
|
||||
btnBanWordsAdd: TButton;
|
||||
btnBanWordsEdt: TButton;
|
||||
btnBanWordsDel: TButton;
|
||||
sgBanWords: TStringGrid;
|
||||
scRegEx: TStringColumn;
|
||||
btnBanWordsCheck: TButton;
|
||||
Label6: TLabel;
|
||||
edtBanWordsCheck: TEdit;
|
||||
Label7: TLabel;
|
||||
lBanWordsCheck: TLabel;
|
||||
GroupBox17: TGroupBox;
|
||||
edtCounterName: TEdit;
|
||||
edtCounterTrigger: TEdit;
|
||||
edtCounterCount: TEdit;
|
||||
btnCounterAdd: TButton;
|
||||
btnCounterDelete: TButton;
|
||||
btnCounterP: TButton;
|
||||
btnCounterM: TButton;
|
||||
btnCounterEdit: TButton;
|
||||
sgCounter: TStringGrid;
|
||||
scCounterName: TStringColumn;
|
||||
scCounterTrigger: TStringColumn;
|
||||
icCounterCount: TIntegerColumn;
|
||||
ccCounterAuto: TCheckColumn;
|
||||
private
|
||||
{ Private declarations }
|
||||
public
|
||||
{ Public declarations }
|
||||
end;
|
||||
|
||||
implementation
|
||||
|
||||
{$R *.fmx}
|
||||
|
||||
end.
|
||||
Reference in New Issue
Block a user