掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
エージェントについて・・ (ID：17911)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
試しに、 グローバルに ACR : IAgentCtlRequest; と宣言して、 それぞれのSpeakをコールしている所を ACR := Character.Speak('メッセージ?', ''); に変更して、 Agent1RequestCompleteを次のように変更したらどうでしょう？ procedure TForm1.Agent1RequestComplete(Sender: TObject; const Request: IDispatch); begin if ACR <> Request then Exit; RequestPRocess := False; end;
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.