Registriert seit: 4. Jul 2010
Ort: Berlin
62 Beiträge
Delphi XE2 Professional
|
AW: Record in Liste speichern
16. Dez 2012, 20:19
Hier nochmal als Zusammenfassung.
Delphi-Quellcode:
Uses System.generics.collection;
Type
TMyRecord = Record
Fstring : String;
Fint : Integer;
End;
Tmylist = Tlist<TMyRecord>;
Var
MyList : TMyList;
MyRecord:TMyRecord;
I: integer;
Begin
myList:= TMyList.Create;
MyRecord.fstring:= 'Test';
MyRecord.Fint:= 1234;
MyList.Add(MyRecord);
...
For MyRecord in MyList do
Writeln(MyRecord.fstring);
...
MyList.Free;
...
|