以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  打印问题，有没有直接打印线的函数  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=45845)
--  作者：huangzhongdui
--  发布时间：2014/2/12 10:50:00
--  打印问题，有没有直接打印线的函数
比如vb中print.line()这种函数
--  作者：狐狸爸爸
--  发布时间：2014/2/12 10:56:00
--  

参考：

http://www.foxtable.com/help/topics/1222.htm

 
--  作者：huangzhongdui
--  发布时间：2014/2/12 11:53:00
--  
Dim doc As PrintDoc = e.form.GernatePrintDoc()
Dim Line As New prt.LineDef(2, Color.black)
Dim ln As New prt.RenderLine(475,647,700,647,Line)
doc.body.Children.Add(ln)
doc.Preview()
我写了这么多的代码去打一条线屏幕上面没有什么反应呀
--  作者：Bin
--  发布时间：2014/2/12 11:55:00
--  
Dim doc As PrintDoc = e.form.GernatePrintDoc()
Dim Line As New prt.LineDef(2, Color.Red)
Dim ln As New prt.RenderLine(20,20, 80, 80, Line)
doc.body.Children.Add(ln)
doc.Preview()
--  作者：huangzhongdui
--  发布时间：2014/2/12 11:58:00
--  
我想画一条直线呀， Dim ln As New prt.RenderLine(475,647,700,647,Line)
这个值不可以变吗
--  作者：huangzhongdui
--  发布时间：2014/2/12 13:12:00
--  
图片把我的画出的线挡住了，我应该怎么办能让它显示在图片上方
--  作者：狐狸爸爸
--  发布时间：2014/2/12 14:41:00
--  
你先打印图片，再打印线条看看