procedure TForm1.Button7Click(Sender: TObject);
var
data:TList<integer>;
i:integer;
begin
data:=TList<integer>.Create;
data.Add(10);
data.Add(4);
data.Add(2);
data.Add(1);
data.Add(0);
for i:=0 to data.Count-1 do begin
Memo1.Lines.Add(IntToStr(data[i]));
end;
end;
data:TList<integer>;
data:=TList<integer>.Create;
data.Add(10);
data[i]
Memo1.Lines.Add(IntToStr(data[i]));