Hallo allerseits!
Ich bin nun auf eine recht simple Art umgestiegen und zwar mit Hilfe eines TValueListEditors:
Delphi-Quellcode:
procedure TMainForm.FormCreate(Sender: TObject);
begin
RelFormValueList := TValueListEditor.Create(Self);
with RelFormValueList do
begin
InsertRow('Class','TClassDataForm',True);
InsertRow('Pupil','TPupilDataForm',True);
InsertRow('Latecomer','TLateComDataForm',True);
end;
Delphi-Quellcode:
Child := TFormClass(FindClass(RelFormValueList.Values[SelTableBox.Text])).Create(Application);
Child.Caption := SelTableBox.Text;
Somit habe ich eine Verknüpfung zB mit dem Text 'Class' und dem entsprechenden Formular!
Irgendwelche Verbesserungsvorschläge? Ich fand die ObjectList recht interessant - hab aber keine Lösung erfunden wie ich dort meine Anforderungen hätte einbauen können
Gruss Robert