グラフィックス 目次

Transcription

1 WPF チュートリアル Windows フォームでの WPF 複合コントロールのホスト Windows Presentation Foundation(WPF) は アプリケーションの作成に適した環境を提供する 但し Windows フォームのコードに多大な手間と時間を懸けた場合は コードを最初から記述し直すよりも 既存の Windows フォームアプリケーションを WPF で拡張する方が効率的と成る事も有る 一般的なシナリオとしては Windows フォームアプリケーション内に WPF を使用して実装したコントロールを埋め込む場合が挙げられる WPF コントロールのカスタマイズ方法の詳細に付いては コントロールのカスタマイズ を参照され度い 此のチュートリアルでは Windows フォームアプリケーションで WPF 複合コントロールをホストしてデータエントリを実行するアプリケーションに付いて段階的に説明する 複合コントロールは DLL にパッケージ化されて居る 此の一般的な手順は 更に複雑なアプリケーションやコントロールに拡張出来る 此のチュートリアルは 外観や機能が チュートリアル : WPF での Windows フォーム複合コントロールのホスト の例と粗同じに成る様に設計されて居る 主な違いは ホストする側とされる側が逆で有る事で有る チュートリアルは 2 つのセクションに分かれて居る 最初のセクションでは WPF 複合コントロールの実装に付いて簡単に説明する 2 番目のセクションでは Windows フォームアプリケーションで複合コントロールをホストし コントロールからイベントを受け取って コントロールのプロパティの一部にアクセスする方法に付いて詳しく説明する 此のチュートリアルでは 以下のタスクを行う WPF 複合コントロールを実装する Windows フォームホストアプリケーションを実装する WPF 複合コントロールの実装 此の例で使用される WPF 複合コントロールは ユーザーの名前と住所を受け取る単純なデータ入力フォームで有る ユーザーが 2 つのボタンの孰れかをクリックして入力操作が終了した事を示すと コントロールは入力情報をホストに返すカスタムイベントを発生させる レンダリングされたコントロールを次の図に示す -1- WPF 複合コントロール

2 プロジェクトの作成 1.Microsoft Visual Studio を起動して [ 新しいプロジェクト ] ダイアログボックスを開く 2.Visual Basic 又は Visual C# の Windows のカテゴリで [WPF ユーザーコントロールライブラリ ] テンプレートを選択する Express バージョンでは 上記のテンプレートは存在しないので 先ず クラスライブラリ ( 又は Windows フォームアプリケーション ) を選択し ユーザーコントロール (WPF) を追加して クラスライブラリ ( 又は Windows フォーム ) を削除する 3. 新しいプロジェクトに MyControls と謂う名前を付ける 4. 配置場所としては WindowsFormsHostingWpfControl 等 解り易い名前を付けた最上位フォルダーを指定する 此のフォルダーには後でホストアプリケーションも配置する 5.[OK] をクリックして プロジェクトを作成する 既定のプロジェクトには UserControl1 と謂う名前の 1 つのコントロールが含まれる 6. ソリューションエクスプローラーで UserControl1 の名前を MyControl1 に変更する プロジェクトは 次のシステム DLL を参照して居る必要が有る 此等の DLL の孰れかが既定で含まれて居ない場合は プロジェクトに追加する PresentationCore PresentationFramework System WindowsBase ユーザーインターフェイスの作成 複合コントロールのユーザーインターフェイス (UI) は Extensible Application Markup Language (XAML) を使用して実装される 複合コントロールの UI は 5 つの TextBox 要素で構成されて居る 各 TextBox 要素には ラベルとして使用される TextBlock 要素が関連付けられて居る 下部には [OK] 及び [Cancel] と謂う 2 つの Button 要素が有る ユーザーが孰れかのボタンをクリックすると コントロールは情報をホストに返すカスタムイベントを発生させる 基本的なレイアウト Grid 要素には 様々な UI 要素が格納される Grid を使用して HTML で Table 要素を使用する場合と殆ど同じ方法で 複合コントロールのコンテンツを配置出来る WPF には Table 要素も有るが Grid の方が軽量で 単純なレイアウトタスクに適して居る 次の XAML に基本的なレイアウトを示す 此の XAML では Grid 要素に列と行の数を指定する事に依り コントロールの全体的な構造を定義して居る MyControl1.xaml で 既存の XAML を次の XAML で置き換える (Grid 部分 ) -2-

