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

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

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

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

Action := caNone;
Application.Minimize;

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

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

Все.!



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

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

камиль58 26 Apr 2013 в 00:00 #
подскажите что это за кнопка онклосе, где его найти?
лдhjhgh 11 Dec 2012 в 00:00 #
лод
Андрюха 16 Dec 2010 в 00:00 #
а как только кнопку развертки окна скрыть??? подскажите плиз. Завтра курсач сдавать )
Depers 14 Dec 2010 в 00:00 #
Пишу на Lazarus
У меня крестик скрывает программу в трей, но в трее есть обработчик выхода. А сам OnClose такой.
if Status<>′Close′ then begin
CloseAction := caNone;
Hiden:=true;
MainForm.Hide;
end;
true Delpher 08 Dec 2010 в 00:00 #
Не пизди!
Код будет работать!
Сначала попробуй, потом возмущайся. А еще дефером назвался ...

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