Не сворачивается окно...

← →
VDen © (2003-07-02 20:14) [0]

Есть DLL, которая ставит хук на клавиатуру. При нажатии определенной клавиши, допустим "а", DLL отправляет BROADCAST сообщение. Мое окно главного приложения в свернутом виде ловит это сообщение, в Application.onMessage следующим образом

procedure TNoterForm.AppMess(var Msg: TMsg; var Handled: Boolean);
begin
if (Msg.message = WM_MyRestMess) then begin
ShowWindow(Handle, SW_RESTORE);
UpdateWindow(Handle);
ShowWindow(RichEdit1.Handle, SW_RESTORE); //Как выяснилось, без этого
UpdateWindow(RichEdit1.Handle); //RichEdit отказывается корректно перерисовываться
Handled:=true;
end;
end;

НО. После того как это сообщение развернет окно 2 раза, оно перестает сворачиваться! То есть если окно было развернуто и пришло это сообщение, ничего не случается, а если свернуто, то...
Подскажите, плз, где лыжи смазать.

ЗЫ И еще, совсем полтергейст, но все-таки... После восстановления окна отказывается работать ActionManager - перестает реагировать на изменение содержимого буфера обмена, например...

← →
Юрий Зотов © (2003-07-02 20:40) [1]

Явно что-то перемудрено (возможно, не только в этом месте). Просто Application.Restore не помогает? Или WindowState := wsNormal. Или и то, и другое вместе.

Вы будете смеяться, но не помогает...

И вообще, как-то все некрасиво выходит... Ну да ладно, начну заново и по-другому.. ;)

Не сворачивается окно... Найти похожие ветки