delphi_zw 发表于 2012-11-24 11:23:10

单击按钮打开一个EXE，我要以窗口模式执行代码怎么写呢，在线等。。。。

本帖最后由 delphi_zw 于 2012-11-24 14:42 编辑

procedure TForm1.bsSkinButton1Click(Sender: TObject);
begin
if FileExists('xxx.exe ') then
else
ShowMessage('请放到安装目录再执行');
ShellExecute(0,'open','这程序是全屏显示的，我要以窗口模式打开，代码怎么写呢',nil,nil,SW_SHOWNA);
end;

delphi_zw 发表于 2012-11-24 14:42:31

基友们，咋整？？？？？？？？

aminghanhua 发表于 2012-11-28 14:14:51

试试SW_RESTORE    SW_SHOWNOACTIVATE
页: [1]
查看完整版本: 单击按钮打开一个EXE，我要以窗口模式执行代码怎么写呢，在线等。。。。