3 XAML <Grid xmlns=" xmlns:x=" x:class="mycontrols.mycontrol1" Background="#DCDCDC" Width="375" Height="250" Name="rootElement" Loaded="Init"> <Grid.ColumnDefinitions> <ColumnDefinition Width="Auto" /> <ColumnDefinition Width="Auto" /> <ColumnDefinition Width="Auto"/> <ColumnDefinition Width="Auto"/> </Grid.ColumnDefinitions> <Grid.RowDefinitions> <RowDefinition Height="Auto" /> <RowDefinition Height="Auto" /> <RowDefinition Height="Auto" /> <RowDefinition Height="Auto" /> <RowDefinition Height="Auto" /> <RowDefinition Height="Auto" /> </Grid.RowDefinitions>... </Grid> UI 要素のスタイル設定 データ入力フォームの多くの要素は 外観が似て居る 詰まり 其等の要素では幾つかのプロパティの設定が同一に成る 前の XAML では 各要素の属性を個別に設定するのではなく Style 要素を使用して 複数の要素のクラスの標準プロパティ設定を定義して居る 此の方法では コントロールの複雑さが軽減され 1 つのスタイル属性を使用して複数の要素の外観を変更出来る Style 要素は Grid 要素の Resources プロパティに格納される為 コントロール内の総ての要素で使用出来る スタイルに名前が付いて居る場合は 其のスタイルの名前に設定された Style 要素を追加する事に依って 要素に其のスタイルを適用する 名前が付いて居ないスタイルは 要素の既定のスタイルに成る WPF のスタイルの詳細に付いては スタイルとテンプレート を参照され度い 複合コントロールの Style 要素を次の XAML に示す スタイルが要素に何の様に適用されるかに付いては 前の XAML を参照され度い 例えば 最後の TextBlock 要素には inlinetext スタイルが適用され 最後の TextBox 要素は既定のスタイルを使用する MyControl1.xaml で 次の XAML を Grid の開始要素の直後に追加する -3-

4 XAML <Grid.Resources> <Style x:key="inlinetext" TargetType="x:Type TextBlock"> <Setter Property="Margin" Value="10,5,10,0"/> <Setter Property="FontWeight" Value="Normal"/> <Setter Property="FontSize" Value="12"/> </Style> <Style x:key="titletext" TargetType="x:Type TextBlock"> <Setter Property="DockPanel.Dock" Value="Top"/> <Setter Property="FontWeight" Value="Bold"/> <Setter Property="FontSize" Value="14"/> <Setter Property="Margin" Value="10,5,10,0"/> </Style> <Style TargetType="x:Type Button"> <Setter Property="Margin" Value="10,5,10,0"/> <Setter Property="Width" Value="60"/> </Style> <Style TargetType="x:Type TextBox"> <Setter Property="Margin" Value="10,5,10,0"/> </Style> </Grid.Resources> TextBlock 要素と TextBox 要素のグリッドへの追加 グリッドに UI 要素を配置するには 其の要素の Row プロパティと Column プロパティに適切な行番号と列番号を設定する 行と列の番号付けは 0 から始まる点に注意する ColumnSpan プロパティを設定する事に依って 1 つの要素を複数の列に跨がって表示する事が出来る Grid 要素の詳細に付いては 方法 : グリッド要素を作成する を参照され度い 次の XAML では 複合コントロールの TextBox 要素と TextBlock 要素に 要素をグリッドに適切に配置する為の Row プロパティと Column プロパティを設定して居る MyControl1.xaml で 次の XAML を Grid 要素内に追加する XAML <TextBlock Grid.Column="0" Grid.Row="0" Grid.ColumnSpan="4" Margin="10,5,10,0" HorizontalAlignment="Center" Style="StaticResource titletext">simple WPF Control</TextBlock> <TextBlock Grid.Column="0" Grid.Row="1" Style="StaticResource inlinetext" Name="nameLabel">Name</TextBlock> <TextBox Grid.Column="1" Grid.Row="1" -4-

5 Grid.ColumnSpan="3" Name="txtName"/> <TextBlock Grid.Column="0" Grid.Row="2" Style="StaticResource inlinetext" Name="addressLabel">Street Address</TextBlock> <TextBox Grid.Column="1" Grid.Row="2" Grid.ColumnSpan="3" Name="txtAddress"/> <TextBlock Grid.Column="0" Grid.Row="3" Style="StaticResource inlinetext" Name="cityLabel">City</TextBlock> <TextBox Grid.Column="1" Grid.Row="3" Width="100" Name="txtCity"/> <TextBlock Grid.Column="2" Grid.Row="3" Style="StaticResource inlinetext" Name="stateLabel">State</TextBlock> <TextBox Grid.Column="3" Grid.Row="3" Width="50" Name="txtState"/> <TextBlock Grid.Column="0" Grid.Row="4" Style="StaticResource inlinetext" Name="zipLabel">Zip</TextBlock> <TextBox Grid.Column="1" Grid.Row="4" Width="100" Name="txtZip"/> [OK] 及び [Cancel] ボタンの追加 複合コントロール上の最後の要素は Grid の最後の行の最初の 2 つの列を専有する [OK] 及び [Cancel] の Button 要素で有る 此等の要素は 共通のイベントハンドラーで有る ButtonClicked 及び 前の XAML で定義された既定の Button スタイルを使用する MyControl1.xaml で 次の XAML を最後の TextBox 要素の後に追加する 複合コントロールの XAML 部分は此れで完成で有る -5-

