[fear_demon]

Всем привет. Помогите, пожалуйста. Есть база в ms sql server 2000 я пишу клиент на делфи вывожу список с помощью запроса (в общую таблицу выбираю записи из справочников по их айди)

Код:

select  id, name, ganr_film, god, dlit,kach_film,ras_film,nos_film 
  from films, sp_ganr,sp_kach,sp_ras,sp_nos
where films.id_ganr = sp_ganr.id_ganr AND 
films.id_kach = sp_kach.id_kach AND 
films.id_ras = sp_ras.id_ras AND 
films.id_nos = sp_nos.id_nos

Нужно сделать запрос на добавление записи в БД причем записи id, name, god, dlit вводятся из editов и должны записываться как тест, а id_ganr,id_kach, id_rs, id_nos из comboboxов с выпадающими списками с текстовыми записями, а добавляться должы id этих записей. Пробовал по-разному, но не получилось ибо не селен в sql запросах.

[Yurk@]

т.е. тебе нужно добавить запись одним запросом сразу в несколько таблиц, так???
тогда Хранимая Процедура тебя спасет , а нужные данные ты будешь передавать в виде параметров

[fear_demon]

Yurk@ спасибо за ответ!
Да нужно добавить запись одним запросом, но в одну таблицу просто просто в некоторые поля нужно вставить текст,а в некоторые цифры,но в combobox у меня список из слов, а не из цифр.

[Yurk@]

Код:

Query.CLose;
Query.SQL.Text:='INSERT INTO YourTable (id, name, god, dlit, id_ganr,id_kach, id_rs, id_nos)
VALUES (:id, :name, :god, :dlit, :id_ganr, :id_kach, :id_rs, :id_nos)';
Query.ParamByName(id).Value:=editID.Text;
Query.ParamByName(name).Value:=editName.Text;
Query.ParamByName(god).Value:=editGod.Text;
Query.ParamByName(dlit).Value:=editDlit.Text;
Query.ParamByName(id_ganr).Value:=comboboxGanr.ItemIndex;
Query.ParamByName(id_kach).Value:=comboboxKach.ItemIndex;
Query.ParamByName(id_rs).Value:=comboboxRs.ItemIndex;
Query.ParamByName(id_nos).Value:=comboboxNos.ItemIndex;
Query.Execute;

[fear_demon]

Yurk@ огромное тебе СПАСИБО! Помоги еще пожалуйста!

http://www.delphisources.ru/forum/sh...3568#post73568