Einzelnen Beitrag anzeigen

Benutzerbild von MrSpock
MrSpock
(Co-Admin)

Registriert seit: 7. Jun 2002
Ort: Owingen
5.865 Beiträge
 
Delphi 2010 Professional
 
#2
  Alt 20. Jan 2003, 12:03
Hallo Delphi-Coder,

falls die ID ein Integer Wert ist, kann man sich einen Trick zu nutze machen, der darauf basiert, dass ein TObject nicht anderes als eine Adresse ist.

Delphi-Quellcode:
...
    cb1.Items.AddObject(Table1Vorname.AsString
                      +' '
                      +Table1Nachname.AsString,
                      TObject(ID));
   { ID des ersten Eintrages anzeigen }
   ShowMessage(IntToStr(Integer(cb1.Items.Objects[0])));
Du castest die ID einfach als TObject. Und beim Auslesen kehrst du die Umwandlung um. Wenn du lieber eine saubere Lösung hättest , sag bescheid, die kann ich auch liefern.
Albert
Live long and prosper


MrSpock
  Mit Zitat antworten Zitat