Главная страница
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.02 c
3-33451
Ден
2003-08-22 10:01
2003.09.11
Программное создание псевдонима SQL


1-33672
Aleksandr
2003-08-29 15:22
2003.09.11
Как узнать, какой объект вызвал TAction?


1-33640
WASYA
2003-08-31 10:17
2003.09.11
InstallShield


1-33555
Lamerr
2003-08-29 09:26
2003.09.11
Изменение Options StringGrid-а в ран-тайм


1-33578
yuliya
2003-08-28 13:59
2003.09.11
проблема