Показать сообщение отдельно
  #14  
Старый 13.11.2013, 14:19
Аватар для Mrak
Mrak Mrak вне форума
Местный
 
Регистрация: 26.01.2013
Адрес: МО
Сообщения: 438
Версия Delphi: XE2
Репутация: 17
По умолчанию

если query1 - это таблица Contain, то попробуйте так
Код:
  querik.Close;
  Querik.SQL.text:='INSERT INTO Containers VALUES ( " + 
  query1.fieldbyname(KodCont).asstring + ", " + 
  query1.fieldbyname(Container).asstring + ", " + 
  query1.fieldbyname(Cargo).asstring + ", " + 
  query1.fieldbyname(MassT).asstring + ", NULL, NULL, NULL)';
  querik.ExecSQL;

в таблицу будут вставлены записи, соответствующие выбранной строке query1
__________________
Я за здоровый экстрим!
Спасибо за "спасибо")
Ответить с цитированием