Hallo zusammen,
ich überlege mir grade für ein neues Projekt die Klassenstruktur und die vorgehensweise und habe dabei ein paar Probleme mit den Generics.
Es ist folgendermaßen:
Ich habe eine Aufzählung:
TObjectKind = (okNone, okFoo, okBar);
Für Foo und Bar gibt es auch eigene Klassen TFoo, TBar.
Nun möchte ich in einem weiteren Klasse den ObjektKind und eine TObjectList speichern. Dabei soll dann je nach ObjektKind eine Liste von diesem Typ erzeugt werden.
Delphi-Quellcode:
TMain = class(TObject)
private
FObjectKind: TObjectKind;
FList: TObjectList<T??>; // Wie muss es hier deklariert werden?
public
property List: TObjectList<T??> read FList write FList; // Und hier?
constructor Create(AObjectKind: TObjectKind);
end;
implementation
constructor TMain.Create(AObjectKind: TObjectKind);
begin
FObjectKind = AObjectKind;
// Hier soll je nach ObjectKind dann die Liste erstellt werden
case FObjectKind of
okFoo: FList := TObjectList<TFoo>;
okBar: FList := TObjectList<TBar>;
end;
end;
Ich würde es gerne so machen, da das ganze dynamisch sein soll, wenn mal der ObjektKind erweitert wird.
Und den Zugriff auf die Listen vereinfachen, indem dann in einer anderen Klasse eine List<TMain> existiert in der alle Liste nach dem ObjectKind vorhanden sind.
Und wie könnte man das ganze mit einem TDictionary machen.
TDictionary<TObjectKind ,TObjectList<T??>>; // Für TFoo, TBar ?
Ich hoffe ich habe mich verständlich ausgedrückt
Ich freue mich auf eure Antworten.
lg
pustekuchen