小编use*_*668的帖子

Delphi 7-ShellExecute命令在某些情况下不起作用

我做了一个游戏启动器,并使用了以下命令:

 procedure TFMain.ImgBtn1Click(Sender: TObject);
     begin
      ShellExecute(TForm(Owner).Handle, nil, 'starter.exe', '-lang rus', nil, SW_SHOWNORMAL);
     end;
Run Code Online (Sandbox Code Playgroud)

以“ -lang rus”作为参数。一切正常。游戏启动,语言为俄语(如果我输入“ -lang eng”,它仍然可以正常运行,并且游戏为英语)。

starter.exe应用程序是一个名为“”文件夹内 '。当我要将启动器重新放置在此文件夹之外时,请使用以下命令:

procedure TFMain.ImgBtn1Click(Sender: TObject);
     begin
      ShellExecute(TForm(Owner).Handle, nil, 'bin\starter.exe', '-lang rus', nil, SW_SHOWNORMAL);
     end;
Run Code Online (Sandbox Code Playgroud)

但是随后游戏没有启动。实际上什么也没发生。我应该改变什么?

delphi shellexecute

1
推荐指数
1
解决办法
6147
查看次数

标签 统计

delphi ×1

shellexecute ×1