Спрятать форму при закрытии !

Опубиковано: 07.06.2008 г., автор: , просмотров: 36131

Уроки програмирования на языке Delphi.

Сейчас я покажу вам, как сделать так чтобы при нажатии на крестик (закрытии главной формы), программа не закрывалась, а просто сворачивалась. Сам код займет всего две строчки. Итак, создаем обработчик событий OnClose на главной форме и прописываем там следующий код:

Action := caNone;
Application.Minimize;

Вот что у нас получилось:

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
Action := caNone;
Application.Minimize;
end;

Все.!



Похожие материалы

Последние из рубрики

DotaAllStars 15 Oct 2008 в 00:00 #
Создаешь Кнопку Button1 и прописываешь, Close;
или Action:=CaFree;
леша 14 Oct 2008 в 00:00 #
только через дисптчер задач
ctrl+alt+delete
Дмитрий 14 Oct 2008 в 00:00 #
Подумай головой ...
Дима 10 Oct 2008 в 00:00 #
супер! а как на счет реального закрытия??? прогу ведь никак не закрыть теперь?!
скажите как отменить функцию Action := caNone;
Spensor 05 Oct 2008 в 00:00 #
для сворачивание в трей подойдёт!

ОтменитьДобавить комментарий