掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
エージェントについて・・ (ID：17902)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
ちなみにイベントは以下のようにしました。 RequestProcess: Boolean; をグローバルにして procedure TFormMain.AgentRequestStart(Sender: TObject; const Request: IDispatch); begin RequestProcess := True end; procedure TFormMain.AgentRequestComplete(Sender: TObject; const Request: IDispatch); begin RequestProcess := False; end; 呼び出し部分はこんな感じです。 Character.Show(False); Character.Speak('メッセージ1', ''); Character.Speak('メッセージ2', ''); ： Character.Speak('メッセージn', ''); while RequestPRocess do Application.ProcessMessages; // 処理 // この部分では別メニューを表示して音声を出すが、 // 以下のHide が途中で実行され、キャラが引っ込んでしまう・・・ // Character.Hide(false);
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.