ListBox

[exoduscrises]

Also so richtig gehts nicht

ich nutze jetzt folgende Prozedur um das Element in die Listbox zu setzen.

Delphi-Quellcode:

type 
  TEntry = class(TObject) // Typ 
    fPath: string; // Dateipfad 
end; 

{...} 

var 
PLitem:TEntry; 
begin 
{...} 
PLitem:=TEntry.Create(); 
PLitem.fPath:=OpenDialog1.FileName; 
ListBox1.AddObject(CutPathName(OpenDialog1.FileName), PLitem); 
end;

und dachte mir ich kann jetzt im Nachhinein den Pfad also PLitem wieder aufrufen undzwar so

Delphi-Quellcode:

i := ListBox1.ItemIndex;
{...}
Pfad:=listbox1.items.objects[iplay];
{...}

geht aber leider nicht, kann mir jemand weiterhelfen