Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > Delphi: Общие вопросы > Свернуть вместо закрытия!


Автор: Uragan 6.7.2006, 18:46
Как сделать чтобы по нажатию на кретстик программа не закрывалась а сворачивалась?
Заранее благодарен! 

Автор: Yanis 6.7.2006, 18:50
Код
procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
  CanClose := False;
  Application.Minimize;
end;
 

Автор: z-END 6.7.2006, 18:51
в CloseQuery прописать
Код

CanClose := False;
Application.Minimize;


Добавлено @ 18:51 
оперативноsmile 

Автор: Uragan 6.7.2006, 18:52
спасибки! 

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)