Тема: Накладная
Показать сообщение отдельно
  #6  
Старый 22.11.2010, 01:48
Аватар для deltas
deltas deltas вне форума
Новичок
 
Регистрация: 22.11.2010
Сообщения: 99
Репутация: 47
По умолчанию

Цитата:
Сообщение от Настюфка
Здравствуйте всем!Как сделать, чтобы из таблицы Номенклатура щёлкнув на товар, он переходил в рядом открытую таблицу Накладная вместе с ценой, а в Накладной указать количество, и чтобы посчиталась стоимость и общая сумма заказа?

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