Windows Media Player の ActiveX コントロールの例

注:

ActiveX コントロールは、DotNet フレームワークとそのコントロールを考慮して、最新バージョンの Microsoft Windows オペレーティングシステムで非推奨となりました。

MAXScript では引き続き ActiveX コントロールがサポートされますが、これらは MAXScript にアクセス可能なシステムにインストールおよび登録する必要があります。

ActiveX コントロールの代わりに、MAXScript では、3ds Max 9 以降において DotNet コントロールがサポートされます。

次の例は、Windows Media Player ActiveX コントロールがシステムに登録されている場合に動作します。

次の例では、Windows Media Player がロールアウトに作成されます。

[Pick Avi]ボタンを押してディスクから Avi ファイルを選択すると、avi ファイルをロードできます。
再生ボタンをクリックすると、「on timer...」イベントが呼び出されます。これにより、タイムスライダが Media Player 内のアクティブフレームと同期します。
[プロパティを表示]をクリックすると、すべてのプロパティがリストボックスに表示されます。
リストボックスからプロパティ名を選択すると、プロパティの値を取得できます。
リストボックスでプロパティを選択し、下に表示されたテキストに新しい値を入力することにより、プロパティを設定することもできます。

サンプルスクリプト

   rollout rActiveX "Windows Media Player in a Rollout"
   (
   local val
   activeXControl ax "{05589FA1-C356-11CE-BF01-00AA0055595A}" height:200 width:300 align:#left
   button btnPick "Pick Avi" pos:[320, 10]
   button btnProps "Show Properties" pos:[320, 50]
   listBox lbProps "Properties:" pos:[420, 10] width:170
   editText etValue "Value:" pos:[385, 170] width:200
   label lblStatus "" pos:[440, 190]
   on btnPick pressed do
   (
   local f = getOpenFileName caption:"Pick Any Avi File" types:"*.avi"
   if f != undefined then ax.FileName = f
   )
   on btnProps pressed do
   (
   showProperties ax
   lbProps.items = getPropNames ax
   )
   on lbProps selected sel do
   (
   if lbProps.items.count > 0 then
   (
   try ( val = getProperty ax lbProps.items[sel] )
   catch ( val == undefined )
   etValue.text = val as string
   )
   )
   on etValue entered text do
   (
   try( setProperty ax lbProps.selected (text as (classof val)) ) catch( etValue.text = "Set Failed")
   )
   on ax timer do
   (
   sliderTime = animationRange.start + (ax.CurrentPosition * (animationRange.end - animationRange.start))/(ax.selectionEnd - ax.selectionStart)
   )
   on ax PositionChange oldPos newPos do
   (
   format "[%, %]\n" oldPos newPos
   )
   )
   nf = newRolloutFloater "Test ActiveX" 650 300
   addRollout rActiveX nf

Windows Media Player の ActiveX コントロールの例

関連ページ