PR

モーションセンサーとShareStatusTask、MediaPlayerLauncherを使う

2011年11月15日(火)
PROJECT KySS

MediaPLayerLauncherを使って動画を再生する

[MediaPlayerLauncher起動]ボタンをクリックすると、メディアプレーヤーが起動し動画が再生されます。このMediaPlayerLauncherはエミュレーター上では音声だけが再生され、動画の再生はできませんでした。しかし、実機(IS12T)にデプロイした状態で実行すると、動画や音声が再生されます。再生されている動画をタップするとコントロールパネルが表示され、「休止」、「再生」、「早送り」、「巻き戻し」等が可能になります(図5)。

図5:メディアプレーヤーが起動し動画が再生されている(クリックで拡大)

動画は下記です。

※実際には音声が入っているのですが、この動画を撮影しているカメラに録音機能が付いていないため、音声は入っていません。

サンプル一式は、会員限定特典としてダウンロードできます。記事末尾をご確認ください。

プロジェクトの作成

VS 2010のメニューから[ファイル(F)/新規作成(N)/プロジェクト(P)]を選択します。次に、「Windows Phoneアプリケーション」を選択して、「名前(N)」に任意のプロジェクト名を指定します。ここでは「WP71_ MediaPlayerLauncher」という名前を付けています。Windows Phoneのバージョンは7.1を選択します。ソリューションエクスプローラー内にWMVというフォルダを作成して動画を追加しています。ダウンロードされたサンプルには動画ファイルは追加済みです

MainPage.xamlの編集とコントロールの追加

x:NameがPageTitleというTextBlockのTextプロパティに「MediaPlayerLauncher」と指定します。Style
属性を削除して、FontSize、Foreground、FontWeightプロパティを設定しています。

ツールボックスからデザイン画面上に、Buttonコントロールを1個配置します。ButtonコントロールのContentプロパティには、「MediaPlayerLauncher起動」と指定します(図6)。

図6:Buttonコントロールを1個配置した(クリックで拡大)

日本語表示設定

「ShareStatusTaskを使ってSNSでステータスを共有する」を参照してください。

書き出されるXAMLコードは省略します。

次に、MainPage.xamlを展開して表示される、MainPage.xaml.vbをダブルクリックしてリスト4のコードを記述します。

ロジックコードを記述する

リスト4 (MainPage.xaml.vb)

Option Strict On

ランチャーやチューザーに関するクラスの含まれる、Microsoft.Phone.Tasks名前空間をインポートします。
Imports Microsoft.Phone.Tasks

Partial Public Class MainPage
  Inherits PhoneApplicationPage

  ' コンストラクター
  Public Sub New()
    InitializeComponent()
  End Sub

[MediaPlayerLauncher起動]ボタンをクリックした時の処理

新しいMediaPlayerLauncherのインスタンス、mediaPlayerTaskオブジェクトを生成します。
  LocationプロパティにMediaLocationType.Installを指定します。これは、コンテンツとしてxapに動画ファイルが含まれている場合、つまりメディアファイルがアプリケーションのインストールディスクにある場合の動画を再生する方法です。分離ストレージにある場合は、MediaLocationType.Dataと指定します。
  Controlsプロパティにはメディアプレーヤーに表示するコントロールを指定します。MediaPlaybackControls.Allと指定して、すべてのコントロールパネルが表示されます。
  Mediaプロパティには、メディアプレーヤーアプリケーションの再生メディアを指定します。ここでは、WMVフォルダ内の、dougo320.wmvファイルを相対URIで指定しています。Showメソッドで実行します。
 
  Private Sub Button1_Click(sender As Object, e As System.Windows.RoutedEventArgs) Handles Button1.Click
    Dim mediaPlayerTask As New MediaPlayerLauncher
    With mediaPlayerTask
      .Location = MediaLocationType.Install
      .Controls = MediaPlaybackControls.All
      .Media = New Uri("WMV/dougo320.wmv", UriKind.Relative)
    End With
    mediaPlayerTask.Show()
  End Sub
End Class
Think IT会員限定特典
  • 「モーションセンサーを使って画像の向きを変える」サンプルプログラム

  • 「ShareStatusTaskを使ってSNSでステータスを共有する」サンプルプログラム

四国のSOHO。薬師寺国安(VBプログラマ)と、薬師寺聖(デザイナ、エンジニア)によるコラボレーション・ユニット。1997年6月、Dynamic HTMLとDirectAnimationの普及を目的として結成。共同開発やユニット名義での執筆活動を行う。XMLおよび.NETに関する著書や連載多数。最新刊は「Silverlight実践プログラミング」両名とも、Microsoft MVP for Development Platforms - Client App Dev (Oct 2003-Sep 2012)。http://www.PROJECTKySS.NET/

連載バックナンバー

Think IT会員サービス無料登録受付中

Think ITでは、より付加価値の高いコンテンツを会員サービスとして提供しています。会員登録を済ませてThink ITのWebサイトにログインすることでさまざまな限定特典を入手できるようになります。

Think IT会員サービスの概要とメリットをチェック

他にもこの記事が読まれています

モーションセンサーとShareStatusTask、MediaPlayerLauncherを使う | Think IT(シンクイット)

Think IT(シンクイット)

サイトに予期せぬエラーが起こりました。しばらくたってから再度お試しください。