Всем здравия.
Есть проблемка, подскажите кто сведущий ... как быть? ...
Есть Forma1 c Table1, DbGrid1, DBNavigator1 и есть Form2 c Edit1...Edit4 и Botton1.
Значит на второй форме я ввожу какие-то данные, по нажатию Botton эти данные проверяются, заносятся в DbGrid (на форму1) после чего вторая форма закрывается открывается первая форма, на которой нужно каждый раз подтверждать занисение данных нажатием в DBNavigator1'е соответствующей кнопки.
Я хочу сделать так, что-бы после нажатия Botton1 на второй форме после проверки данных и занесения в Table (уже на форме1) подтверждался результат изменения записи на первой форме.
Как я это пытался реализовать:
Код:
unit Unit2; (Это форма2)
........
procedure TForm2.Button1Click(Sender: TObject);
begin
if условия проверки then
операторы
else
Form1.ADOTable1.Open ;
Form1.ADOTable1.Insert;
Form1.ADOTable1.FieldByName('Дата').AsString := Date;
Form1.ADOTable1.Edit;
Form1.ADOTable1.FieldByName('Время').AsString := Edit1.Text + ':' + Edit2.Text;
Form1.ADOTable1.FieldByName('Событие').AsString :=Memo1.Text;
Form1.ADOTable1.FieldByName('Время напоминания').AsString := Edit3.Text + ':' + Edit4.Text;
//Внесение данных в таблицу
Form1.DBNavigator1.BtnClick(nbPost);
//Подтверждение изменений в записях через DBNavigator1
Form2.Hide;
Form1.Enabled := true;
end;
Админ: Пользуемся тегами для оформления кода.
На эти мои действия компилятор выдаёт ошибку в строке
Form1.DBNavigator1.BtnClick(nbPost);
[DCC Error] Unit2.pas(174): E2003 Undeclared identifier: 'nbPost'
Я так понимаю нужно что-то прописать или в Uses или в Type, подскажите что конкретно и на какой форме?