PC1\PTyTb
62 lines
1.5 KiB
ObjectPascal
62 lines
1.5 KiB
ObjectPascal
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.
|