掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
CreateProcess(追記) (ID:10693)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
ふじっこ さんが書いていますが,超初心者(この名前はどうもなんとも... )さん のコードには Startupinfoの初期化部分が抜けているようですね. 例えば簡単に以下のコードでもテストなら十分でしょう. procedure TForm1.Button1Click(Sender: TObject); var SI: TStartupInfo; PI: TProcessInformation; Str: String; begin Str:='AAA BBB CCC'; GetStartupInfo(SI); CreateProcess(nil,PChar('C:\ABC.EXE '+Str),nil,nil,False,0,nil,nil,SI,PI); end; また,受けとる側のプログラムリストがありませんが,コマンドラインの値 を受取るには,例えば以下のようにします.この場合ABC.EXEというプログ ラムのOnShowに... procedure TForm1.FormShow(Sender: TObject); begin if ParamCount>=1 then begin Edit1.Text:=ParamStr(1); Edit2.Text:=ParamStr(2); Edit3.Text:=ParamStr(3); end; end;
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.