Форум: "Основная";
Текущий архив: 2004.03.05;
Скачать: [xml.tar.bz2];
ВнизОткрытие браузера Найти похожие ветки
← →
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 вся ветка
Форум: "Основная";
Текущий архив: 2004.03.05;
Скачать: [xml.tar.bz2];
Память: 0.49 MB
Время: 0.006 c