Вопрос по ShellExecute :) или WebBrowser.

← →
Serhij H. (2003-02-19 18:35) [0]

Здравствуйте, Мастера!
Для просмотра URL"а я вызываю
ShellExecute(GetDesktopWindow,"open",
PCharURLstring),nil,nil,SW_SHOWNORMAL).
Но если мне надо последовательно открыть 2 и более сайта, то все они вызываются в одном и том же окне браузера :(, и, соответственно, виден остается только один, последний.
Как можно решить эту проблему??? Спасибо.

← →
AGGRESSOR (2003-02-19 18:52) [1]

Можно так:
ShellExecute ("C:\Program Files\Internet Explorer\IEXPLORE.EXE" <YourURL>)
т.е. запустить обозреватель с параметром в виде нужной URL.

← →
Романов Р.В. © (2003-02-19 19:57) [2]

uses ComObj;

procedure TForm1.Button1Click(Sender: TObject);
var
Wb: OleVariant;
begin
Wb := CreateOleObject("InternetExplorer.Application");
Wb.Visible := True;
Wb.Navigate(" http://delphi.mastak.ru/forum/main.html",EmptyParam,EmptyParam,EmptyParam,EmptyParam);
end;

← →
Anatoly Podgoretsky © (2003-02-19 20:03) [3]

AGGRESSOR (19.02.03 18:52)
Не хорошее применение ShellExecute, он предназначен для запуска асоциированным с шелом програм, для обычного запуска надо использовать CreateProcess, но даже и в этом случае не является хорошим тоном запускать какой то чужой браузер, кроме заранее оговоренных случаев.

← →
AGGRESSOR (2003-02-20 10:38) [4]

> Anatoly Podgoretsky © (19.02.03 20:03)

Отвечу. Да, действительно, пример не совсем удачный, НО: если человек спрашивает о чем-то, я стараюсь отвечать так, чтобы он понял, что я имею в виду. Это, конечно, здорово, что Романов Р.В. © дал ему такой хороший код, даже не требующий доработки. Но я думаю, что этот человек не знает, что такое позднее связывание и OLE-технологии, он не посмотрит в справку по этой теме, а просто воспользуется кодом. Поэтому, возможно, следующий его вопрос будет "Как запустить Word?". Вот я и дал ответ, который работает, но не шибко хорошо, и надо бы порыться в хелпе, чтобы довести его до вида (см. выше). Пытання е? :)

Вопрос по ShellExecute :) или WebBrowser. Найти похожие ветки