6 XAML <Button Grid.Row="5" Grid.Column="0" Name="btnOK" Click="ButtonClicked">OK</Button> <Button Grid.Row="5" Grid.Column="1" Name="btnCancel" Click="ButtonClicked">Cancel</Button> 分離コードファイルの実装 分離コードファイル MyControl1.xaml.vb 又は MyControl1.xaml.cs は 3 つの基本的なタスクを実装する 1. ユーザーがボタンの孰れかをクリックした時に発生するイベントを処理する 2.TextBox 要素からデータを取得し 其のデータをカスタムイベント引数オブジェクトにパッケージ化する 3. ユーザーが操作を終了した事をホストに通知し 入力データをホストに渡すカスタム OnButtonClick イベントを発生させる コントロールは 外観を変更する為の色とフォントのプロパティも幾つか公開する Windows フォームコントロールをホストする為に使用される WindowsFormsHost クラスとは異なり ElementHost クラスはコントロールの Background プロパティ而巳を公開する 此のコード例と チュートリアル : WPF での Windows フォーム複合コントロールのホスト で説明した例の類似性を保持する為に 此のコントロールでは残りのプロパティを直接公開する 分離コードファイルの基本構造 分離コードファイルは MyControl1 及び MyControlEventArgs と謂う 2 つのクラスを格納する単一の名前空間で有る MyControls で構成されて居る Visual Basic Public Class MyControl1 End Class Public Class MyControlEventArgs Inherits EventArgs End Class Visual C# namespace MyControls -6-

7 public class MyControl1 //... public class MyControlEventArgs : EventArgs //... 最初のクラスで有る MyControl1 は MyControl1.xaml で定義された UI の機能を実装するコードを格納する部分クラスで有る MyControl1.xaml が解析されると 其の XAML は同じ部分クラスに変換され 2 つの部分クラスがマージされて コンパイルされたコントロールを形成する 此の為 分離コードファイル内のクラス名は MyControl1.xaml に割り当てられたクラス名と一致する必要が有り コントロールのルート要素から継承する必要が有る 2 番目のクラスで有る MyControlEventArgs はホストにデータを返送する為に使用されるイベント引数クラスで有る MyControl1.xaml.vb 又は MyControl1.xaml.cs を開く 次の名前に合わせて既存のクラス宣言を変更し Grid を継承する (System.Windows.Controls 名前空間をインポートして置くと便利 ) Visual Basic Imports System.Windows Imports System.Windows.Controls Imports System.Windows.Media Partial Public Class MyControl1 Inherits Grid Visual C# using System.Windows using System.Windows.Controls using System.Windows.Media public partial class MyControl1 : Grid コントロールの初期化 此のコードでは 次の基本タスクを実装する プライベートイベントで有る OnButtonClick 及び 其のイベントに関連付けられたデリゲートで有る MyControlEventHandler を宣言する ユーザーのデータを格納する複数のプライベートグローバル変数を作成する 此のデータは 対応するプロパティを通じて公開される コントロールの Loaded イベントのハンドラー Init を実装する 此のハンドラーは グローバル変数に MyControl1.xaml で定義された値を割り当てる事に依って グローバル変数を初期化する 初期化するには 一般的な TextBlock の要素で有る namelabel に割り当てられた Name を使用して 此の要素のプロパティの設定にアクセスする -7-

8 既存のコンストラクターを削除し 次のコードを MyControl1 クラスに追加する Visual Basic Public Delegate Sub MyControlEventHandler(ByVal sender As Object, _ ByVal args As MyControlEventArgs) Public Event OnButtonClick As MyControlEventHandler Private _fontweight As FontWeight Private _fontsize As Double Private _fontfamily As FontFamily Private _fontstyle As FontStyle Private _foreground As SolidColorBrush Private _background As SolidColorBrush Private Sub Init(ByVal sender As Object, ByVal e As EventArgs) _fontweight = namelabel.fontweight _fontsize = namelabel.fontsize _fontfamily = namelabel.fontfamily _fontstyle = namelabel.fontstyle _foreground = CType(nameLabel.Foreground, SolidColorBrush) _background = CType(nameLabel.Background, SolidColorBrush) Visual C# public delegate void MyControlEventHandler(object sender, MyControlEventArgs args); public event MyControlEventHandler OnButtonClick; private FontWeight _fontweight; private double _fontsize; private FontFamily _fontfamily; private FontStyle _fontstyle; private SolidColorBrush _foreground; private SolidColorBrush _background; private void Init(object sender, EventArgs e) //They all have the same style, so use namelabel to set initial values. _fontweight = namelabel.fontweight; _fontsize = namelabel.fontsize; _fontfamily = namelabel.fontfamily; _fontstyle = namelabel.fontstyle; _foreground = (SolidColorBrush)nameLabel.Foreground; _background = (SolidColorBrush)rootElement.Background; ボタンのクリックイベントの処理 ユーザーは [OK] ボタン 又は [Cancel] ボタンをクリックする事に依り データ入力タスクを完了した事を示す 此等のボタンは両方とも 同じ Click イベントハンドラーで有る ButtonClicked を使用する 此等のボタンには夫々 btnok 又は btncancel と謂う名前が付けられて居る 此れに依り ハン -8-

