掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
ShellExecuteで実行させたプログラムga終了まで次へ進めないようにするには？ (ID:18802)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
ShellExecuteで実行中のプログラムが終了するまで次に進めないようにするにはどうすれば良いのでしょうか？ 下記例ではIHKTSU.exeのプログラム実行中に「次の仕事」メッセージが表示されてしまうのです。Application.MessageBoxでのメッセージがアクティブ中は次へ進むことはできませんよね。そんな感じにしたいのです。よろしくお願いします。 var result:Integer; const strExeName = 'C:\TurboData\IHKTSU.exe'; begin result:=Application.MessageBox('変換しますか？','変換',mb_OKCancel); if result=IDOK then ShellExecute(Handle,nil, PChar(strExeName),nil,nil,SW_SHOW); result:=Application.MessageBox('次の仕事？','仕事',mb_OKCancel); end;
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.