|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
не удаеться закрыть программу из под висты
программа написана на delphi 6. под вистой работает нормально, только закрывать надо через диспетчер.
на событии onClose висит процедура сохранения данных в файл. если надо, программа тут: http://www.tch.softrain.info/tch2.exe что посоветуете? |
#2
|
||||
|
||||
Мне с самого её появления Виста не понравилась - слишком много в ней "бюрократии" - на любые действия требуются разрешения (за час работы с ней у меня кончилась нецензурная брань в её адрес); вероятно из-за этого программа и виснет при сохранении файла (ждёт официального разрешения, но не получает). Может быть как-то саму ОС настроить.
|
#3
|
||||
|
||||
Лучше всего добавить запись в файл в обработчик OnCloseQuery.
Хорошо написанная программа не требует документации ICQ 9-184-668. |
#4
|
|||
|
|||
так ведь у меня нету там Query. обычные файлы и запись в них..
|
#5
|
||||
|
||||
Ты неправильно понял. У формы есть два разных обработчика закрытия - OnClose и OnCloseQuery.
Тебе нужно использовать последний. Например: Код:
procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean); begin CanClose:=False;//Не дадим окну закрыться SaveSomthingToFile;//Пишем что-то в файл CanClose:=true;//Теперь можно закрывать end; Хорошо написанная программа не требует документации ICQ 9-184-668. |
#6
|
|||
|
|||
Спасибо, попробую....
|