|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
09.10.2008, 08:54 | #1 |
Форумчанин
Регистрация: 19.12.2007
Сообщений: 159
|
роблемы с добавлением данных в таблицу через другую форму на дельфи
Всем привет! Это снова я. Делаю задачку в болранд дельфи. есть несколько таблиц данные из которых переносятся в одну итоговую таблицу(данные связаны по вторичным ключам), т.е. к примеру из таблицы "спортсмен" в таблицу "соревнования" приравнены id фамилий. проблема в том что дабавление в таблицу "соревнования" я осуществляю через дополнительную форму,где через обычный buttin просто выбираю из других таблиц данные кликая по ним мышкой. выбирается все нормально и когда нажимаешь добавить все ок, но запись не добавляется. почему то добавилась 1 запись в самом начале а потом не хочет. может где то какое то волшебное слово вставить надо вроде next или еще что нить чтоб добавилось?
procedure TForm1.Button2Click(Sender: TObject); procedure TForm1.Button2Click(Sender: TObject); var Add : boolean; begin Form6.ShowModal; ADOQuery1.Next; Add := True; if Add = True then begin If FVvodAdd = True then begin ADOQuery1.Append; ADOQuery1.FieldByName('id_spmna').A sInteger := Form4.ADOQuery1.FieldByName('id_spo rtsmen').AsInteger; ADOQuery1.FieldByName('id_sporta'). AsInteger := Form3.ADOQuery1.FieldByName('Id_spo rt').AsInteger; ADOQuery1.FieldByName('id_med').AsI nteger := Form5.ADOQuery1.FieldByName('Id_med ali').AsInteger; ADOQuery1.Post; ADOQuery1.Active := False; ADOQuery1.Active := True; end; end; end; если надо могу в архиве скинуть.
Пока ремонтируют кукольный домик, живу на форуме.
Последний раз редактировалось Барби; 09.10.2008 в 08:57. |
09.10.2008, 12:49 | #2 |
Форумчанин
Регистрация: 19.12.2007
Сообщений: 159
|
Хочу сказать огромное спасибо этому форуму. я его обожаю. как только напишу сюда свою проблему потом через некоторое время сама же нахожу ошибку. а вот если не напишу буду мучаться и не найду. так было и в этот раз. спасибо всем тем кто помогает и подсказывает, вы приводите меня к верному пути и правильному решению.
Пока ремонтируют кукольный домик, живу на форуме.
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Как через дельфи открыть папку в проводнике? | t3ns0r | Общие вопросы Delphi | 6 | 28.03.2009 21:32 |
спрятать главную форму а открыть другую | Ozerich | Общие вопросы Delphi | 9 | 05.08.2008 15:18 |
Проблема с сохранением данных в другую таблицу | HAMMAN | Помощь студентам | 1 | 26.05.2008 08:30 |
Закачка картинок через форму | Romanbl4 | PHP | 18 | 04.02.2008 15:30 |
как задается действия работа кнопок или переход на другую форму. | HIP | Общие вопросы Delphi | 6 | 21.06.2007 11:02 |