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

Вниз

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

 
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;
Скачать: CL | DM;

Наверх




Память: 0.45 MB
Время: 0.009 c
10-1122028517
S@shka
2005-07-22 14:35
2006.07.16
Нужно ли создавать новый интерфейс?


15-1150370597
Delphi basic
2006-06-15 15:23
2006.07.16
Delphi или PHP?


15-1150377136
syte_ser78
2006-06-15 17:12
2006.07.16
вдогонку о вопросе "как прогнать все переменные"


2-1151651681
FFFF
2006-06-30 11:14
2006.07.16
Как открыть документ Word


11-1130302726
Vladimir Kladov
2005-10-26 08:58
2006.07.16
PRN и другие специальные "файлы" DOS





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский