Einzelnen Beitrag anzeigen

Benutzerbild von sx2008
sx2008

Registriert seit: 16. Feb 2008
Ort: Baden-Württemberg
2.332 Beiträge
 
Delphi 2007 Professional
 
#6

AW: TList Inhalt in Memo oder Listbox einfügen?

  Alt 11. Apr 2013, 16:43
Also normalerweise sollte die Liste Objekte enthalten.
Dann kann man auch gleich die TObjectList-Klasse als Kontainer verwenden.
TObjectList ist eine Ableitung von TList.
Delphi-Quellcode:
type
  TListenobjekt = class(TObject)
  public
    property Text:string;
    // weitere Properties
  end;
Das eintragen in eine Listbox sieht dann so aus:
Delphi-Quellcode:
var
  lo : TListenobjekt;
  ...
  for i := 0 to objektlist.count-1 do
  begin
    lo := objektliste.items[i] as TListenobjekt;
    Listbox1.Items.AddObject(lo.Text, lo);
  end;
Somit kann man später das selektierte Objekt aus der Listbox wieder auslesen
Delphi-Quellcode:
  if Listbox1.ItemIndex <> -1 then
    lo := Listbox1.Objects[Listbox1.ItemIndex] as TListenobjekt
  else
    lo := nil;

Geändert von sx2008 (11. Apr 2013 um 16:46 Uhr)
  Mit Zitat antworten Zitat