Einzelnen Beitrag anzeigen

Mschmidt

Registriert seit: 4. Jul 2010
Ort: Berlin
62 Beiträge
 
Delphi XE2 Professional
 
#14

AW: Record in Liste speichern

  Alt 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;
...
  Mit Zitat antworten Zitat