![]() |
|
|
|||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
#1
|
||||
|
||||
|
Всем здравия.
Есть проблемка, подскажите кто сведущий ... как быть? ... Есть 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, подскажите что конкретно и на какой форме? Последний раз редактировалось Admin, 22.01.2013 в 23:16. |
|
#2
|
||||
|
||||
|
вместо
Код:
Form1.DBNavigator1.BtnClick(nbPost); Код:
Form1.ADOTable1.Post; и строка Код:
Form1.ADOTable1.Edit; |
| Этот пользователь сказал Спасибо Yurk@ за это полезное сообщение: | ||
Homo-Fantasmus (09.02.2013)
| ||
|
#3
|
||||
|
||||
|
Спасибо Юрке
с Form1.ADOTable1.Post всё заработало, а я дурак через DBNavigator пытался сделать ... |
|
#4
|
||||
|
||||
|
Тема закрыта, ещё раз спасибо за подсказку ...
|