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

Вниз

Как незакрыть форму по ALT+F4?   Найти похожие ветки 

 
Первокласник Вася   (2007-01-27 15:26) [0]

Всем привет!

Хочу, чтобы форму нельзя было закрыть. Вообще.
Перепробовал все что имелось в мозгах.
Вот последний кусочек, что черкнул только щас:
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
 Shift: TShiftState);
begin
 if (key=ord(#115)) and (ssAlt in Shift) then
 form1.Visible:=true;
end;


Подскжите плиз, как можно вообще отменить действие close.
У меня форма на весь экран, а хочется чтобы пока не произошло ороеделенное событие - висела "незакрытой"


 
MsGuns ©   (2007-01-27 15:43) [1]

TForm.OnCloseQuery


 
Первокласник Вася   (2007-01-27 15:46) [2]

Спасибо за помощь, но я что-то не могу понять, как это сделть.
Вставить этот кусок кода не получается.
Покажите пожалуйста на примере. Хотя бы примитивный.


 
Первокласник Вася   (2007-01-27 15:50) [3]

опа! кажется догадался.
достаточно canclose проставить в false!
Работает. Спасибо!!!


 
Юрий Зотов ©   (2007-01-27 16:06) [4]

Хорошая программа получится. Пользователь будет очень рад.


 
AlexanderMS ©   (2007-01-27 17:09) [5]


> Юрий Зотов ©   (27.01.07 16:06) [4]
> Хорошая программа получится. Пользователь будет очень рад.
>


Пользователь будет очень рад, если как-нибудь закроет программу. :)


 
Anatoly Podgoretsky ©   (2007-01-27 19:41) [6]

> AlexanderMS  (27.01.2007 17:09:05)  [5]

А закроет он без проблем, если не ламер.


 
Германн ©   (2007-01-28 02:13) [7]


> Anatoly Podgoretsky ©   (27.01.07 19:41) [6]
>
> > AlexanderMS  (27.01.2007 17:09:05)  [5]
>
> А закроет он без проблем, если не ламер.
>

А особенно счасливым будет сисадмин, у которого под присмотром десятки, если не сотни ламеров:)


 
Anatoly Podgoretsky ©   (2007-01-28 12:52) [8]

> Германн  (28.01.2007 02:13:07)  [7]

Сисадмин такой дуростью не занимается, это проерогатива программистов. Сисадмин полностью солидарен с пользователями или ему надо менять профессию, это я тебе как профессионал говорю.


 
Германн ©   (2007-01-29 02:11) [9]


> Anatoly Podgoretsky ©   (28.01.07 12:52) [8]
>
> > Германн  (28.01.2007 02:13:07)  [7]
>
> Сисадмин такой дуростью не занимается, это проерогатива
> программистов. Сисадмин полностью солидарен с пользователями
> или ему надо менять профессию, это я тебе как профессионал
> говорю.
>

Не Анатолий. Я наверно плохо сформулировал свою мысль. Поэтому и не был понят :(
Я имел в виду пост [4], когда постил свой [7]. И имел в виду твой пост [6].
Но должен сказать, что "грамотного" сисадмина я в своей практике встречал только однажды. (Есс-но я говорю про реал)


 
GrayFace ©   (2007-01-29 13:29) [10]

Видимо, "неубиваемая" форма призвана повергнуть в шок местную училку, или другого Васю-сотоварища по несчастью (Первокласник все-таки - впереди еще по меньшей мере 10 лет форменного несчастья).



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

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

Наверх




Память: 0.49 MB
Время: 0.047 c
2-1170236693
Lera
2007-01-31 12:44
2007.02.18
Отключение от сети


3-1164623047
Feds
2006-11-27 13:24
2007.02.18
Ошибка с проверкой на Null


2-1170347053
Garacio
2007-02-01 19:24
2007.02.18
настройки Button


2-1170340459
zorik
2007-02-01 17:34
2007.02.18
Компонента аля TChart


2-1170177129
Garacio
2007-01-30 20:12
2007.02.18
Поиск даты и слова в txt