VFP报表输出jpg格式
使用如下代码可以生成JPG文件,但是出现乱码情况,FRX报表使用了Arial字体导致,只想使用字体应如何处理?请朋友们指点,谢谢!DYNAMICLINEHEIGHT = .T.
lcReport=SYS(5)+CURDIR()+"xxx.frx"
XLSNAME ="xxx.JPG"
oListener = CREATEOBJECT('ReportListener')
olistener.ListenerType = 3
oListener.OutputType = 1
REPORT FORM (lcReport) OBJECT oListener NOWAIT
olistener.outputpage(1,Putfile("保存为(&N):",xlsname,"jpg"),102)
olistener.quietmode = .T.