| Class TAddPhoneDlg (unit Addnmbr) |
TForm
| Constructors |
| Functions |
procedure btnOKClick(Sender: TObject);
procedure FormActivate(Sender: TObject);
procedure FormCreate(Sender: TObject);
procedure FormDestroy(Sender: TObject);| Properties |
property NewRecord : Boolean| Events |
| Variables |
btnCancel : TBitBtn;
btnOK : TBitBtn;
cboPhoneTypes : TComboBox;
edtExtension : TEdit;
edtNotes : TEdit;
edtPhoneNumber : TMaskEdit;
Label1 : TLabel;
Label2 : TLabel;
Label3 : TLabel;
Label4 : TLabel;
FNewRecord : Boolean;| Constructors |
| Functions |
procedure btnOKClick(Sender: TObject);With
procedure FormActivate(Sender: TObject);
procedure FormCreate(Sender: TObject);With
procedure FormDestroy(Sender: TObject);| Properties |
property NewRecord : BooleanPublic declarations
| Events |
| Variables |
btnCancel : TBitBtn;
btnOK : TBitBtn;
cboPhoneTypes : TComboBox;
edtExtension : TEdit;
edtNotes : TEdit;
edtPhoneNumber : TMaskEdit;
Label1 : TLabel;
Label2 : TLabel;
Label3 : TLabel;
Label4 : TLabel;
FNewRecord : Boolean;Private declarations