Открытие браузера

← →
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]

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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