9 ドラーが sender 引数の値を調べる事に依って 孰れのボタンがクリックされたかを判断する事が出来る ハンドラーは次の処理を行う TextBox 要素からのデータを格納する MyControlEventArgs オブジェクトを作成する ユーザーが [Cancel] ボタンをクリックした場合に MyControlEventArgs オブジェクトの IsOK プロパティを false に設定する ユーザーが操作を終了した事をホストに示す OnButtonClick イベントを発生させ 収集したデータを渡す 次のコードを MyControl1 クラスの Init メソッドの後に追加する ( 此のコードを記述する前に 後述の MyControlEventArgs クラスを記述して置いた方が良い ) Visual Basic Private Sub ButtonClicked(ByVal sender As Object, ByVal e As RoutedEventArgs) Dim retvals As MyControlEventArgs = New MyControlEventArgs( _ True, _ txtname.text, _ txtaddress.text, _ txtcity.text, _ txtstate.text, _ txtzip.text) If sender.equals(btncancel) Then retvals.isok = False End If RaiseEvent OnButtonClick(Me, retvals) Visual C# private void ButtonClicked(object sender, RoutedEventArgs e) MyControlEventArgs retvals = new MyControlEventArgs( true, txtname.text, txtaddress.text, txtcity.text, txtstate.text, txtzip.text); if (sender == btncancel) retvals.isok = false; if (OnButtonClick!= null) OnButtonClick(this, retvals); -9-

10 プロパティの作成 クラスの残りの部分では単純に 前に説明したグローバル変数に対応するプロパティを公開する プロパティが変更されると set アクセサーが対応する要素のプロパティを変更し 基に成るグローバル変数を更新する事に依って コントロールの外観を変更する MyControl1 クラスに次のコードを追加する Visual Basic Public Property MyControl_FontWeight() As FontWeight Get Return _fontweight End Get Set(value As FontWeight) _fontweight = value namelabel.fontweight = value addresslabel.fontweight = value citylabel.fontweight = value statelabel.fontweight = value ziplabel.fontweight = value End Set End Property Public Property MyControl_FontSize() As Double Get Return _fontsize End Get Set(value As Double) _fontsize = value namelabel.fontsize = value addresslabel.fontsize = value citylabel.fontsize = value statelabel.fontsize = value ziplabel.fontsize = value End Set End Property Public Property MyControl_FontStyle() As FontStyle Get Return _fontstyle End Get Set(value As FontStyle) _fontstyle = value namelabel.fontstyle = value addresslabel.fontstyle = value citylabel.fontstyle = value statelabel.fontstyle = value ziplabel.fontstyle = value -10-

11 End Set End Property Public Property MyControl_FontFamily() As FontFamily Get Return _fontfamily End Get Set(value As FontFamily) _fontfamily = value namelabel.fontfamily = value addresslabel.fontfamily = value citylabel.fontfamily = value statelabel.fontfamily = value ziplabel.fontfamily = value End Set End Property Public Property MyControl_Background() As SolidColorBrush Get Return _background End Get Set(value As SolidColorBrush) _background = value rootelement.background = value End Set End Property Public Property MyControl_Foreground() As SolidColorBrush Get Return _foreground End Get Set(value As SolidColorBrush) _foreground = value namelabel.foreground = value addresslabel.foreground = value citylabel.foreground = value statelabel.foreground = value ziplabel.foreground = value End Set End Property Visual C# public FontWeight MyControl_FontWeight get return _fontweight; set _fontweight = value; -11-

12 namelabel.fontweight = value; addresslabel.fontweight = value; citylabel.fontweight = value; statelabel.fontweight = value; ziplabel.fontweight = value; public double MyControl_FontSize get return _fontsize; set _fontsize = value; namelabel.fontsize = value; addresslabel.fontsize = value; citylabel.fontsize = value; statelabel.fontsize = value; ziplabel.fontsize = value; public FontStyle MyControl_FontStyle get return _fontstyle; set _fontstyle = value; namelabel.fontstyle = value; addresslabel.fontstyle = value; citylabel.fontstyle = value; statelabel.fontstyle = value; ziplabel.fontstyle = value; public FontFamily MyControl_FontFamily get return _fontfamily; set _fontfamily = value; namelabel.fontfamily = value; addresslabel.fontfamily = value; citylabel.fontfamily = value; statelabel.fontfamily = value; ziplabel.fontfamily = value; public SolidColorBrush MyControl_Background -12-

