现已打开了2个IE,其中一个是由我的一个软件打开的。控制这个由软件打开的IE的窗体大小(另一个不变)?下面这段代码怎么不能控制IE窗体的大小?就是dwX, dwY;dwXSize, dwYSize失效?
var
StartupInfo: TSTARTUPINFO;
ProcessInfo: TPROCESSINFORMATION;
begin
FillChar(StartupInfo, sizeof(startupInfo), #0);
StartupInfo.cb := sizeof(startupInfo);
startupinfo.dwFlags := (STARTF_USESIZE) or (STARTF_USEPOSITION);
startupinfo.dwX:=10;
startupinfo.dwY:=10;
startupinfo.dwXSize:=100;
startupinfo.dwYSize:=100;
if CreateProcess(nil, 'D:/Program Files/Internet Explorer/IEXPLORE.EXE d:/1.htm', nil, nil, False,
CREATE_NEW_CONSOLE or NORMAL_PRIORITY_CLASS, nil, nil, StartupInfo, ProcessInfo) then
ShowMessage('Success!')
else
GetLastError();
end;