Forum: Sonstige Fragen zu Delphi
Delphi
by alzaimar,
25. Mär 2009
shmia's Version ist doch auch nur eine etwas robustere Variante meines Hacks. Ich würde das ja auch nie so machen, aber es beantwortet die Frage. :mrgreen:
Eine Class Factory, sowie eine Formklasse als Adaptermuster sollte der richtige Weg sein. Man erstellt sich eine Schnittstelle, die die gewünschte Funktionalität bereitstellt und stülpt diese über die einzelnen individuellen Form-klassen,...
Forum: Sonstige Fragen zu Delphi
Delphi
by alzaimar,
25. Mär 2009
Hier ein Hack, mit dem das doch geht:
type
PClass = ^TClass;
begin
PClass(MyObjectOfTypeXXX)^ := TDerivedClassFromXXX;
end;
Bei Dir funktioniert das nur, wenn TVistaForm von TMainForm abgeleitet ist.
Viel sauberer wäre folgende Lösung;