Delphi exe实例之间传递cmd参数

{Unitpas}

通过这个单元的Button调用另一个实例

procedure TFormButtonClick(Sender: TObject);

begin

ShellExecute(Handle open projectexe HelloWorld nil SW_SHOWNORMAL);

end;

{Unitpas}

接受参数的实例

procedure TFormFormCreate(Sender: TObject);

begin

EditText := ParamStr();

end;

其实不是一定要在FormCreate中相应只要把ParamStr赋值给要用参数的地方就OK了ParamStr()是实例自己所以参数从开始而且传的参数是以空格分看的Hello WorldParamStr() = Hello了