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

Как сделать чтобы окно   Найти похожие ветки 

← →
sergey2   (2003-01-06 21:59) [0]

Подскажите как сделать чтобы окно находящееся за другими окнами или в свернутом виде "вылазило" наверх по определенному событию?
Похожий вопрос я задавал в другой теме, но никто не ответил. Видимо из-за несоответствия темы.
Я написал так. Но получилось очень глючно. Окно не полностью вылазит. И получается полная фигня на экране.

procedure TForm1.WebBrowser1NavigateComplete2(Sender: TObject;
const pDisp: IDispatch; var URL: OleVariant);
begin
SetWindowPos(Handle,HWND_TOPMOST,Left,Top,Width, Height, SWP_NOREDRAW);

end;

---

← →
Rouse_ ©   (2003-01-06 22:21) [1]

Попробуй поиграться с последним параметром

Желаю успехов

---

← →
Mongust ©   (2003-01-07 00:35) [2]

Когда окно свёрнуто-надо сделать application.restore;
Когда оно за окном можно сделать так
begin
application.Minimize;
application.restore;
end;
Нащёт последнего-скорее всего есть более простые способы.

---

← →
sergey2   (2003-01-07 06:46) [3]

Ага. Поставил последний параметр SWP_SHOWWINDOW и все стало ОК. Окно вылазит наверх когда оно находится позади остальных или когд оно свернуто. Но дело в том, что ни в инете , ни в справках не нашел ничего по этому поводу. Пришлось самому перебирать разные варианты (придумывать, подставлять и пробовать компилировать прогу) пока не наткнулся на такой вариант что компилятор его понял.
Где вообще искать инфу про параметры SetWindowPos() если снова что-то понадобится?

---

← →
Song ©   (2003-01-07 09:45) [4]

В хэлпе.

---

← →
Rouse_ ©   (2003-01-07 11:13) [5]

А именно Windows SDK Help или Windows API Help

Желаю успехов

---

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

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



Память: 0.46 MB
Время: 0.015 c