чтото ругалось на код,подправил немного на это
procedure TfrmMiniServ.WndProc(var Msg: TMessage);
begin
if (Msg.Msg = WM_SYSCOMMAND) and (Msg.wParam = SC_RESTORE) then
ShowMessage('бля');
inherited;
end;
но не работает,компилится,но ничего не происходит при восстановлении окна
|