| Class TChildForm (unit Child) |
| Constructors |
| Functions |
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
Procedure Loaded;| Properties |
| Events |
| Variables |
Button1 : TButton;
Button2 : TButton;
Label2 : TLabel;
Panel1 : TPanel;| Constructors |
| Functions |
procedure Button1Click(Sender: TObject);Override the event handler for Button1 in the ancestral form
procedure Button2Click(Sender: TObject);Button2 only exists in the child
Procedure Loaded;This is to demonstrate the repeated calls the the forms own .loaded } { csLoading is always maintained in component state until after the } { last set of resources has loaded. } { I.E. After you call inherited .loaded, IF ClassLevel=0, then csLoading } { is no longer in ComponentState
| Properties |
| Events |
| Variables |
Button1 : TButton;
Button2 : TButton;
Label2 : TLabel;
Panel1 : TPanel;