そこで本稿では、最もシンプルな形のデータ・バインドを解説する。なお、掲載しているコードはWindowsストア・アプリのものだが、記述するコードはWindows Phone 8でも全く同じである。本稿のサンプルは「Windows Store app samples：MetroTips #31（Windows 8版）」と「Windows Store app samples：MetroTips #31（WP 8版）」からダウンロードできる。
●事前準備
Windows 8（以降、Win 8）向けのWindowsストア・アプリを開発するには、Win 8とVisual Studio 2012（以降、VS 2012）が必要である。これらを準備するには、第1回のTIPSを参考にしてほしい。本稿では64bit版Win 8 ProとVS 2012 Express for Windows 8を使用している。
Windows Phone 8向けのアプリを開発するには、SLAT対応CPUを搭載したPC上の64bit版Win 8 Pro以上とWindows Phone SDK 8.0（無償）が必要となる。
public class Clock : INotifyPropertyChanged{ // 現在時刻を表す文字列のプロパティ "HH:mm:ss" public string NowTime { get; private set; } // NowTimeプロパティが変化したときに発生させるイベントの定義 // なお、このプロパティはINotifyPropertyChangedインターフェイスの実装である public event PropertyChangedEventHandler PropertyChanged; public Clock() { Run(); // 時刻監視の無限ループを動かす } private async void Run() { DateTimeOffset lastTime; while (true) { await Task.Delay(10); // おおよそ10ミリ秒ごとにシステム時計をチェックする var nowTime = DateTimeOffset.Now; if (lastTime.Second != nowTime.Second) { // 秒が変わったら、プロパティに時刻をセットし、イベントを発火させる this.NowTime = nowTime.ToString("HH:mm:ss"); if (this.PropertyChanged != null) this.PropertyChanged(this, new PropertyChangedEventArgs("NowTime")); lastTime = nowTime; } } }}
Public Class Clock Implements INotifyPropertyChanged ' 現在時刻を表す文字列のプロパティ "HH:mm:ss" Private _nowTime As String Public Property NowTime As String Get Return _nowTime End Get Private Set(value As String) _nowTime = value End Set End Property ' NowTimeプロパティが変化したときに発生させるイベントの定義 Public Event PropertyChanged(sender As Object, e As PropertyChangedEventArgs) _ Implements INotifyPropertyChanged.PropertyChanged Public Sub New() Run() ' 時刻監視の無限ループを動かす End Sub Private Async Sub Run() Dim lastTime As DateTimeOffset While (True) Await Task.Delay(10) ' おおよそ10ミリ秒ごとにシステム時計をチェックする Dim nowTime = DateTimeOffset.Now If (lastTime.Second <> nowTime.Second) Then ' 秒が変わったら、プロパティに時刻をセットし、イベントを発火させる Me.NowTime = nowTime.ToString("HH:mm:ss") RaiseEvent PropertyChanged(Me, New PropertyChangedEventArgs("NowTime")) lastTime = nowTime End If End While End SubEnd Class
' 「デジタル時計」クラスのインスタンスPrivate _clock1 As Clock = New Clock()Public Sub New() ' この呼び出しはデザイナーで必要です。 InitializeComponent() ' InitializeComponent() 呼び出しの後で初期化を追加します。 ' 【1】「デジタル時計」クラスのイベント・ハンドラを設定する AddHandler _clock1.PropertyChanged, AddressOf clock1_PropertyChangedEnd Sub' 【1】「デジタル時計」クラスのプロパティが変化したときに呼び出されるハンドラPrivate Sub clock1_PropertyChanged(sender As Object, e As PropertyChangedEventArgs) textClock1.Text = _clock1.NowTimeEnd Sub
// 「デジタル時計」クラスのインスタンスprivate Clock _clock1 = new Clock();public MainPage(){ this.InitializeComponent(); …… 省略 …… // 【2】テキスト・ブロックへのバインディング var tbBind = new Binding() { Source = _clock1, Path = new PropertyPath("NowTime"), }; textClock2.SetBinding(TextBlock.TextProperty, tbBind);}
' 「デジタル時計」クラスのインスタンスPrivate _clock1 As Clock = New Clock()Public Sub New() ' この呼び出しはデザイナーで必要です。 InitializeComponent() ' InitializeComponent() 呼び出しの後で初期化を追加します。 …… 省略 …… ' 【2】テキスト・ブロックへのバインディング Dim tbBind = New Binding() With tbBind .Source = _clock1 .Path = New PropertyPath("NowTime") End With textClock2.SetBinding(TextBlock.TextProperty, tbBind)End Sub
