Foxtable(狐表)用户栏目专家坐堂 → .RenderArea 区域请教


  共有1793人关注过本帖树形打印复制链接

主题:.RenderArea 区域请教

帅哥哟,离线,有人找我吗?
ljh29206
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1359 积分:12010 威望:0 精华:0 注册:2012/3/5 11:32:00
.RenderArea 区域请教  发帖心情 Post By:2019/8/14 13:29:00 [只看该作者]

Dim ra As New prt.RenderArea '定义一个容器


Dim p As New prt.RenderGraphics


ra.Children.Add(P)



请问

P 画出来的 对象 超过   ra 的边界

能否设置  ra 的填充方式   


P能否缩放 填充?
  

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106665 积分:542508 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/8/14 13:47:00 [只看该作者]

专业报表所有队员都可以设置大小的

Dim doc As New PrintDoc
Dim rg1 As New prt.RenderGraphics()
rg1.Graphics.DrawArc(Pens.Red, 0, 0, 30, 40, 0, 135) 
rg1.Graphics.DrawEllipse(Pens.Blue, 20, 20, 90, 45) 
rg1.Style.Borders.All = New prt.LineDef("1mm", Color.CornflowerBlue)
rg1.Width = 20
rg1.Height= 50
rg1.x = 30
rg1.y = 30
Doc.Body.Children.Add(rg1)
Doc.Preview()

 回到顶部