名前 題名 ▼ Mr.XRAYさん > 自分で検索するのが面倒な方への追加情報です． > > Notify というは「通知」という意味です． > この場合，TMediaPlayer で何かメッセージが発生するとその通知を受け取る > イベント処理というわけです． > では，どんな通知かというと， > > [Vcl.MPlayer.TMediaPlayer.OnNotify] > http://docwiki.embarcadero.com/Libraries/XE5/ja/Vcl.MPlayer.TMediaPlayer.OnNotify > > ということで，Play，Rewind を実行すると，この OnNotiry イベントが呼ばれる > ことになります．すると，また Rewind, Play が実行されます． > すると，またこの OnNotiry イベントが実行されます． > てなわけで，このイベントからは，未来永劫にわたって，脱出できない． > ということになります． > > でも，プロジェクトが UP してあるということは，Delphi XE4 では正常に > 動作するのかも知れません．Delphi XE4 では，このコードでも正常に動作 > させる仕組みがあるのかも知れません． > 私のテストは，Windows 7 U64(SP1) + Delphi XE Pro ですので． GIF,JPEG,PNG画像ファイル及びLZH,ZIPファイルをアップロードできます.600 x 1200 ピクセルを超える画像は縮小表示されます(画像クリックで拡大表示). (上限122000(120k)バイト) 削除キー Link