Уроки програмирования на языке Delphi.
Сейчас я покажу вам, как сделать так чтобы при нажатии на крестик (закрытии главной формы), программа не закрывалась, а просто сворачивалась. Сам код займет всего две строчки. Итак, создаем обработчик событий OnClose на главной форме и прописываем там следующий код:
Action := caNone;
Application.Minimize;
Вот что у нас получилось:
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
Action := caNone;
Application.Minimize;
end;
Все.!
Похожие материалы
- Эмулируем нажатие клавиши клавитуры
- Delphi исходники - симетричный Canvas ?
- Сохраняем StringGrid в файл
- Delphi исходники - игра Шашки
- Delphi исходники - поиск кратчайшего пути в лабиринте