delphi – 如何在Lazarus中为Mac执行相当于shellexecute()的操作

发布时间：2020-12-15 04:09:37 所属栏目：大数据来源：网络整理

导读：如何在Lazarus中为Mac执行相当于 shellexecute()的操作？解决方法 {这是代码来做到这一点.使用TProcess对象！ } uses Process;...procedure DoProcess;Var Proc : TProcess;Begin Proc := TProcess.Create(nil); try Proc.CommandLine := '/Applications/My

如何在Lazarus中为Mac执行相当于 shellexecute()的操作？

解决方法

{这是代码来做到这一点.使用TProcess对象！ }

uses Process;

...

procedure DoProcess;
Var
  Proc : TProcess;

Begin
  Proc := TProcess.Create(nil);
  try
    Proc.CommandLine := '/Applications/MyApp.app';

    PRoc.Options := Proc.Options + [poWaitOnExit];
    Proc.CommandLine := Proc.CommandLine + ' -someparam';
    PRoc.Execute;
  finally
    Proc.free;
  end;  
End;

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!