Скачать: CL | DM;

Непонятная проблема с окнами   Найти похожие ветки 

← →
Naumov ©   (2005-05-05 06:28) [0]

Несколько окон в проекте у всех стоит свойство
FormStyle = ...OnTop, при выполнении программы изначально идет все как надо окно находится поверх остальных, нажимаешь на кнопку при вызове другого окна оно тоже вылазит поверх остальных, но при каких-то не понятных условиях вдруг вызываемое окно находится ниже, что такое незнаю, проверяю свойтво FormStyle все как надо, помогите спасите.

---

← →
Antonn ©   (2005-05-05 06:53) [1]

protected
   procedure WMWINDOWPOSCHANGING(var Msg: TWMWINDOWPOSCHANGING);
   message WM_WINDOWPOSCHANGING;

procedure TMainForm.WMWINDOWPOSCHANGING(var Msg: TWMWINDOWPOSCHANGING);
var
 rWorkArea: TRect;
 StickAt : Word;
 Docked: Boolean;
begin
    SetWindowPos(Handle,HWND_TOPmost,Left,Top,Width,Height, SWP_NOACTIVATE or SWP_NOMOVE or SWP_NOSIZE );  // or SWP_NOMOVE or SWP_NOSIZE

 inherited;
end;

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.025 c