Показать сообщение отдельно
  #2  
Старый 03.05.2009, 16:13
Nyctos Kasignete Nyctos Kasignete вне форума
Активный
 
Регистрация: 29.03.2009
Сообщения: 300
Репутация: 94
По умолчанию

Код:
procedure TForm1.FormCreate(Sender: TObject);
begin
  Application.OnMinimize := HideForm;
end;

procedure TForm1.HideForm(Sender: TObject);
begin
  Form1.Hide;
end;

Вы об этом??
Ответить с цитированием