分类:
2008-10-15 16:38:29
在GDI+ 中,我们是使用Graphics 的 DrawString 方法来在对象的表面绘制文本,其它还需要用到FontFamliy、Font、StringFormat等类来控制文本的特征。在前面我们已经了解过Font类,这里我们通过本文重点来了解DrawString方法以及StringFormat类。
一、用GDI+ 绘制文本需要经过下面步骤:
1、在窗体代码前面引入Drawing2D 命名空间
代码如下:
Imports System.Drawing.Drawing2D
2、获取图形对象的引用
下面代码是创建一个可以在PictureBox 控件表面绘制图形的图形对象:
Dim g as Graphics=PictureBox1.CreateGraphics
3、创建用于绘制文字的Brush对象
Dim mBrush As New SolidBrush(Color.Blue)
4、创建绘制文本时使用的字体对象Font
如下代码所示,我们创建一个宋体,20码的字体对象:
Dim mFont As New Font("宋体", 20)
5、使用DrawString 方法在指定的位置绘制文本
使用DrawString 方法时,如果提供了一个矩形对象(RectangleF),则文本在这个指定的矩形中换行显示,否则将从提供的坐标起始绘制显示文本。如下代码所示:
g.DrawString("欢迎访问巧巧读书网", mFont, mBrush, 0, 10)
g.DrawString("欢迎访问巧巧读书网", mFont, mBrush, New RectangleF(10, 40, 100, 200))
完整代码如下(假设窗体上已经有了一个PictureBox 控件,一个Button 控件):
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim g As Graphics = PictureBox1.CreateGraphics
Dim mBrush As New SolidBrush(Color.Blue)
Dim mFont As New Font("宋体", 20)
g.DrawString("欢迎访问巧巧读书网", mFont, mBrush, 0, 10)
'在矩形中绘制文本
g.DrawString("欢迎访问巧巧读书网", mFont, mBrush, New RectangleF(10, 40, 100, 200))
End Sub
http://qread.com/book/myvbnet/my0047.html
图一:运行效果图
以上我们在知道了如何使用DrawString方法,下面我们看看如何格式化文本对象。
[1]