|
Вопрос # 6 589/ вопрос открыт / |
|
Здравствуйте, уважаемые эксперты! Помогите пожалуйста с кодом:
procedure TForm2.SpeedButton2Click(Sender: TObject);
begin
if form1.ADOTable1.Modified then
begin
Form1.ADOTable1.Post;
Form2.Close;
end else ShowMessage ('Сіз өзгеріс енгізген жоқсыз');
end;
Этот код отлично работает если все таблицы заполняется данными. А если редактировать какую-нить запись (например только Фамилия) тогда сработает код ShowMessage ('Сіз өзгеріс енгізген жоқсыз'); Почему так происходить?
 |
Вопрос задал: Beknur (статус: Посетитель)
Вопрос отправлен: 15 июля 2015, 21:49
Состояние вопроса: открыт, ответов: 0.
|
Мини-форум вопроса
Всего сообщений: 1; последнее сообщение — 16 июля 2015, 23:32; участников в обсуждении: 1.
|
DNK (статус: Студент), 16 июля 2015, 23:32 [#1]:
Работает телепатор. Может данные не считаются модифицированными пока у редактируемого элемента не потерян фокус. Попробуй вместо SpeedButton обычный Button.
"Digital Networked Knight"
|
Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.
|
