Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > Разное
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 12.03.2008, 16:16
softrain softrain вне форума
Прохожий
 
Регистрация: 12.03.2008
Сообщения: 3
Репутация: 10
По умолчанию не удаеться закрыть программу из под висты

программа написана на delphi 6. под вистой работает нормально, только закрывать надо через диспетчер.
на событии onClose висит процедура сохранения данных в файл.

если надо, программа тут: http://www.tch.softrain.info/tch2.exe

что посоветуете?
Ответить с цитированием
  #2  
Старый 12.03.2008, 19:43
Аватар для NCD
NCD NCD вне форума
Новичок
 
Регистрация: 31.12.2007
Адрес: РОССИЯ
Сообщения: 53
Репутация: 10
По умолчанию

Мне с самого её появления Виста не понравилась - слишком много в ней "бюрократии" - на любые действия требуются разрешения (за час работы с ней у меня кончилась нецензурная брань в её адрес); вероятно из-за этого программа и виснет при сохранении файла (ждёт официального разрешения, но не получает). Может быть как-то саму ОС настроить.
Ответить с цитированием
  #3  
Старый 13.03.2008, 17:56
Аватар для Thrasher
Thrasher Thrasher вне форума
Illuminati
 
Регистрация: 06.03.2008
Адрес: Крым, г. Симферополь
Сообщения: 348
Репутация: 8808
По умолчанию

Лучше всего добавить запись в файл в обработчик OnCloseQuery.
__________________
Хорошо написанная программа не требует документации
ICQ 9-184-668.
Ответить с цитированием
  #4  
Старый 20.03.2008, 13:47
softrain softrain вне форума
Прохожий
 
Регистрация: 12.03.2008
Сообщения: 3
Репутация: 10
По умолчанию

так ведь у меня нету там Query. обычные файлы и запись в них..
Ответить с цитированием
  #5  
Старый 21.03.2008, 10:03
Аватар для Thrasher
Thrasher Thrasher вне форума
Illuminati
 
Регистрация: 06.03.2008
Адрес: Крым, г. Симферополь
Сообщения: 348
Репутация: 8808
По умолчанию

Ты неправильно понял. У формы есть два разных обработчика закрытия - OnClose и OnCloseQuery.
Тебе нужно использовать последний.
Например:
Код:
 procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
CanClose:=False;//Не дадим окну закрыться
SaveSomthingToFile;//Пишем что-то в файл
CanClose:=true;//Теперь можно закрывать
end;
__________________
Хорошо написанная программа не требует документации
ICQ 9-184-668.
Ответить с цитированием
  #6  
Старый 21.03.2008, 12:16
softrain softrain вне форума
Прохожий
 
Регистрация: 12.03.2008
Сообщения: 3
Репутация: 10
По умолчанию

Спасибо, попробую....
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 20:06.


 

Сайт

Форум

FAQ

RSS лента

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2023

ВКонтакте   Facebook   Twitter