Hallo,
ich habe mehrere Klassen, die von einer abstrakten Klasse geerbt haben.
Ich muss nun je nach Eingabewert unterscheiden, welche dieser Childklassen erzeugt werden und mit dem Ergebnis arbeiten. Ob diese Klasse das Ergebnis verarbeiten kann steht in der Klasse als Eigenschaft.
Ich habe hier versucht, zumindest teiwleise das Strategie Pattern umzusetzen.
Codebeispiel:
Delphi-Quellcode:
type TParentClass = class
{iwas}
end;
type TChildclass(TParentclass)
eineZahl: Integer;
procedure eineMethode(asd: String);
end;
procedure choose;
var
EineChildclass: TChildclass;
begin
If eineChildclass.eineZahl = 1 then
begin
EineChildclass := TChildclass.Create;
EineChildclass.eineMethode('test';
// WIe frage ich ab, welche Klasse erzeugt werden muss?
end;
end;
Ich habe etwas von Methodenklassen gelesen, wäre dies der WEg zu Ziel, oder gibt es andere Lösungen?