Как заполнить ComboBox из Дата сета???

← →
Relaxxx (2004-09-23 01:26) [0]

Вернее как заполнить я знаю
CustQ.Close; CustQ.SQL.Clear; CustQ.SQL.Add("SELECT Key_pole, Name_cust FROM CUSTOMERS ORDER BY Name_cust"); CustQ.Open; CustQ.First; E13.Clear; while not CustQ.Eof do begin E13.Items.Add(CustQ.Fields[1].AsString); CustQ.Next; end;

но мне нужно еще к этим записям прикрепить и уникальный номер(key_pole), как это сделать, и как потом его считать????

Нужно сделать с помощью стандартного ComboBox!

← →
Defunct © (2004-09-23 01:35) [1]

Items.AddObject( CustQ.Fields[1].AsString, ...тут key field);

или так Items.Objects[..] := TObject( Integer key field value );

← →
Relaxxx (2004-09-23 01:39) [2]

а как читать???

← →
GanibalLector © (2004-09-23 01:41) [3]

Дык...еще один Query и всперед.
запрос: SELECT Name_cust FROM CUSTOMERS where Key_pole=:pa1

Query.ParamByName("pa1").value:=Combobox.Text;

← →
Defunct © (2004-09-23 02:29) [4]

> а как читать???

key field := Integer(Items.Objects[..])

F1 - TDBComboBox

лучше dblookupcombobox

Как заполнить ComboBox из Дата сета??? Найти похожие ветки