M
Mclkings
Unregistered / Unconfirmed
GUEST, unregistred user!
我想实现这样的一个效果~,我想用CreateProcess打开一个应用程序
并设置其显示坐标和显示大小, 在CreateProcess中有这个设置啊
可是我设置不行,请指教 ~~
===============================
Var
STI:TStartUpInfo;
PIM:TProcessInformation;
Begin
FillChar(STI,sizeof(STI),0);
with STI do
begin
cb:=sizeof(STI);
dwFlags:=StartF_UsesTDHandles or STARTF_USESHOWWINDOW;
lptitle:= nil;
dwX := 0;
dwY := 0;
dwXSize := 100;
dwYSize := 100;
wShowWindow:=SW_SHOW;
end;
if CreateProcess(nil
,PChar('notepad.exe')
,nil
,nil
,False
,0
,nil
,nil
,STI
,PIM) then
// SetWindowPos(PIM.hProcess,HWND_TOPMOST,0,0,100,100,SWP_SHOWWINDOW);
============================
请各位帮忙了~~~.谢谢
并设置其显示坐标和显示大小, 在CreateProcess中有这个设置啊
可是我设置不行,请指教 ~~
===============================
Var
STI:TStartUpInfo;
PIM:TProcessInformation;
Begin
FillChar(STI,sizeof(STI),0);
with STI do
begin
cb:=sizeof(STI);
dwFlags:=StartF_UsesTDHandles or STARTF_USESHOWWINDOW;
lptitle:= nil;
dwX := 0;
dwY := 0;
dwXSize := 100;
dwYSize := 100;
wShowWindow:=SW_SHOW;
end;
if CreateProcess(nil
,PChar('notepad.exe')
,nil
,nil
,False
,0
,nil
,nil
,STI
,PIM) then
// SetWindowPos(PIM.hProcess,HWND_TOPMOST,0,0,100,100,SWP_SHOWWINDOW);
============================
请各位帮忙了~~~.谢谢