Zitat von
Bernhard Geyer:
Wie legst du sie an und wann rufst du die Funktion wie auf?
Delphi-Quellcode:
Fframe_wf_messages := Tframe_wf_messages.Create(self, vTab);
Fframe_wf_messages.Parent := vTab;
Fframe_wf_messages.Align := alClient;
Fframe_wf_messages.Execute(KDRProg1);
Wobei ich den Constructor folgendermaßen geändert habe
Delphi-Quellcode:
constructor Create(AOwner: TComponent; aNoteTab: TKDRTabbedNotebookPage); reintroduce;
constructor Tframe_wf_messages.Create(AOwner: TComponent; aNoteTab: TKDRTabbedNotebookPage);
begin
inherited Create(AOwner);
FNoteTab := aNoteTab;
end;