![]() |
|
#6
|
||||
|
||||
![]() Цитата:
Ну, я думаю для начала Вы должны сказать какая база данных используется... А потом думаю где-то так : Код:
procedure TForm1.DBGrid1CellClick(Column: TColumn); begin ВашаТаблицаНакладная.append: ВашаТаблицаНакладная.FieldValues['Товар'] := ВашаТаблицаНоменклатура.Название; ВашаТаблицаНакладная.Post; end; |