Förutsatt att du har hämtat ut ID till en Integer vid namn foretagsID så kan du lägga till det i listboxen med följande:Lagra FöretagsID
Hej!
Jag håller på med ett databasprogram i Delphi. och jag har en fråga om listbox
Hur lagrar man ett FöretagsID till en listbox?
I VB skriver man så här:
list1.ItemData(list1.NewIndex) = rsExtern.Fields("foretagsID")
men i dephi?????Sv: Lagra FöretagsID
<code>
ListBox1.AddItem(intToStr(foretagsID),nil);
</code>
Jag svarar utan databaskopplingen eftersom den beror på vilken databas du använder och hur du kommer åt den. Själv använder jag för tillfället ADO och då sätter jag ADOQuery's SQL till frågan och sen kan man köra
<code>
foretagsID := qry.fieldByName('foretagsID').AsInteger
</code>
för att hämta ut fält.
Parametern nil kan om man vill bytas ut för att innehålla en Integer-wrapper med ID på företaget så att man istället kan visa namnet. Man vill nämligen väldigt sällan att systemets användare själv ska vara tvungen att hålla reda på eller ans se interna IDn från databasen.
Hoppas det klarnar lite
/Per