以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 问个小问题,关于GDI+ (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=31038) |
-- 作者:blackzhu -- 发布时间:2013/4/9 11:19:00 -- 问个小问题,关于GDI+ Dim p As WinForm.Painter = e.Form.Controls("Painter1") Dim g As Graphics = p.Graphics Dim fnt2 As New Font("宋体",72) Dim msg2 As String = "ACEC" " g.DrawString(msg2,fnt2,Brushes.White,5,5) p.Repaint() 因为是主窗口 绘图板又是fill 锚定的 结果出来两个ACEC 这个怎么解决? |
-- 作者:XYT -- 发布时间:2013/4/9 11:25:00 -- 上面多个了双引号
[此贴子已经被作者于2013-4-9 11:43:31编辑过]
|
-- 作者:blackzhu -- 发布时间:2013/4/9 11:26:00 -- xy 的 位置 不搭界的 |
-- 作者:Bin -- 发布时间:2013/4/9 11:30:00 -- 能不能发个例子看看.这么奇怪. |
-- 作者:blackzhu -- 发布时间:2013/4/9 11:35:00 -- 我早就发现了 只是 我把绘图板控制了 大小 所以 没有问题 我做个例子. |
-- 作者:hanxuntx -- 发布时间:2013/4/9 11:48:00 -- 这个只要是超过了边界就有的 |
-- 作者:Bin -- 发布时间:2013/4/9 11:55:00 -- 这个在FOXTABLE中还真不好解决.原因是改变了窗口大小他就会重绘. |
-- 作者:blackzhu -- 发布时间:2013/4/9 12:11:00 -- 我提供这个字符串写入的另外一个属性 大家可以记着用用: Dim fnt2 As New Font("宋体",72) Dim msg2 As String = "ACEC" Dim drawFormat As New StringFormat \'方向 drawFormat.FormatFlags = StringFormatFlags.NoClip g.DrawString(msg2,fnt2,Brushes.White,5,5,drawFormat ) \'DirectionRightToLeft
按从右向左的顺序显示文本. \'DirectionVertical
文本垂直对齐. \'FitBlackBox
允许部分字符延伸该字符串的布局矩形.默认情况下,将重新定位字符以避免任何延伸. \'DisplayFormatControl
控制字符(如从左到右标记)随具有代表性的标志符号一起显示在输出中. \'NoFontFallback
对于请求的字体中不支持的字符,禁用回退到可选字体.缺失的任何字符都用缺失标志符号的字体显示,通常是一个空的方块. \'MeasureTrailingSpaces
包括每一行结尾处的尾随空格.在默认情况下,MeasureString 方法返回的边框都将排除每一行结尾处的空格.设置此标记以便在测定时将空格包括进去. \'NoWrap
在矩形内设置格式时,禁用文本换行功能.当传递的是点而不是矩形时,或者指定的矩形行长为零时,已隐含此标记. \'LineLimit
在格式化的矩形中只布置整行.默认情况下,这种布置要继续到文本的结尾为止,或者到由于剪辑而不再有可见的行为止,看哪一种情况先发生.注意,此默认设置允许不是行高整数倍的格式化矩形将最后一行部分地遮住.若要确保看到的都是整行,请指定此值,并仔细地提供格式化矩形,使其高度至少为一个行高. \'NoClip 允许显示标志符号的伸出部分和延伸到边框外的未换行文本.在默认情况下,延伸到边框外侧的所有文本和标志符号部分都被剪裁. |
-- 作者:blackzhu -- 发布时间:2013/4/9 15:28:00 -- 按钮直接执行 就没有问题,但是在窗口模拟单击这个按钮 还是会有这个问题 |