| Class TTimeAutoForm (unit RasDial4) |
| Constructors |
| Functions |
procedure CancelButtonClick(Sender: TObject);
procedure FormCreate(Sender: TObject);
procedure MonFromEditExit(Sender: TObject);
procedure OkButtonClick(Sender: TObject);
function Check : Boolean;
function Execute : Boolean;
procedure LoadFromIniFile;
procedure SaveToIniFile;
procedure ConvertToDateTime;| Properties |
| Events |
| Variables |
CancelButton : TButton;
FriFromEdit : TEdit;
FriToEdit : TEdit;
Label1 : TLabel;
Label10 : TLabel;
Label2 : TLabel;
Label3 : TLabel;
Label4 : TLabel;
Label5 : TLabel;
Label6 : TLabel;
Label7 : TLabel;
Label8 : TLabel;
Label9 : TLabel;
MonFromEdit : TEdit;
MonToEdit : TEdit;
OkButton : TButton;
PasswordEdit : TEdit;
SatFromEdit : TEdit;
SatToEdit : TEdit;
SunFromEdit : TEdit;
SunToEdit : TEdit;
ThuFromEdit : TEdit;
ThuToEdit : TEdit;
TueFromEdit : TEdit;
TueToEdit : TEdit;
WenFromEdit : TEdit;
WenToEdit : TEdit;
Section : String;
FromEdit : array [1..7] of TEdit;
FromSave : array [1..7] of String;
FromTime : array [1..7] of TDateTime;
ToEdit : array [1..7] of TEdit;
ToSave : array [1..7] of String;
ToTime : array [1..7] of TDateTime;| Constructors |
| Functions |
procedure CancelButtonClick(Sender: TObject);* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure FormCreate(Sender: TObject);* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure MonFromEditExit(Sender: TObject);* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure OkButtonClick(Sender: TObject);* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
function Check : Boolean;* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
function Execute : Boolean;* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure LoadFromIniFile;* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure SaveToIniFile;* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure ConvertToDateTime;* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
| Properties |
| Events |
| Variables |
CancelButton : TButton;
FriFromEdit : TEdit;
FriToEdit : TEdit;
Label1 : TLabel;
Label10 : TLabel;
Label2 : TLabel;
Label3 : TLabel;
Label4 : TLabel;
Label5 : TLabel;
Label6 : TLabel;
Label7 : TLabel;
Label8 : TLabel;
Label9 : TLabel;
MonFromEdit : TEdit;
MonToEdit : TEdit;
OkButton : TButton;
PasswordEdit : TEdit;
SatFromEdit : TEdit;
SatToEdit : TEdit;
SunFromEdit : TEdit;
SunToEdit : TEdit;
ThuFromEdit : TEdit;
ThuToEdit : TEdit;
TueFromEdit : TEdit;
TueToEdit : TEdit;
WenFromEdit : TEdit;
WenToEdit : TEdit;
Section : String;Public declarations
FromEdit : array [1..7] of TEdit;Private declarations
FromSave : array [1..7] of String;
FromTime : array [1..7] of TDateTime;
ToEdit : array [1..7] of TEdit;
ToSave : array [1..7] of String;
ToTime : array [1..7] of TDateTime;