[Listbox] Mehr informationen speichern, als angezeigt werden

[Luckie]

Ja, aber ich würde nicht nur die ID anhängen, sondern gleich den ganzen Datensatz. Dann erspare ich mir beim Anzeigen der Details eine weiter Datenbankabfrage oder was auch immer das hintersteckt. Ich mache das bei meiner Adressdatenbank so, dass die Datensätze aus der XMl-Datei gelesen werden, jeder Datensatz ist ein Objekt, welche ich in einer Objektliste verwalte. Diese Objektliste lade ich in die Listbox und hänge an jeden Eintrag das Datensatzobjekt an. Dann muss ich die XML-Datei nicht noch mal anfassen, wenn ich die Datensatz anzeigen will und ich komme ohne ID aus.

[d.malkmus]

Nur der Vollständigkeit halber, weil ichs auch grade gesucht hab.

Listox Eintrag erzeugen und mit einer versteckten ID:

Code:

var
  myID : integer;
begin
  myID := 12;
  ListBox1.Items.AddObject('Zwölf',TObject(myID));
end;

und dann wieder darauf zugreifen:

Code:

var 
  myID : integer;
begin
  
  myID := integer(ListBox1.Items.Objects[ListBox1.ItemIndex]);
end;

[himitsu]

Statt Integer besser NativeInt verwenden, für den Cast zwischen "Integer" und TObject/Pointer.


Ich weiß jetzt nicht wie ein 64 Bit-Objektzeiger auf den Integer-Cast geagiert, da die Größen nicht übereinstimmen.
Aber vom Typ "myID" her stimmt das Integer beim Cast wenigstens.