掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
プロセス起動、終了後にイベントを発生させるには (ID:32852)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
スレッド使用しないならタイマーで監視かな? procedure TForm8.Timer1Timer(Sender: TObject); var ExitCode: Cardinal; begin if ProcessInfo.hProcess <> 0 then begin ExitCode := $FFFFFFFF; if GetExitCodeProcess(ProcessInfo.hProcess,ExitCode) = True then begin case ExitCode of 0: begin //終了 Caption := '終了'; end; 1: begin Caption := '異常終了'; end; 259: begin //起動中 Caption := '起動中'; end; end; end; end; end;
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.