Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как незакрыть форму по ALT+F4? [D7, XP]

Первокласник Вася © (2007-01-27 15:26:00)
Всем привет!

Хочу, чтобы форму нельзя было закрыть. Вообще.
Перепробовал все что имелось в мозгах.
Вот последний кусочек, что черкнул только щас:
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.
У меня форма на весь экран, а хочется чтобы пока не произошло ороеделенное событие - висела "незакрытой"

GrayFace (2007-01-29 13:29:00) [1]
Видимо, "неубиваемая" форма призвана повергнуть в шок местную училку, или другого Васю-сотоварища по несчастью (Первокласник все-таки - впереди еще по меньшей мере 10 лет форменного несчастья).

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

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

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

Anatoly Podgoretsky (2007-01-28 12:52:00) [3]
> Германн (28.01.2007 02:13:07) [7]

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

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

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

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

Anatoly Podgoretsky (2007-01-27 19:41:00) [5]
> AlexanderMS (27.01.2007 17:09:05) [5]

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

AlexanderMS (2007-01-27 17:09:00) [6]

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

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

Юрий Зотов (2007-01-27 16:06:00) [7]
Хорошая программа получится. Пользователь будет очень рад.

Первокласник Вася (2007-01-27 15:50:00) [8]
опа! кажется догадался.
достаточно canclose проставить в false!
Работает. Спасибо!!!

Первокласник Вася (2007-01-27 15:46:00) [9]
Спасибо за помощь, но я что-то не могу понять, как это сделть.
Вставить этот кусок кода не получается.
Покажите пожалуйста на примере. Хотя бы примитивный.

MsGuns (2007-01-27 15:43:00) [10]
TForm.OnCloseQuery

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »