[4kusNick]

Привет, проблема такова:

Есть форма, обычная такая, но без бордера: BorderStyle := bsNone (с другими бордерами тоже проблема такая же), есть панелька, на ней расположены две кнопки: закрыть и свернуть
При наджатии на закрыть все ок - вызывается метод Close для формы,
а вот при нажатии на свернуть, происходи нечто непонятное:
Код на кнопке такой :

Код:

procedure BtnOnClick...
begin

   Application.Minimize;

end;

Этот код не работает
Пробовал

Код:

ShowWindow(Handle,SW_MINIMIZE);

и

Код:

ShowWindow(Handle,SW_MINIMIZED);

В обоих случаях окно сворачивается, но не так, как надо (остается в левом нижнем углу маленький заголовок с названием программы и только при двойном клике на нем программа разворачивается)
Пробовал

Код:

SendMessage(Handle,WM_SYSCOMMAND,SC_MINIMIZE,0);

Вообще никакого эффекта, наверное из-за того, что не работает

Код:

SendMessage(Handle,WM_SYSCOMMAND,SC_MINIMIZE,0);

не работает и Application.Minimizе, т.к. в теле ApplicationMinimize присутствует такая вещь:

Код:

DefWindowProc(FHandle, WM_SYSCOMMAND, SC_MINIMIZE, 0);

и во время отладки именна она и вызывалась...
Вобщем, если кто знает, подскажите, как апишными методами нормально свернуть окно не используя SC_MINIMIZE.

Спасибо.