Показать сообщение отдельно
  #4  
Старый 10.10.2011, 19:19
Аватар для Amilman
Amilman Amilman вне форума
Новичок
 
Регистрация: 27.03.2011
Адрес: г.Кемерово
Сообщения: 98
Версия Delphi: XE
Репутация: 10
По умолчанию

Цитата:
Сообщение от Страдалецъ
Ох и не люблю же я такие вопросы. Гадать приходится постоянно.
Может Zhigalov прав, а может и не так. Может у автора несколько таблиц и для каждой нужна своя форма ввода и нужен навигатор перехода между этими формами по аналогии кнопок перехода в IE.
Извините. У меня несколько таблиц,есть одна форма с разным способом ввода. С одной формы заполняется сразу несколько таблиц. и мне нужно:
1)На главной форме выделить нужную запись в grid.
2)Нажать кнопку на форме.
3)Должна открыться форма заполнения только уже с заполненными компонентами из разных таблиц.
4)Потом я вношу изменения жму кнопку и все изменения вносятся в разные таблицы. (не добавление а изменение текущих записей)

Добавление производится через эту-же форму таким способом:
Код:
procedure TForm4.Button5Click(Sender: TObject);
begin
  if DataModule1.ADOQuery2.Active = True then
    DataModule1.ADOQuery2.Close;
  DataModule1.ADOQuery2.sql.Text :=
    'insert into Работники (Фамилия, Имя, Отчество, Подразделение, Статус_работника, Пол, id_info) values ("'
    + Edit_fio.Text + '", "' + Edit_name.Text + '", "' + Edit_otch.Text + '", "'
    + ComboBox1.Text + '", "' + DBLookUpCombobox.Text + '", "' + ComboBox2.Text
    + '", "' + Inttostr(seInfo.Value) + '")';
  DataModule1.ADOQuery2.ExecSQL;
Ответить с цитированием