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

Вниз

Нужно заблокировать в 1 из форм Alt + F4.   Найти похожие ветки 

 
Леонид   (2003-08-29 03:24) [0]

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


 
Е-Моё имя ©   (2003-08-29 03:42) [1]

попробуй пункт меню назначить на это сочетание, хоткей
в обработке-пусто


 
DrFox ©   (2003-08-29 03:50) [2]

надо обрабатывать событие FormCloseQuery
примерно так
procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
if not(CanBeClose) then CanClose:=false;
end;


 
имя   (2003-08-29 03:51) [3]

Удалено модератором


 
Е-Моё имя ©   (2003-08-29 07:40) [4]

DrFox ©
надо не запретить закрыть форму, а "чтобы в одной из форм при нажатии этой комбинации не происходило ни какого действия"


 
Zergling ©   (2003-08-29 08:04) [5]

Е-Моё имя © (29.08.03 07:40) [4]

>> действия, то бишь выход или закрытие формы.


 
Е-Моё имя ©   (2003-08-29 09:36) [6]

Zergling © (29.08.03 08:04)
да, спасибо, мне лень было дописать
))))))

пусть автор скажет чо ему надо
я так понял, что запрещать закрытие не надо - это же не вечная форма ;))


 
АлексейК   (2003-08-29 09:56) [7]

Перекрой WndProc.


 
DrFox ©   (2003-08-31 19:38) [8]

>>DrFox ©
>>надо не запретить закрыть форму, а "чтобы в одной из форм при
>>нажатии этой комбинации не происходило ни какого действия"

Так я о чем НИКАКИХ ДЕЙСТВИЙ (в том числе и закрытия формы промы)
происходить не будет!

А если надо форму все таки закрыть то происваеваем переменной
CanBeClose значение false и ВСЁ !!!!


 
DrFox ©   (2003-09-01 15:51) [9]

Прошу прошения за БАГ в предыдушем ответе
Для того чтобы розрешить закрытие формы надо
дать переменной CanBeClose значение True, а не False !!! :)



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

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

Наверх




Память: 0.48 MB
Время: 0.013 c
14-33764
jack128
2003-08-24 01:05
2003.09.11
Именинники 24 августа


14-33765
Igor__
2003-08-23 11:01
2003.09.11
Квантизация цветов


1-33568
Pirat
2003-08-28 12:15
2003.09.11
странный глюк TListView


3-33480
testthewest
2003-08-20 12:45
2003.09.11
Delphi не реагирует на RAISERROR


1-33647
xman
2003-08-30 19:03
2003.09.11
memo или richedit