13 get return _background; set _background = value; rootelement.background = value; public SolidColorBrush MyControl_Foreground get return _foreground; set _foreground = value; namelabel.foreground = value; addresslabel.foreground = value; citylabel.foreground = value; statelabel.foreground = value; ziplabel.foreground = value; ホストへのデータの返送 ファイルの最後のコンポーネントは 収集されたデータをホストに返送する為に使用される MyControlEventArgs クラスで有る MyControls 名前空間に次のコードを追加する 此の実装は簡単なので 此れ以上の説明はしない Visual Basic Public Class MyControlEventArgs Inherits EventArgs Private _IsOK As Boolean Private _Name As String Private _StreetAddress As String Private _City As String Private _State As String Private _Zip As String Public Sub New(result As Boolean, name As String, address As String, city As String, _ state As String, zip As String) _IsOK = result _Name = name _StreetAddress = address _City = city -13-

14 _State = state _Zip = zip Public Property MyName() As String Get Return _Name End Get Set(value As String) _Name = value End Set End Property Public Property MyStreetAddress() As String Get Return _StreetAddress End Get Set(value As String) _StreetAddress = value End Set End Property Public Property MyCity() As String Get Return _City End Get Set(value As String) _City = value End Set End Property Public Property MyState() As String Get Return _State End Get Set(value As String) _State = value End Set End Property Public Property MyZip() As String Get Return _Zip End Get Set(value As String) _Zip = value End Set End Property -14-

15 Public Property IsOK() As Boolean Get Return _IsOK End Get Set(value As Boolean) _IsOK = value End Set End Property End Class Visual C# public class MyControlEventArgs : EventArgs private string _Name; private string _StreetAddress; private string _City; private string _State; private string _Zip; private bool _IsOK; public MyControlEventArgs(bool result, string name, string address, string city, string state, string zip) _IsOK = result; _Name = name; _StreetAddress = address; _City = city; _State = state; _Zip = zip; public string MyName get return _Name; set _Name = value; public string MyStreetAddress get return _StreetAddress; set _StreetAddress = value; public string MyCity get return _City; set _City = value; public string MyState get return _State; -15-

16 set _State = value; public string MyZip get return _Zip; set _Zip = value; public bool IsOK get return _IsOK; set _IsOK = value; ソリューションをビルドする ビルドでは MyControls.dll と謂う名前の DLL が生成される Express バージョンでは プロジェクトのプロパティで アプリケーションの種類を クラスライブラリに変更してから ビルドする (Windows フォームで作成した場合 ) Windows フォームホストアプリケーションの実装 Windows フォームホストアプリケーションは ElementHost オブジェクトを使用して WPF 複合コントロールをホストする アプリケーションは OnButtonClick イベントを処理して 複合コントロールからデータを受け取る アプリケーションには コントロールの外観を変更する為に使用出来るオプションのボタンのセットも有る 次の図は アプリケーションを示して居る -16-

17 プロジェクトの作成 1.Visual Studio を起動して [ 新しいプロジェクト ] ダイアログボックスを開く 2.Visual Basic 又は Visual C# の Windows のカテゴリで [Windows フォームアプリケーション ] テンプレートを選択する 3. 新しいプロジェクトに WFHost と謂う名前を付ける 4. 配置場所としては MyControls プロジェクトの配置先と同じ最上位フォルダーを指定する 別々に保存した場合は 前述のプロジェクトで作成した MyControls.dll を此のプロジェクトのプロジェクトフォルダーにコピーして置くと良い 5.[OK] をクリックして プロジェクトを作成する MyControl1 及び 他のアセンブリを含む DLL への参照も追加する必要が有る 1. ソリューションエクスプローラーで プロジェクト名を右クリックし [ 参照の追加 ] を選択する 2.[ 参照 ] タブをクリックし MyControls.dll を格納して居るフォルダーを参照する 此のチュートリアルの場合は MyControls bin Debug フォルダーで有る 3.MyControls.dll を選択し [OK] をクリックする 4. 次のアセンブリへの参照を追加する ( 孰れも.NET Framework タブに有る ) PresentationCore PresentationFramework System.Xaml WindowsBase WindowsFormsIntegration アプリケーションのユーザーインターフェイスの実装 Windows フォームアプリケーションの UI には WPF 複合コントロールと対話する為の幾つかのコントロールが含まれて居る 1.Windows フォームデザイナーで Form1 を開く 2. コントロールを配置する為にフォームを拡げる 3. フォームの右上隅に WPF 複合コントロールを保持する為の System.Windows.Forms.Panel コントロールを追加する 4. 次の System.Windows.Forms.GroupBox コントロールをフォームに追加する -17-

