delphi调用应用程序显示位置问题

来源：百度知道 编辑：UC知道 时间：2024/06/19 23:40:23
delphi调用应用程序该如何控制打开的程序的显示位置呢，比如说要打开windows自带的“计算器”程序，如何控制其打开的位置呢。最好能把程序代码写出来。谢谢！

var
TestForm: THandle;
begin
TestForm:=FindWindow('SciCalc','计算器');
WinExec('calc.exe',SW_SHOWNORMAL);
setWindowPos(TestForm,HWND_NOTOPMOST,0,0,0,0,SWP_SHOWWINDOW or SWP_NOSIZE or SWP_NOMOVE);
end;

四个0,就是计算器窗体的位置, 自己设置一下就可以了