| Class TPhoneBookTable (unit PhoneGrid) |
TForm
| Constructors |
| Functions |
procedure Close1Click(Sender: TObject);
procedure FormActivate(Sender: TObject);
procedure FormClose(Sender: TObject; var Action: TCloseAction);
procedure FormCreate(Sender: TObject);
procedure mnuViewFormClick(Sender: TObject);
procedure SetPhoneForm( Value: TForm );| Properties |
property frmPhoneForm : TForm| Events |
| Variables |
AddRecord1 : TMenuItem;
Close1 : TMenuItem;
Copy1 : TMenuItem;
CopyRecord1 : TMenuItem;
Cut1 : TMenuItem;
DBGrid1 : TDBGrid;
DeleteRecord1 : TMenuItem;
Edit1 : TMenuItem;
Exit1 : TMenuItem;
File1 : TMenuItem;
MainMenu1 : TMainMenu;
MarkRecord1 : TMenuItem;
mnuViewForm : TMenuItem;
MoveRecord1 : TMenuItem;
N1 : TMenuItem;
N2 : TMenuItem;
N3 : TMenuItem;
N4 : TMenuItem;
N5 : TMenuItem;
New1 : TMenuItem;
Open1 : TMenuItem;
Paste1 : TMenuItem;
Print1 : TMenuItem;
PrintSetup1 : TMenuItem;
Save1 : TMenuItem;
SaveAs1 : TMenuItem;
Table1 : TMenuItem;
Undo1 : TMenuItem;
View1 : TMenuItem;
FPhoneForm : TForm;| Constructors |
| Functions |
procedure Close1Click(Sender: TObject);self.Width := 0; self.Height := 0;
procedure FormActivate(Sender: TObject);
procedure FormClose(Sender: TObject; var Action: TCloseAction);This will close both windows.
procedure FormCreate(Sender: TObject);
procedure mnuViewFormClick(Sender: TObject);
procedure SetPhoneForm( Value: TForm );| Properties |
property frmPhoneForm : TFormPublic declarations
| Events |
| Variables |
AddRecord1 : TMenuItem;
Close1 : TMenuItem;
Copy1 : TMenuItem;
CopyRecord1 : TMenuItem;
Cut1 : TMenuItem;
DBGrid1 : TDBGrid;
DeleteRecord1 : TMenuItem;
Edit1 : TMenuItem;
Exit1 : TMenuItem;
File1 : TMenuItem;
MainMenu1 : TMainMenu;
MarkRecord1 : TMenuItem;
mnuViewForm : TMenuItem;
MoveRecord1 : TMenuItem;
N1 : TMenuItem;
N2 : TMenuItem;
N3 : TMenuItem;
N4 : TMenuItem;
N5 : TMenuItem;
New1 : TMenuItem;
Open1 : TMenuItem;
Paste1 : TMenuItem;
Print1 : TMenuItem;
PrintSetup1 : TMenuItem;
Save1 : TMenuItem;
SaveAs1 : TMenuItem;
Table1 : TMenuItem;
Undo1 : TMenuItem;
View1 : TMenuItem;
FPhoneForm : TForm;Private declarations