ShellExecute

← →
Елена (2002-01-07 14:00) [0]

Открываю из своей программы Интернет-страничку функцией ShellExecute. Но если обозреватель уже открыт, то начинается загрузка именно в уже созданном окне. Как открыть страницу в новом окне?
Заранее благодарна.

← →
Delphimun (2002-01-07 14:17) [1]

Сначало запусти пустой iexplorer, а потом загружай страничку

← →
3d[Power] (2002-01-07 14:18) [2]

Кстати если при этой операции удерживать shift то откроется новое окно. А так помоему есть какието ключи к iexplore.exe чтобы в новом окне открывать

← →
Z (2002-01-07 18:31) [3]

Попробуй такую функцию:
(единственный минус - будет открыт IE, а не Default-броузер)

procedure LoadURL (URL: string);
var
Command, filename: pchar;
params, dir: string;
begin
command:="open" + #0;
Params:=URL+#0;
filename:="iexplore.exe" + #0;
dir:="C:\Program Files\Internet Explorer"+#0;
ShellExecute(form1.ClientHandle, command, filename, @params[1], @Dir[1], 1);
end;

← →
Елена (2002-01-08 09:17) [4]

Delphimun,
запускаю второй (пустой) Эксплорер, но страница все равно грузится в первый :o(

3d[Power],
Ваш совет работает, но он очень неудобен для пользователя.

Z,
Ваша функция вызывает нарушение доступа :(((

Мальчики, ну что же Вы советуете?

← →
avt (2002-01-08 15:39) [5]

Z был прав - у меня это работает!
...
var
Command, filename, params,dir: pchar;
begin
command:="open" + #0;
filename:="iexplore.exe" + #0;
dir:="C:\Program Files\Internet Explorer"+#0;
Params:="C:\WINDOWS\Рабочий стол\Заказ.htm"+#0;
ShellExecute(form1.ClientHandle, command, filename, params, Dir, SW_SHOW);
Params:="C:\WINDOWS\Рабочий стол\возможности.htm"+#0;
ShellExecute(form1.ClientHandle, command, filename, params, Dir, SW_SHOW);
{или так:
WinExec("C:\Program Files\Internet Explorer\iexplore.exe C:\WINDOWS\Рабочий стол\Заказ.htm",SW_SHOW);
WinExec("C:\Program Files\Internet Explorer\iexplore.exe C:\WINDOWS\Рабочий стол\возможности.htm",SW_SHOW);
}
end;

← →
SuperMama (2002-01-08 15:44) [6]

WinExec("C:\Program Files\Internet Explorer\iexplore.exe http://www.maol.ru",SW_SHOW);

Такая строка работает наУРА !

← →
Елена (2002-01-08 15:53) [7]

SuperMama,
пасибки.

← →
Vovchik (2002-01-08 17:00) [8]

>SuperMama
Это не есть хорошо ровно по одной причине: а вдруг найдётся некто, юзающий НетШкаф, например, а не експлорер? К тому же в вашем примере указан путь жёстко, тоже некрасиво.

← →
SuperMama (2002-01-08 17:57) [9]

>>Vovchik ©
Тогда в таких случаях делаеться так :

WinExec("start http://www.mail.ru",SW_SHOW);

! ! ! ! !

← →
Vovchik (2002-01-08 18:48) [10]

Это чего такое: WinExec("start http://www.mail.ru",SW_SHOW)???????????????????????
Оно не работает и не понятно, почему вообще должно работать???
Можно и ВинЕкзеком, но надо сначала подсмотреть в реестре, какая прога ассоциирована с расширением htm или html.

← →
SuperMama (2002-01-09 10:36) [11]

>>Vovchik ©

Ну ты просил !

>>> а вдруг найдётся некто, юзающий НетШкаф, например, а не експлорер?

Вот поэтому и WinExec("start http://www.mail.ru",SW_SHOW);

>>>но надо сначала подсмотреть в реестре, какая прога ассоциирована с расширением htm или html.

Так вот если по дефолту в вынях ничё нестоит (а значит ехплорер)
то тогда без "старт", жестко, а ежели чё другое то буить то что сасациированно !
ПОНЯЛ ?

← →
Vovchik (2002-01-09 14:11) [12]

Не совсем. Если start - это прога start.exe, то, например, у меня её нету, поскольку первым делом после установки виндов у удаляю всё дерьмо, которое устанавливается вместе с виндой. Поэтому этот способ тоже ...

← →
SuperMama (2002-01-09 16:01) [13]

ShellExecute Найти похожие ветки