18 name groupbox1 groupbox2 groupbox3 groupbox4 groupbox5 groupbox6 groupbox7 背景色前景色フォントサイズフォントファミリフォントスタイルフォントの太さコントロールからのデータ テキスト 5. 次の System.Windows.Forms.RadioButton コントロールを System.Windows.Forms.GroupBox コントロールに追加する GroupBox name テキスト groupbox1 radiobackgroundoriginal 標準 groupbox1 radiobackgroundlightgreen ライトグリーン groupbox1 radiobackgroundlightsalmon ライトサーモン groupbox2 radioforegroundoriginal 標準 groupbox2 radioforegroundred 赤 groupbox2 radioforegroundyellow 黄 groupbox3 radiosizeoriginal 標準 groupbox3 radiosizeten 10 groupbox3 radiosizetwelve 12 groupbox4 radiofamilyoriginal 標準 groupbox4 radiofamilytimes Times New Roman groupbox4 radiofamilywingdings WingDings groupbox5 radiostyleoriginal 標準 groupbox5 radiostyleitalic イタリック体 groupbox6 radioweightoriginal 標準 groupbox6 radioweightbold 太字 6. 次の System.Windows.Forms.Label コントロールを最後の System.Windows.Forms.GroupBox に追加する 此等のコントロールは WPF 複合コントロールから返されたデータを表示する GroupBox name テキスト groupbox7 lblname 名前 : groupbox7 lbladdress 番地 : groupbox7 lblcity 市区町村 : groupbox7 lblstate 都道府県 : groupbox7 lblzip 郵便番号 : フォームの初期化 通常は フォームの Load イベントハンドラー内にホスティングコードを実装する 次のコードは サンプルの Load イベントハンドラー WPF 複合コントロールの Loaded イベントのハンドラー 及び 後で使用する幾つかのグローバル変数の宣言を示す -18-

19 Windows フォームデザイナーで フォームをダブルクリックして Load イベントハンドラーを作成する Form1.vb 又は Form1.cs の先頭に 次の Imports 又は using ステートメントを追加する Visual Basic Imports System.Windows Imports System.Windows.Forms.Integration Imports System.Windows.Media Visual C# using System.Windows; using System.Windows.Forms.Integration; using System.Windows.Media; 既存の Form1 クラスの内容を次のコードで置き換える Visual Basic Public Class Form1 Private ctrhost As ElementHost Private wpfaddressctrl As MyControls.MyControl1 Private initfontweight As FontWeight Private initfontsize As Double Private initfontstyle As FontStyle Private initbackbrush As SolidColorBrush Private initforebrush As SolidColorBrush Private initfontfamily As FontFamily Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) _ Handles MyBase.Load ctrhost = New ElementHost() ctrhost.dock = DockStyle.Fill Panel1.Controls.Add(ctrHost) wpfaddressctrl = New MyControls.MyControl1() wpfaddressctrl.initializecomponent() ctrhost.child = wpfaddressctrl AddHandler wpfaddressctrl.onbuttonclick, AddressOf avaddressctrl_onbuttonclick AddHandler wpfaddressctrl.loaded, AddressOf avaddressctrl_loaded Private Sub avaddressctrl_loaded(byval sender As Object, ByVal e As EventArgs) initbackbrush = CType(wpfAddressCtrl.MyControl_Background, SolidColorBrush) initforebrush = wpfaddressctrl.mycontrol_foreground initfontfamily = wpfaddressctrl.mycontrol_fontfamily initfontsize = wpfaddressctrl.mycontrol_fontsize initfontweight = wpfaddressctrl.mycontrol_fontweight initfontstyle = wpfaddressctrl.mycontrol_fontstyle -19-

20 Visual C# private ElementHost ctrlhost; private MyControls.MyControl1 wpfaddressctrl; System.Windows.FontWeight initfontweight; double initfontsize; System.Windows.FontStyle initfontstyle; System.Windows.Media.SolidColorBrush initbackbrush; System.Windows.Media.SolidColorBrush initforebrush; System.Windows.Media.FontFamily initfontfamily; public Form1() InitializeComponent(); private void Form1_Load(object sender, EventArgs e) ctrlhost = new ElementHost(); ctrlhost.dock = DockStyle.Fill; panel1.controls.add(ctrlhost); wpfaddressctrl = new MyControls.MyControl1(); wpfaddressctrl.initializecomponent(); ctrlhost.child = wpfaddressctrl; wpfaddressctrl.onbuttonclick += new MyControls.MyControl1.MyControlEventHandler( avaddressctrl_onbuttonclick); wpfaddressctrl.loaded += new RoutedEventHandler( avaddressctrl_loaded); void avaddressctrl_loaded(object sender, EventArgs e) initbackbrush = (SolidColorBrush)wpfAddressCtrl.MyControl_Background; initforebrush = wpfaddressctrl.mycontrol_foreground; initfontfamily = wpfaddressctrl.mycontrol_fontfamily; initfontsize = wpfaddressctrl.mycontrol_fontsize; initfontweight = wpfaddressctrl.mycontrol_fontweight; initfontstyle = wpfaddressctrl.mycontrol_fontstyle; 前のコードの Form1_Load メソッドは WPF コントロールをホストする為の一般的な手順を示す 1. 新しい ElementHost オブジェクトを作成する 2. コントロールの Dock プロパティを DockStyle.Fill に設定する 3.ElementHost コントロールを Panel コントロールの Controls コレクションに追加する -20-

