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

Опубиковано: 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 #
    Не пизди!
    Код будет работать!
    Сначала попробуй, потом возмущайся. А еще дефером назвался ...

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