Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > Базы данных
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 13.11.2013, 11:45
YuliyaKar YuliyaKar вне форума
Прохожий
 
Регистрация: 13.11.2013
Сообщения: 37
Версия Delphi: Delphi 7
Репутация: 10
Смущение Перенос записей с одно йтаблицы в другую

Здравствуйте!
Попробовала сделать как вы перенос строки в другую таблицу и ничего вообще!!!
У меня две таблицы Contain u Containers u Bay. Есть поле Edit.
Принцип такой. Это погрузка бея контейнерного судна
Беру с таблицы Contain один контейнер и ложу его в таблицу Bay. Чтоб знать какой контейнер считываю активную ячейку в Edit и по изменению Edit надо перебросить все поле того выделенного контейнер ав тблицу Containers. делаю так

procedure TForm6.Edit7Change(Sender: TObject);
begin
try
Query1.SQL.Clear;
Query1.SQL.Add('INSERT INTO Containers SELECT * FROM Contain AS Container WHERE Container LIKE '''+Edit7.Text+'''');
Query1.ExecSQL;
Query2.SQL.Clear;
Query2.SQL.Add('SELECT * FROM Containers');
Query2.Active:=True;
except
on e:Exception do
end;
end;

Я уже все офрму перечитала и так толкового ответа не нашла как сделать переброс поля в другую таблицу!!!
Буду очень благодарна за помощь!
Структура таблиц.
Contain KodCont, Container, Cargo, MassT
Containers KodCont, Container, Cargo, MassT, Tier, Row,Bay
Bay - просто таблица с пустими ячейкам, куда я вношу контейнеры с таблицы Contain
Использую DataSourse, Query1, Table,DbGrid
Так пробую так даже ошибки не выбивает но не работает
Ответить с цитированием
  #2  
Старый 13.11.2013, 12:00
Аватар для Mrak
Mrak Mrak вне форума
Местный
 
Регистрация: 26.01.2013
Адрес: МО
Сообщения: 438
Версия Delphi: XE2
Репутация: 17
По умолчанию

т.е. если я правильно понимаю, нужно скопировать из таблицы контейнеры в таблицу бай все поля записи, номер которой находится в edit?

синтаксис Insert
Код:
INSERT INTO таблица (поле 1, поле 2) VALUES ( значение 1, значение2);
__________________
Я за здоровый экстрим!
Спасибо за "спасибо")

Последний раз редактировалось Mrak, 13.11.2013 в 12:02.
Ответить с цитированием
  #3  
Старый 13.11.2013, 12:03
YuliyaKar YuliyaKar вне форума
Прохожий
 
Регистрация: 13.11.2013
Сообщения: 37
Версия Delphi: Delphi 7
Репутация: 10
По умолчанию

нет не так, в таблицу Bay я их заношу вручную копированием и когда я их вношу , содержимое этой активной ячейки, в которой я стою отображается в Edit. Потом по изменению едита, если его значение совпадает с полем Container таблицы Сontainб я должна перенести эту запись в таблицу Containers
Ответить с цитированием
  #4  
Старый 13.11.2013, 12:08
YuliyaKar YuliyaKar вне форума
Прохожий
 
Регистрация: 13.11.2013
Сообщения: 37
Версия Delphi: Delphi 7
Репутация: 10
По умолчанию

Таблица Contain - это база данных контейнеров, которые есть в порту
Bay - єто первый бэй судна
Container - это база контенеров на судне уже загруженых с их позицией.
Поэтому я беру контейнер с бзы в порту, ложу его в бей и он атоматически должен переместиться в базу контейнеров судна
Ответить с цитированием
  #5  
Старый 13.11.2013, 12:20
Аватар для Mrak
Mrak Mrak вне форума
Местный
 
Регистрация: 26.01.2013
Адрес: МО
Сообщения: 438
Версия Delphi: XE2
Репутация: 17
По умолчанию

попробуйте
Код:
adoqury.close;
adoQuery.SQL.text:='INSERT INTO containers SELECT * FROM Contain WHERE Container = ''' + Edit7.Text + ''';
и сделайте поля в таблицах одинаковыми

перевод этого запроса
"вставить в контейнеры все поля таблицы контейнер у которых поле контейнер такое же как в edit"

еще в помощь
http://phpclub.ru/mysql/doc/insert.html
__________________
Я за здоровый экстрим!
Спасибо за "спасибо")
Ответить с цитированием
  #6  
Старый 13.11.2013, 12:22
YuliyaKar YuliyaKar вне форума
Прохожий
 
Регистрация: 13.11.2013
Сообщения: 37
Версия Delphi: Delphi 7
Репутация: 10
По умолчанию

Поля в таблицах одинаковые, разница только в том, что в базе контейнеров на судне есть еще 3 столбца, в которых я храню позицию контейнера. а так они идентичны!
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра
Комбинированный вид Комбинированный вид

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 08:04.


 

Сайт

Форум

FAQ

RSS лента

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2023

ВКонтакте   Facebook   Twitter