Bei deinem ObjectKind hast du die Entscheidung zur Laufzeit, bei Generics zur Compilezeit.
Entweder du machst deine ganze TMain Klasse generisch und definierst darüber, was dort drin steht (und verzichtest auf das ObjectKind), sofern das zur Compiletime schon entschieden werden kann (verlagert evtl die Logik, ob foo, bar oder none). Oder du benutzt für foo und bar eine gemeinsame Basisklasse. Bringt allerdings einige eher unschöne hardcasts mit sich.
Ich würde hier also folgendes vorschlagen:
Delphi-Quellcode:
type
TMain = class(TObject)
// ...
end;
TMain<T> = class(TMain)
private
FList: TObjectList<T>;
public
constructor Create;
property List: TObjectList<T> read FList;
end;
implementation
constructor TMain<T>.Create;
begin
inherited Create;
FList := TObjectList<T>;
end;
Wenn du bei TMain noch zur Laufzeit wissen willst, von welchem Typ T ist, kannst du dort noch eine Property von TClass oder PTypeInfo einführen, welche dann vom TMain<T> constructor übergeben wird.