21 4.WPF コントロールのインスタンスを作成する 5.ElementHost コントロールの Child プロパティにコントロールを割り当てる事に依って フォーム上で複合コントロールをホストする Form1_Load メソッドの残りの 2 行は 2 つのコントロールイベントにハンドラーをアタッチする OnButtonClick は ユーザーが [OK] 又は [Cancel] ボタンをクリックした時に複合コントロールが発生させるカスタムイベントで有る 此のイベントを処理して ユーザーの応答を取得し ユーザーが指定したデータを総て収集する Loaded は WPF コントロールが完全に読み込まれた時に此のコントロールが発生させる標準のイベントで有る 此処で此のイベントを使用するのは 此の例ではコントロールからのプロパティを使用して複数のグローバル変数を初期化する必要が有るからで有る フォームの Load イベントが発生した時点では コントロールは完全には読み込まれて居らず 此等の値は未だ null に設定されて居る 此等のプロパティにアクセスするには コントロールの Loaded イベントが発生する迄待つ必要が有る 前のコードでは Loaded イベントハンドラーが示されて居る OnButtonClick ハンドラーに付いては次のセクションで説明する OnButtonClick の処理 OnButtonClick イベントは ユーザーが [OK] 又は [Cancel] ボタンをクリックした時に発生する イベントハンドラーは イベント引数の IsOK フィールドをチェックして 孰れのボタンがクリックされたかを判断する lbl data 変数は 前に説明した Label コントロールに対応する ユーザーが [OK] ボタンをクリックすると コントロールの TextBox コントロールからのデータは 対応する Label コントロールに割り当てられる ユーザーが [Cancel] ボタンをクリックした場合 Text の値は既定の文字列に設定される 次のボタンクリックイベントハンドラーコードを Form1 クラスに追加する Visual Basic Private Sub avaddressctrl_onbuttonclick(byval sender As Object, _ ByVal args As MyControls.MyControlEventArgs) If args.isok Then lblname.text = " 名前 :" + args.myname lbladdress.text = " 番地 :" + args.mystreetaddress lblcity.text = " 市区町村 :" + args.mycity lblstate.text = " 都道府県 :" + args.mystate lblzip.text = " 郵便番号 :" + args.myzip Else lblname.text = " 名前 :" lbladdress.text = " 番地 :" lblcity.text = " 市区町村 :" lblstate.text = " 都道府県 :" lblzip.text = " 郵便番号 :" End If -21-

22 Visual C# void avaddressctrl_onbuttonclick( object sender, MyControls.MyControl1.MyControlEventArgs args) if (args.isok) lblname.text = " 名前 :" + args.myname; lbladdress.text = " 番地 : + args.mystreetaddress; lblcity.text = " 市区町村 :" + args.mycity; lblstate.text = " 都道府県 :" + args.mystate; lblzip.text = " 郵便番号 :" + args.myzip; else lblname.text = " 名前 :; lbladdress.text = " 番地 :"; lblcity.text = " 市区町村 :"; lblstate.text = " 都道府県 :"; lblzip.text = " 郵便番号 :"; アプリケーションをビルドして実行する WPF 複合コントロールに任意のテキストを追加し [OK] をクリックする 其のテキストがラベルに表示される 此の時点で オプションボタンの処理用にコードは追加されて居ない コントロールの外観の変更 フォームの RadioButton コントロールを使用すると ユーザーは WPF 複合コントロールの前景と背景の色 及び 複数のフォントプロパティを変更出来る 背景色は ElementHost オブジェクトに依って公開される 残りのプロパティは コントロールのカスタムプロパティとして公開される フォーム上の各 RadioButton コントロールをダブルクリックして CheckedChanged イベントハンドラーを作成する CheckedChanged イベントハンドラーを次のコードで置き換える Visual Basic Private Sub radiobackgroungoriginal_checkedchanged(sender As System.Object, _ e As System.EventArgs) Handles radiobackgroungoriginal.checkedchanged wpfaddressctrl.mycontrol_background = initbackbrush Private Sub radiobackgrounglightgreen_checkedchanged(sender As System.Object, _ e As System.EventArgs) Handles radiobackgrounglightgreen.checkedchanged wpfaddressctrl.mycontrol_background = New SolidColorBrush(Colors.LightGreen) -22-

