Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.11.27;
Скачать: CL | DM;

Вниз

Реагирование на завершение работы   Найти похожие ветки 

 
ИЛЕЙ ©   (2003-09-17 13:40) [0]

Плиз хелп!!! Есть такая задача: надо отреагировать на нажатие кнопки "ок" в окне
"Завершение работы Windows". Хочу реализовать проверку на наличие диска в сидироме
при завершении работы Виндозы.
Зарание спасибо.


 
clickmaker ©   (2003-09-17 13:46) [1]

WM_QUERYENDSESSION


 
ИЛЕЙ ©   (2003-09-17 14:21) [2]

И че???

Что это такое и куда его пихать???

З.Ы. Извини, я новичек.


 
Плохиш_   (2003-09-17 14:29) [3]

А не рано новичкам реагировать на нажатие кнопки "ок" в окне "Завершение работы Windows"


 
Denizzz   (2003-09-17 14:35) [4]

procedure TFMain.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
var v: THandle;
begin
v := MessageBox(Handle, "Завершить работу?", "Завершение", 36);
if v = IDYES then
CanClose := true {Разрешить завершение}
else CanClose := false; {обломать}
end;


 
Е-Моё имя ©   (2003-09-17 14:41) [5]


> MessageBox(Handle, "Завершить работу?", "Завершение", 36);

гыыы
первый раз разыменовывание вижу)))


 
ИЛЕЙ ©   (2003-09-18 15:03) [6]

За это все огромное человеческое спасибо!!!

А если еще узнать что юзер хочет выключить или перезапустить компьютер???
т.е.
Как определить какой radiobutton был выбран в окне "Завершение работы Windows"
перед тем как была нажата кнопка "ОК"???


 
ИЛЕЙ ©   (2003-09-18 15:42) [7]

А может быть кто-нибудь что-нибудь на мыло мне сбросит по данной теме?
Заранее спасибо!


mr-iley@yandex.ru


 
Е-Моё имя ©   (2003-09-18 15:45) [8]


> [7] ИЛЕЙ © (18.09.03 15:42)

могу отличную подборку отборного спама выслать =)


 
ИЛЕЙ ©   (2003-09-18 16:10) [9]

Е-мое
И чего ты улыбаешься?
Ты думаешь это смешно?



Страницы: 1 вся ветка

Текущий архив: 2003.11.27;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.019 c
3-89674
DECL
2003-11-10 23:58
2003.11.27
Как включить Interbase???


14-90076
k-man
2003-11-04 20:10
2003.11.27
Max Payne 2:The Fall of Max Payne


1-89951
gray
2003-11-16 01:55
2003.11.27
Не могу проинсталлить компонент


3-89703
Dany
2003-11-10 14:21
2003.11.27
NUMERIC(32) to Integer


1-89912
Tornado
2003-11-18 13:18
2003.11.27
String -> Char