以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 關於專業報表另存為TIFF格式 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=162127) |
-- 作者:hnguang -- 发布时间:2021/4/6 17:30:00 -- 關於專業報表另存為TIFF格式 請問可以用代碼將專業報表另存為TIFF格式嗎, |
-- 作者:hnguang -- 发布时间:2021/4/6 17:30:00 -- 正麥部份是繪圖生成的 |
-- 作者:hnguang -- 发布时间:2021/4/6 17:31:00 -- 存成PDF就沒有了 |
-- 作者:hnguang -- 发布时间:2021/4/6 17:35:00 -- Dim rg1 As New prt.RenderGraphics() rg1.Graphics.DrawLine(Pens.black,0,40,100,0) rg1.Graphics.DrawLine(Pens.black,0,40,100,70) rg1.Graphics.DrawLine(Pens.black,200,40,100,0) rg1.Graphics.DrawLine(Pens.black,200,40,100,70) Dim fnt As New Font("宋体",10) Dim msg As String = dr("條款備註1") rg1.Graphics.DrawString(msg,fnt,Brushes.black,75,35) p.otherobjects.add("條款備註1",rg1)
|
-- 作者:有点蓝 -- 发布时间:2021/4/6 20:21:00 -- 保存为图片:http://www.foxtable.com/webhelp/topics/2450.htm [此贴子已经被作者于2021/4/6 20:21:43编辑过]
|