23 Private Sub radiobackgrounglightsalmon_checkedchanged(sender As System.Object, _ e As System.EventArgs) Handles radiobackgrounglightsalmon.checkedchanged wpfaddressctrl.mycontrol_background = New SolidColorBrush(Colors.LightSalmon) Private Sub radioforegroungoriginal_checkedchanged(sender As System.Object, _ e As System.EventArgs) Handles radioforegroungoriginal.checkedchanged wpfaddressctrl.mycontrol_foreground = initforebrush Private Sub radioforegroungred_checkedchanged(sender As System.Object, _ e As System.EventArgs) Handles radioforegroungred.checkedchanged wpfaddressctrl.mycontrol_foreground = New SolidColorBrush(Colors.Red) Private Sub radioforegroungyellow_checkedchanged(sender As System.Object, _ e As System.EventArgs) Handles radioforegroungyellow.checkedchanged wpfaddressctrl.mycontrol_foreground = New SolidColorBrush(Colors.Yellow) Private Sub radiofamilyoriginal_checkedchanged(sender As System.Object, _ e As System.EventArgs) Handles radiofamilyoriginal.checkedchanged wpfaddressctrl.mycontrol_fontfamily = initfontfamily Private Sub radiofamilytimes_checkedchanged(sender As System.Object, _ e As System.EventArgs) Handles radiofamilytimes.checkedchanged wpfaddressctrl.mycontrol_fontfamily = New FontFamily("Times New Roman") Private Sub radiofamilywingdings_checkedchanged(sender As System.Object, _ e As System.EventArgs) Handles radiofamilywingdings.checkedchanged wpfaddressctrl.mycontrol_fontfamily = New FontFamily("WingDings") Private Sub radiosizeoriginal_checkedchanged(sender As System.Object, _ e As System.EventArgs) Handles radiosizeoriginal.checkedchanged wpfaddressctrl.mycontrol_fontsize = initfontsize Private Sub radiosizeten_checkedchanged(sender As System.Object, _ e As System.EventArgs) Handles radiosizeten.checkedchanged wpfaddressctrl.mycontrol_fontsize = 10 Private Sub radiosizetwelve_checkedchanged(sender As System.Object, _ e As System.EventArgs) Handles radiosizetwelve.checkedchanged wpfaddressctrl.mycontrol_fontsize =

24 Private Sub radiostyleoriginal_checkedchanged(sender As System.Object, _ e As System.EventArgs) Handles radiostyleoriginal.checkedchanged wpfaddressctrl.mycontrol_fontstyle = initfontstyle Private Sub radiostyleitalic_checkedchanged(sender As System.Object, _ e As System.EventArgs) Handles radiostyleitalic.checkedchanged wpfaddressctrl.mycontrol_fontstyle = FontStyles.Italic Private Sub radioweightoriginal_checkedchanged(sender As System.Object, _ e As System.EventArgs) Handles radioweightoriginal.checkedchanged wpfaddressctrl.mycontrol_fontweight = initfontweight Private Sub radioweightbold_checkedchanged(sender As System.Object, _ e As System.EventArgs) Handles radioweightbold.checkedchanged wpfaddressctrl.mycontrol_fontweight = FontWeights.Bold Visual C# private void radiobackgroundoriginal_checkedchanged(object sender, EventArgs e) wpfaddressctrl.mycontrol_background = initbackbrush; private void radiobackgroundlightgreen_checkedchanged(object sender, EventArgs e) wpfaddressctrl.mycontrol_background = new SolidColorBrush(Colors.LightGreen); private void radiobackgroundlightsalmon_checkedchanged(object sender, EventArgs e) wpfaddressctrl.mycontrol_background = new SolidColorBrush(Colors.LightSalmon); private void radioforegroundoriginal_checkedchanged(object sender, EventArgs e) wpfaddressctrl.mycontrol_foreground = initforebrush; private void radioforegroundred_checkedchanged(object sender, EventArgs e) wpfaddressctrl.mycontrol_foreground = new System.Windows.Media.SolidColorBrush(Colors.Red); private void radioforegroundyellow_checkedchanged(object sender, EventArgs e) wpfaddressctrl.mycontrol_foreground = new System.Windows.Media.SolidColorBrush(Colors.Yellow); -24-

25 private void radiofamilyoriginal_checkedchanged(object sender, EventArgs e) wpfaddressctrl.mycontrol_fontfamily = initfontfamily; private void radiofamilytimes_checkedchanged(object sender, EventArgs e) wpfaddressctrl.mycontrol_fontfamily = new System.Windows.Media.FontFamily("Times New Roman"); private void radiofamilywingdings_checkedchanged(object sender, EventArgs e) wpfaddressctrl.mycontrol_fontfamily = new System.Windows.Media.FontFamily("WingDings"); private void radiosizeoriginal_checkedchanged(object sender, EventArgs e) wpfaddressctrl.mycontrol_fontsize = initfontsize; private void radiosizeten_checkedchanged(object sender, EventArgs e) wpfaddressctrl.mycontrol_fontsize = 10; private void radiosizetwelve_checkedchanged(object sender, EventArgs e) wpfaddressctrl.mycontrol_fontsize = 12; private void radiostyleoriginal_checkedchanged(object sender, EventArgs e) wpfaddressctrl.mycontrol_fontstyle = initfontstyle; private void radiostyleitalic_checkedchanged(object sender, EventArgs e) wpfaddressctrl.mycontrol_fontstyle = System.Windows.FontStyles.Italic; private void radioweightoriginal_checkedchanged(object sender, EventArgs e) wpfaddressctrl.mycontrol_fontweight = initfontweight; private void radioweightbold_checkedchanged(object sender, EventArgs e) wpfaddressctrl.mycontrol_fontweight = FontWeights.Bold; -25-

26 アプリケーションをビルドして実行する 別のオプションボタンをクリックして WPF 複合コントロール上の影響を確認する