Текущий архив: 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.46 MB
Время: 0.013 c