Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2006.07.16;
Скачать: [xml.tar.bz2];

Вниз

Закрытие окна   Найти похожие ветки 

 
VeB   (2006-06-26 16:11) [0]

Здравствуйте! Подскажите как запретить закрытие модального окна по клавише Alt-f4. У меня задача показать окно и пока пользователь не проделает необходимую последвовательность действий окно не закрывать. А так получается, что пользователь может прервать процесс.


 
Palladin ©   (2006-06-26 16:13) [1]

Это не правильно. Всегда должна быть возможность отмены.


 
veb   (2006-06-26 16:22) [2]

Не правильно писать, что это "не правильно"!
Могу привести примеры где это используется: возьмите любую не зарегистрированную программу и наблюдайте окно которое не закрывается в течении скажем 5 сек. (Total Commander,  The Bat и т.п.)
В моем случае это тест, которые нельзя прерывать, пока не достигнешь конца.


 
Palladin ©   (2006-06-26 16:25) [3]

а... ну тогда ладно...

type
 TForm1 = class(TForm)
 private
   { Private declarations }
 public
   { Public declarations }
   Procedure WndProc(Var Msg:TMessage); Override;
 end;

...

Procedure TForm1.WndProc;
Begin
If (Msg.Msg=wm_syscommand) and (Msg.WParam=sc_close)
 Then Exit
 Else Inherited;
End;


 
veb   (2006-06-26 16:29) [4]

to Palladin
 Гыниально! Спасибо! Пиво на какой емайл высылать?


 
Palladin ©   (2006-06-26 16:42) [5]

сапасыбо, но я уже... )

да и пользователь может в любой момент прервать процесс сняв задачу... :)



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

Форум: "Начинающим";
Текущий архив: 2006.07.16;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.009 c
2-1151552404
stock
2006-06-29 07:40
2006.07.16
выполнение winExec


2-1151154509
Skazi
2006-06-24 17:08
2006.07.16
Проблема с TTable?


2-1151377913
learner
2006-06-27 07:11
2006.07.16
CloseHandle при INVALID_HANDLE_VALUE .


15-1150266529
REA
2006-06-14 10:28
2006.07.16
Уотерс и money


2-1151109122
Maggot
2006-06-24 04:32
2006.07.16
Послать *.doc на печать.Подскажите пожалуйста!





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский