• 文字列を縁取りをして描画する

• この記事への評価、コメント

文字列を縁取りをして描画する

パス（GraphicsPathオブジェクト)に文字列を追加し、Graphics.DrawPathメソッドで描画することにより、文字列の縁を描画することができます。パスの描画方法につきましては、「パスを使って図形を描く」をご覧ください。

下の例では、ピクチャボックス(PictureBox1)に文字列"DOBON.NET"を黒の縁取りで表示しています。

'Imports System.Drawing

'描画先とするImageオブジェクトを作成する
Dim canvas As New Bitmap(PictureBox1.Width, PictureBox1.Height)
'ImageオブジェクトのGraphicsオブジェクトを作成する
Dim g As Graphics = Graphics.FromImage(canvas)

'GraphicsPathオブジェクトの作成
Dim gp As New System.Drawing.Drawing2D.GraphicsPath()
'GraphicsPathに文字列を追加する
Dim ff As New FontFamily("Arial")
gp.AddString("DOBON.NET", ff, 0, 50, _
             New Point(0, 0), StringFormat.GenericDefault)

'文字列の中を塗りつぶす
g.FillPath(Brushes.White, gp)
'文字列の縁を描画する
g.DrawPath(Pens.Black, gp)

'リソースを解放する
ff.Dispose()
g.Dispose()

'PictureBox1に表示する
PictureBox1.Image = canvas

//using System.Drawing;

//描画先とするImageオブジェクトを作成する
Bitmap canvas = new Bitmap(PictureBox1.Width, PictureBox1.Height);
//ImageオブジェクトのGraphicsオブジェクトを作成する
Graphics g = Graphics.FromImage(canvas);

//GraphicsPathオブジェクトの作成
System.Drawing.Drawing2D.GraphicsPath gp =
    new System.Drawing.Drawing2D.GraphicsPath();
//GraphicsPathに文字列を追加する
FontFamily ff = new FontFamily("Arial");
gp.AddString("DOBON.NET", ff, 0, 50,
    new Point(0, 0), StringFormat.GenericDefault);

//文字列の中を塗りつぶす
g.FillPath(Brushes.White, gp);
//文字列の縁を描画する
g.DrawPath(Pens.Black, gp);

//リソースを解放する
ff.Dispose();
g.Dispose();

//PictureBox1に表示する
PictureBox1.Image = canvas;

• 履歴：
• 2012/8/4 表示する方法を、PictureBox.Imageプロパティを使った方法に変更。