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

Открытие браузера   Найти похожие ветки 

← →
Ilg   (2004-02-06 10:00) [0]

Здравствуйте!
Проблема такая...
У меня есть форма fsStayOnTop, развернутая на весь экран...
Мне нужно открыть htm-файл в браузере. Делаю так

ShellExecute(Form1.Handle,nil,PChar("Page.htm"), nil,nil,SW_SHOWMAXIMIZED)

Браузер открывается, но его окно не видно за моей формой, а нужно
, чтобы окно браузера было перед ней...
Как с этим бороться?
Заранее, Большое Спасибо!

---

← →
Ilg   (2004-02-07 13:48) [1]

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

---

← →
Norfolk ©   (2004-02-07 14:00) [2]

На время работы браузера снимать StayOnTop, а когда браузер закрывается снова делать поверх всех.

---

← →
Ilg   (2004-02-08 00:57) [3]

Я думал над этим вариантом, но он не очень подходит...

---

← →
Gero ©   (2004-02-08 08:05) [4]

Сворачивай свою форму на время работы браузера, а при его закрытии - снова восстанавливай

---

← →
Ilg   (2004-02-08 12:08) [5]

Спасибо, но это тоже не совсем то, что хотелось...

---

← →
Ivolg ©   (2004-02-08 14:16) [6]

ShellExecute(0,"open", "Page.htm", nil, nil, SW_SHOWNORMAL);
uses ShellApi;

Если у тебя нет этой страницы около скомпилированнаго проекта, то указываешь путь.Например:

ShellExecute(0,"open", "C:\Page.htm", nil, nil, SW_SHOWNORMAL);

---

← →
Ilg   (2004-02-08 14:29) [7]

А смысл?
Все равно браузер открывается позади моего окна и не виден...

---

← →
KilkennyCat ©   (2004-02-08 14:35) [8]

Хе, так пока стэйонтоп будет, ЛЮБОЕ дочернее приложение откроется позади.

---

← →
Ivolg ©   (2004-02-08 14:43) [9]

А у меня нет!

---

← →
KilkennyCat ©   (2004-02-08 14:53) [10]

так оно у Вас не дочернее, а Ilg привязывает хэндл своей формы.

---

← →
Ilg   (2004-02-08 18:45) [11]

Не знаю...
У меня и
ShellExecute(Form1.Handle,nil... и
ShellExecute(0,"open"...
дают один результат :-(

---

← →
Ilg   (2004-02-14 15:25) [12]

Ну, может кто-нибудь еще чего-нибудь предложит?

---

← →
KilkennyCat ©   (2004-02-14 15:54) [13]

А обязательно нужно браузер открывать? Может, есть смысл открывать другую свою форму, с делфийским браузером на ней?

---

← →
a2ws   (2004-02-14 16:57) [14]

h:HWND;

h:=ShellExecute(Form1.Handle,nil,PChar("Page.htm"),nil,nil,SW_SHOWMAXIMIZED);

в h у тебя дескриптор броузера

---

← →
Ilg   (2004-02-14 19:18) [15]

А что дальше делать с этим дескриптором?

---

← →
nikkie ©   (2004-02-14 19:32) [16]

ничего с ним нельзя сделать. чушь он тебе сказал.

---

← →
Ilg   (2004-02-21 11:20) [17]

Так, что же делать?

---

← →
KilkennyCat ©   (2004-02-21 12:29) [18]

Мда... ну и чуши тут наворотили, и я в том числе...

Вообщем, час ковырялся: два варианта.
1) как-то передать свойство stayontop броузеру
2) запустить его непосредственно в форме.

А иначе никак. Окно стэйонтоп может перекрыться только подобным же окном, без разницы дочернее, или нет...

---

← →
nikkie ©   (2004-02-21 13:42) [19]

>Так, что же делать?
для глупой задачи не существует умных решений.

---

← →
xion ©   (2004-02-21 18:33) [20]

Постовь компонент TWebBrowser

---

← →
Ilg   (2004-02-22 14:02) [21]

KilkennyCat, а как можно передать свойство stayontop броузеру?
Не в курсе?

nikkie, предложи хотя бы глупое решение. А то только комментируешь...

---

← →
olookin ©   (2004-02-22 14:05) [22]

Setforegroundwindow совсем никак нельзя использовать?

Shellexecute()
h:=GetActivewindow;
Setforegroundwindow(h);

---

← →
nikkie ©   (2004-02-22 14:25) [23]

ты же информации никакой не даешь, что тебе можно предложить?

>У меня есть форма fsStayOnTop, развернутая на весь экран...
зачем? вероятнее всего это уже была нехорошая идея.

вариант [2] Norfolk тебе не подходит - а почему уж, кто знает...
вариант использования TWebBrowser ты почему-то игнорируешь...

---

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

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



Память: 0.49 MB
Время: 0.009 c