Lazarus hat zwar eine etwas umständliche Implementierung von Generics, aber funktionieren tut damit vieles was in Delphi geht auch:
Delphi-Quellcode:
uses
fgl;
type
TMeinTyp = class
private
FTest: string;
public
property Test: string read FTest write FTest;
end;
TMeinTypList = specialize TFPGList<TMeinTyp>;
// ...
var
TestList: TMeinTypList;
NewItem: TMeinTyp;
begin
TestList := TMeinTypList.Create;
NewItem := TMeinTyp.Create;
NewItem.Test := 'Nichts';
TestList.Add(NewItem);
ShowMessage(TestList[0].Test);