vasketsov
Код:
procedure Min(var Msg: TMessage); message WM_SYSCOMMAND;
....................
procedure TForm1.Min(var Msg: TMessage);
begin
if Msg.WParam = SC_MINIMIZE then
else inherited;
end;
Сворачивается лишь при минимизаии окна через системное меню, ежели через меню панели задач или по команде свернуть все окна то нифига.
Рыл в инете и надыбал исходник проги на с++, там это самое несворачиваемое окошко является диалоговым в режиме Modal (главное окно там ваще невидимое). Но я еще не совсем разобрался как ето реализовано.