掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
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.