我要做一个程序,功能很简单,就是完成一个功能:当我点击一个按钮的时候,会自动去启动IE,并且在IE里面输入我要显示的一个固定的地址,请大家给出代码,谢谢!
昨天我提过这个问之后,大家教了我两个方法,一个是用WinExec函数,一个是用ShellExecute函数,但是好像WinExec需要绝对路径,不能在其他机器上通用,而ShellExecute确是从现有的打开的IE里面去打开,我想的是每次都重新打开一个IE,请大家再指教一把。
昨天我提过这个问之后,大家教了我两个方法,一个是用WinExec函数,一个是用ShellExecute函数,但是好像WinExec需要绝对路径,不能在其他机器上通用,而ShellExecute确是从现有的打开的IE里面去打开,我想的是每次都重新打开一个IE,请大家再指教一把。
var
reg : TRegistry;
iepath: string;
begin
try
reg:=TRegistry.Create;
reg.RootKey:=HKEY_LOCAL_MACHINE;
reg.OpenKey('\SOFTWARE\Classes\Applications\iexplore.exe\shell\open\command',false);
iepath:=reg.ReadString('');
finally
reg.Free;
end; iepath:= rightstr(iepath,length(iepath)-1);
iepath:= leftstr(iepath,pos('"',iepath)-1);
winexec(PChar(iepath+' www.sohu.com'),SW_SHOW);
end;
begin
shellExecute(Handle, 'open','http://www.hao123.com',nil,nil, SW_SHOWNORMAL);
end;