у меня база mssql, как ввести из DBComboBox1 в нее? у меня щас вот такого рода код на кнопке стоит :
Код:
procedure TAddproduct.Button3Click(Sender: TObject);
begin
// Закрыть запрос
Form1.QueryDynamic.Close;
// Очистить массив строк для размещения
// текста запроса
Form1.QueryDynamic.SQL.Clear;
// Сформировать строку с текстом запроса
sql:= 'insert into product (id_category, id_proizvoditel,name_product) values (DBLookupComboBox1.Text, DBLookupComboBox2.Text, '''+ Edit1.Text +''');';
// Вывести текст запроса на экран
application.MessageBox(PChar(sql), 'Текст запроса',MB_OK);
// Добавить стоку с текстом запроса
Form1.QueryDynamic.SQL.Add(sql);
try
// Выполнить запрос
Form1.QueryDynamic.Open;
// Обработать возможные ошибки
// при выполнении запроса
except
application.MessageBox( 'Не могу выполнить запрос', 'Ошибка',MB_OK);
end;
end;
DBLookupComboBox2 как Edit1 с добавоением .Text не хочет работать
у меня там сделанно так : ListField (то что показывает в списке - "Продукт") и KeyField(id того что показывает в списке "ID_Продукт") нужно именно KeyField ввести мне...
как сделать не знаю...