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

Как открыть из программы Internet Explorer   Найти похожие ветки 

← →
ilysha ©   (2002-02-19 11:25) [0]

Делаю таким образом:
ShellExecute(Handle, "open", PChar(" http://borland.com") ,nil, nil, SW_SHOW);

На самом деле, все отлично, но мне нужно открыть несколько окон IE, а как это сделать - не знаю.

Подскажите.

---

← →
Yozh ©   (2002-02-20 03:46) [1]

var
StartUpInfo:TStartUpInfo;
ProcessInfo:TProcessInformation;
begin
....
FillChar(StartUpInfo,SizeOf(StartUpInfo),0); StartUpInfo.cb:=SizeOf(StartUpInfo);
CreateProcess(nil,PChar(""C:\Program Files\Internet Explorer\iexplore.exe" -nohome "+URL),nil,nil,false,NORMAL_PRIORITY_CLASS,nil,nil,StartupInfo,ProcessInfo);

Где находится на клиентской машине IExplorer, узнаешь из реестра:
HKEY_CLASSES_ROOT\htmlfile\shell\open\command\@

см. также http://delphi.vitpc.com/asp/answer.asp?IDAnswer=900
(надо будет подключить модуль ComObj)

---

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

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



Память: 0.44 MB
Время: 0.007 c