Class TEditItemForm (unit Unit4)

Inherits from

TForm

Constructors



Functions

procedure ApeDialog1Select(Sender: TObject; SelectedValue: String);


procedure ApeForm1FirstShow(Sender: TObject; PMode: ApeActivateFormMode; PObject: TObject; PValue, PSelect: String);


procedure Button1Click(Sender: TObject);


procedure Button2Click(Sender: TObject);


procedure Button3Click(Sender: TObject);


Properties

Events

Variables

ApeDialog1 : TApeDialog;


ApeForm1 : TApeForm;


Button1 : TButton;


Button2 : TButton;


Button3 : TButton;


Edit1 : TEdit;


Edit2 : TEdit;


Label1 : TLabel;


Label2 : TLabel;


EditList : TListBox;


FMode : char;

Private declarations


Constructors


Functions


procedure ApeDialog1Select(Sender: TObject; SelectedValue: String);


procedure ApeForm1FirstShow(Sender: TObject; PMode: ApeActivateFormMode; PObject: TObject; PValue, PSelect: String);


procedure Button1Click(Sender: TObject);


procedure Button2Click(Sender: TObject);


procedure Button3Click(Sender: TObject);


Properties


Events


Variables


ApeDialog1 : TApeDialog;


ApeForm1 : TApeForm;


Button1 : TButton;


Button2 : TButton;


Button3 : TButton;


Edit1 : TEdit;


Edit2 : TEdit;


Label1 : TLabel;


Label2 : TLabel;


EditList : TListBox;


FMode : char;

Private declarations