SQL и выпадающий список

[mamontovsk]

Коллеги, добрый день.
Есть необходимость считывать из таблицы Vechicle все строки столбца VechicleName(VarChar(45) и выводить эти строки в выпадающем списке.
Может кто сталкивался?
Сейчас пытаюсь это сделать таким кодом:

Код: (delphi)

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

[Simple-Scada]

Здравствуйте.

В этом сообщении форума есть пример заполнения списка из таблицы БД.
Процедура RunSQL выполняется асинхронно (выполнение зависит от нагрузки на СУБД, ПК и пр.). Поэтому сразу после вызова RunSQL нельзя работать с результатом запроса. Обработать результаты запроса можно в скриптах с типом события "Выполнен SQL-запрос". Такие скрипты содержат параметр DataSet(TM_DataSet) - набор данных, полученный в результате выполнения запроса.
См. описание по ссылке. Пример работы с результатом по ссылке.

[mamontovsk]

Спасибо за информацию, очень помогло, все заработало!