Коллеги, добрый день.
Есть необходимость считывать из таблицы Vechicle все строки столбца VechicleName(VarChar(45) и выводить эти строки в выпадающем списке.
Может кто сталкивался?
Сейчас пытаюсь это сделать таким кодом:
var
Q2, data : string;
index : integer;
begin
Q2 := 'SELECT `VechicleName` FROM `vechicle`';
RunSQL(Q2, nil, 2);
//while not DataSet.EOF do
//begin
for index := 0 to DataSet.RecNo - 1 do
begin
data := DataSet[index].AsStr;
ComboBox1.AddItem(data);
//DataSet.Next;
end;
end.
Вызов скрипта привязан на событие OnClick поля Combobox