1

是否可以添加一个大纲,一个从文本继续向外扩展的大纲?

即:来自 Photoshop 的外部笔画是我正在寻找的

我找到了一种让大纲进入文本的方法,但这不是我想要的。

我环顾四周,但在谷歌上找不到任何想要外部轮廓的人。

谢谢

当前内轮廓:

    Dim grp As Graphics = e.Graphics
    Dim gp As New Drawing2D.GraphicsPath
    Dim useFont As Font = New Font("Impact", 60, FontStyle.Regular)
    grp.TextRenderingHint = Drawing.Text.TextRenderingHint.AntiAlias
    grp.SmoothingMode = Drawing2D.SmoothingMode.AntiAlias
    gp.AddString("3000", useFont.FontFamily, FontStyle.Regular, 60, New Point(0, 0), StringFormat.GenericTypographic)
    useFont.Dispose()

    Dim orangeBrush As New SolidBrush(Color.FromArgb(226, 149, 0))
    grp.FillPath(orangeBrush, gp)

    'This is the stroke below
    Dim blackpen As New Pen(Color.Black, 2)
    grp.DrawPath(blackpen, gp)
    gp.Dispose()
4

1 回答 1

1

If you reverse the order in which you drawpath and fillpath you can get a outside border for your text.

于 2013-07-04T03:04:25.237 回答