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

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

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

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

Action := caNone;
Application.Minimize;

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

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

Все.!



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

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

Сергей 15 Jul 2010 в 00:00 #
А у меня на панели задач остается (обычное сворачивание)
Impulset 25 Jun 2010 в 00:00 #
Александр KLM , так она на панели видна же,
САМЫЙ ЛУЧШИЙ СПОСОБ спрятать прогу при её закрытии -


procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
Action := caNone;
ShowWindow(Handle, SW_HIDE); //прячем форму(Handle - дес
//криптор формы(тоже что и
// Form1.Handle, помоему

ShowWindow(Application.Handle, SW_HIDE);//прячем само при
//ложение))))
end;


напоследок советую читать книги Михаила Флёнова
Александр KLM 15 Jun 2010 в 00:00 #
Я прятал програмку очн просто Form1.Visible
Евгений Шепарнёв 28 May 2010 в 00:00 #
А всё я понял как:
Просто форме нужно прописать это:
Form1.BorderStyle := bsDialog;
Евгений Шепарнёв 27 May 2010 в 00:00 #
А как убрать кнопки "сворачивания и развертывания" что бы была только кнопка "закрыть"?

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