Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / событие - внесение изменений / 4 сообщений из 4, страница 1 из 1
14.09.2007, 22:58
    #34802274
shkoda slava
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
событие - внесение изменений
доброго времени суток. подскажите, пожалуйста, по такому вопросу. у меня есть форма, на которой несколько полей для ввода. по закрытию формы, у пользователя спрашивается, сохранить ли изменения. но пользователь- то может и ничего не изменять во время работы, а просто смотреть. как бы заставить форму "видеть", что изменений не произошло, и что вопрос о сохранении задавать не надо. большое спасибо всем за помощь )))
...
Рейтинг: 0 / 0
14.09.2007, 23:45
    #34802307
ВладимирМ
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
событие - внесение изменений
А сам процесс сохранения внесенных изменений у тебя что делает-то? Записывает значения из полей формы куда-то? Ну и сравни, что именно тебе предстоит записать с тем, что уже записано.

Если в полях формы источником данных является буферизированная таблица, то можно проверить факт модификации через функции GetFldState(-1) - для текущей записи или GetNextModified(0) - для табличных данных.
...
Рейтинг: 0 / 0
15.09.2007, 06:12
    #34802375
MiklS
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
событие - внесение изменений
А без проверки таблиц можно так
В инит формы
This.AddProperty("lEdits")
В собитиях InterActiveShange элементов управления
ThisForm.lEdits=.T.
В событии формы QueryUnLoad
IF This.lEdits
** Вопрос на сохранение данных
ENDIF
...
Рейтинг: 0 / 0
16.09.2007, 16:58
    #34803375
shkoda slava
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
событие - внесение изменений
спасибочки большое, все работает ))
...
Рейтинг: 0 / 0
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / событие - внесение изменений / 4 сообщений из 4, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]