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了

From:http://tw.wingwit.com/Article/program/Delphi/201311/24848.html