Как добавить несколько данных в связанную таблицу?

Question

[Алексей Овсянкин]

Подскажите пожалуйста как мне добавлять на одной форме во вторую дочернюю таблицу несколько деталей. Пока что программа работает так: Я нажал добавить. Открывается форма добавления..Я заполняю инфу для главной таблицы выбираю деталь и кол-во. Но пока что могу добавлять только одну. Так как пока не создана запись в первой мы не знаем ID и не можем его передат в дочернюю. Нужно чтобы я ввел основную инфу по машине потом мог добавить несколько деталей для замены, а потом нажал сохранить и запись разлетелась по таблам.

Answer 1

[kalapanga]

Раз надо несколько позиций добавлять, значит надо под них какой-то список завести. Выбрали запчасть и количество нажали какую-нибудь кнопочку, запчасть добавилась в список. Если список не визуализировать, то на Вашу форму только одну кнопку добавить.
А можно покрасивее, как обычно документы вводятся, - сделать форму где будет "шапка" документа и его "табличная часть" - таблица, в которую Вы будете добавлять строки с запчастями. Но тут работы больше.
Конкретная реализация зависит от того как у Вас внутри программы организовано добавление записей в базу.

Comments

[Алексей Овсянкин]

Добавление в две связанные таблицы реализовал через 3 компонента ADOQUERY

1:INSERT INTO Realiz ([Work],[data],[marka],[gos_nomer],[probeg],[id_ispoln]) //Добавление в главную
values (@Work,@data,@marka,@gos_nomer,@probeg,@id_ispoln);
2:insert into Zapas_chasti ([id_realiz],[id_zapchast],[kolvo]) values (@id_realiz, @id_zapchast, @kolvo); //Этим запросом выхватываю ID через выборку.
3:select id_realiz from Realiz where Work=@Work and gos_nomer = @gos_nomer and probeg=@probeg //Добавляю в дочернюю таблицу уже деталь с тем ID что в главной.

Не могу понять как организовать добавление n-кол-ва деталей. Знаю реализацию через ADOTabl через Insert apennd и тд. но это не вариант. Надо как-то сделать чтобы заполнив основную таблицу тут же например в dbgrid забил детали. Нажал Сохранить в запросе создалась запись в основной таблице..уже знается айди..а потом из того dbgrida записи с деталями улетели в дочернюю. Подскажите как лучше сделать?

[kalapanga]

Так Вы сделайте сначала это самое "забил детали", а потом уж просто пробегаетесь по гриду, датасету, стринглисту или что там у Вас будет и по строчке отправляете данные в нужную таблицу.

[Алексей Овсянкин]

kalapanga, Спасибо за наводки)

ВОт кусочек кода как это делаю. Может кому понадобится.

for I := 1 to StringGrid1.RowCount-2 do
begin
ADOQuery6.Parameters.ParamByName('@id_realiz').Value:=ADOQuery7.FieldByName('id_realiz').AsString;
ADOQuery6.Parameters.ParamByName('@id_zapchast').Value:=StrToInt(StringGrid1.Cells[0,I]);
ADOQuery6.Parameters.ParamByName('@kolvo').Value:=StrToInt(StringGrid1.Cells[2,I]);
ADOQuery6.ExecSQL;
end;

Answer 2

[prometian]

Как вариант - клиентские наборы данных. Хранить информацию в них, а уже после, при получении ID, выполнить запись