Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Перенос данных из таблицы в таблицу


Андрей Алекс. ©   (2008-11-20 11:50:00) 

Вопрос:
я из одно таблицы хочу добавить в другую таблицу данные таким способом


   if form6.Table1.Locate('Naimen', table3.Fields.Fields[2].Value, [loPartialKey]) then
  begin
   with form6.Table1 do
      begin
          ShowMessage('Åñòü òàêàÿ çàïèñü, äîáàâëåí ìåòðàæ');
          edit;
//           fields[4].Value:=IntToStr(StrToInt(form1.Table3.Fields.Fields[4].Value)+StrToInt(fields[4].value));
          form6.Query1.Close;
          form6.Query1.SQL.Clear;
          form6.Query1.SQL.Add('Update four_base Set Zap=Zap+'+form1.Table3.Fields.Fields[4].Text);
          form6.Query1.ExecSQL;
          post;
          end;
   end


тоесть если данные существую то добавить только количество.
если наименование одно то проблемникаких
но если 2, 3 и т.д.
добавляется количество только к одному наименованию.
что я делаю непрально?


Anatoly Podgoretsky   (2008-11-20 12:21:00) [1]

> Андрей Алекс.  (20.11.2008 11:50:00)  [0]

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


Sergey13   (2008-11-20 12:19:00) [2]

> [0] Андрей Алекс.   (20.11.08 11:50)
> что я делаю непрально?

Да практически все. 8-)
Если данные разных таблиц можно связать между собой, то надо ОЧЕНЬ подумать прежде чем хранить данные в нескольких местах.
Основываться для связи таблиц поля типа "Naimen" это очень чревато плохими последствиями и ведет к бардаку в БД.
Если в какой то таблице у тебя встречаются одинаковые поля типа "Naimen", то это скорее всего значит, что нужен справочник.

Короче с проектированием БД у тебя, мягко говоря, слабовато. ИМХО.


Ega23   (2008-11-20 11:56:00) [3]

1. Прочитайте хелп по методам TDataSet.Insert, TDataSet.Edit и TDataSet.Post
2. Введите нормальную мнемонику. Либо приведите названия таблиц и столбцов в БД к виду Table1 .... TableN  и Table1.Column1 .... Table1.ColumnN.


Сергей М.   (2008-11-20 11:55:00) [4]


> что я делаю непрально?


Ты используешь метод Locate, который непредназначен для поиска и позиционирования на всех записях, удовлетворяющих критерию поиска.


Наверх

Титульная страница Поиск, карта сайта Написать письмо