DOBON.NET プログラミング道: .NET Framework, VB.NET, C#, Visual Basic, Visual Studio, インストーラ, ...

• Buttonの表面を自分で描画する

Buttonの表面を自分で描画する

ボタンコントロールのPaintイベントにより、ボタンの表面を自分で描画することができるようになります。なお、ボタンコントロールのFlatStyleプロパティはSystem以外である必要があります。

次の例では、Button1に設定されている背景イメージをボタンの大きさに合わせて描画し、Button1.Textプロパティに設定されている文字列を適当な方法で描画しています。

[VB.NET]
'フォームのLoadイベントハンドラ
Private Sub Form1_Load(ByVal sender As Object, _
        ByVal e As EventArgs) Handles MyBase.Load
    'Button1の背景画像を設定
    Button1.BackgroundImage = Image.FromFile("C:\サンプル.jpg")
    'Button1のPaintイベントハンドラを追加
    AddHandler Button1.Paint, AddressOf Button1_Paint
End Sub

Private Sub Button1_Paint( _
        ByVal sender As Object, ByVal e As PaintEventArgs)
    Dim btn As Button = CType(sender, Button)
    'ボタンの背景画像をボタンの大きさに合わせて描画
    e.Graphics.DrawImage(btn.BackgroundImage, btn.ClientRectangle)

    'ボタンのTextを描画する準備
    Dim sf As New StringFormat
    '文字列を真ん中に描画
    sf.Alignment = StringAlignment.Center
    sf.LineAlignment = StringAlignment.Center
    '&がアンダーラインになるようにする
    sf.HotkeyPrefix = System.Drawing.Text.HotkeyPrefix.Show
    'Brushの作成
    Dim brsh = New SolidBrush(btn.ForeColor)
    '文字列を描画
    e.Graphics.DrawString(btn.Text, btn.Font, brsh, _
        RectangleF.op_Implicit(btn.ClientRectangle), sf)
    brsh.Dispose()
End Sub

[C#]
//フォームのLoadイベントハンドラ
private void Form1_Load(object sender, System.EventArgs e)
{
    //Button1の背景画像を設定
    Button1.BackgroundImage = Image.FromFile("C:\\サンプル.jpg");
    //Button1のPaintイベントハンドラを追加
    Button1.Paint += new PaintEventHandler(Button1_Paint);
}

private void Button1_Paint(object sender, PaintEventArgs e)
{
    Button btn = (Button) sender;
    //ボタンの背景画像をボタンの大きさに合わせて描画
    e.Graphics.DrawImage(btn.BackgroundImage, btn.ClientRectangle);

    //ボタンのTextを描画する準備
    StringFormat sf = new StringFormat();
    //文字列を真ん中に描画
    sf.Alignment = StringAlignment.Center;
    sf.LineAlignment = StringAlignment.Center;
    //&がアンダーラインになるようにする
    sf.HotkeyPrefix = System.Drawing.Text.HotkeyPrefix.Show;
    //Brushの作成
    Brush brsh = new SolidBrush(btn.ForeColor);
    //文字列を描画
    e.Graphics.DrawString(btn.Text, btn.Font, brsh, btn.ClientRectangle, sf);
    brsh.Dispose();
}