哪里有制作PDF的控件(DELPHI) (50分)

  • 主题发起人 主题发起人 skyhero
  • 开始时间 开始时间
S

skyhero

Unregistered / Unconfirmed
GUEST, unregistred user!
哪里有制作PDF的控件,并且支持中文,我下载了好几个都不支持中文显示,一旦报表表中
有中文的的话就会出现乱码,,
1。我需要的是把报表的格式(*.frf)转化为PDF格式(或者是WORD,EXCEL格式,后用EMAIL发送出去),现在
我用FASTREPORT作报表当存为*.CSV,*.RTF时出现图片有一部分不能输出,格式也出现了错乱,存为*.PDF是英文报表的效果不错
但是中文不行,出现了乱码现象(我安装了(LLIPDFLIB这个控件)),
2。用POWERPDF制作报表英文还好,中文不支持,
3。各位朋友帮我解决则个,我搞了很久,用OLE技术又很难控制它的输出格式,而且又不太熟悉,唉,,苦也,
各位帮帮忙??!!

 
powerpdf
www.playicq.com
 
这个不支持中文呀,
我试过了中文出现乱码
 
TO:XXFENG
在哪里有呀
 
有没有免费的
 
我没有找到
 
在 www.51delphi.com 上有
 
to:xxfeng
我下载后,file/open/llPDFLibD6,后compile,install
安装出现错误,以下是代码:
[Warning] Unit 'PDF' implicitly imported into package 'llPDFLibD6'
[Warning] Unit 'pdfRC4' implicitly imported into package 'llPDFLibD6'
[Warning] Unit 'pdfGliphNames' implicitly imported into package 'llPDFLibD6'
[Warning] Unit 'pdfCCITT' implicitly imported into package 'llPDFLibD6'
[Warning] Unit 'pdfWMF' implicitly imported into package 'llPDFLibD6'
[Warning] Unit 'pdfZLib' implicitly imported into package 'llPDFLibD6'
[Warning] Unit 'pdfMD5' implicitly imported into package 'llPDFLibD6'
[Warning] Unit 'PDFTTF' implicitly imported into package 'llPDFLibD6'
[Warning] Unit 'pdfResources' implicitly imported into package 'llPDFLibD6'
[Warning] Unit 'pdfMisc' implicitly imported into package 'llPDFLibD6'
 
www.51delphi.com
 
乍个安装llPDFLibD6.dpk,我安装了FR_E_PDF.pas (fastreport输出pdf的控件)也是不支持中文,
出现了乱码现象
 
安装一个Acrobat的完全版本(不是Reader)其中有一个pdf的打印机,可以将所有的东西,
打印成PDF,Rave控件中也有类式功能的控件
 
to:liesywww,我找到的都是READER没有什么完全版的怎么找?,又怎么用,
RAVE控件是个什么东西我不太清楚,能不能说一下,关键是要报表转化为PDF能支持中文,
 
PDF 制作工厂
http://www.skycn.net/soft/7192.html
 
很想得到READER完全版, 知道告诉一声, 顺便送100分
 
要是能弄清楚 PDF 的文件结构,那么自己也可以做一个。[:(!]
 
修改 llpdfLib 中 PDFWMF.PAS 中的函数 procedure TEMWParser.DoCreateFontInDirectW ,
使 llpdflib 带的 FR_E_PDF.pas 支持中文
用以下代码代替原来的,即可支持中文。
procedure TEMWParser.DoCreateFontInDirectW;
var
Data: PEMRExtCreateFontIndirect;
A: TLogFontW;
F: TLogFont;
At: array[0..31] of Char;
iCst: UINT;
begin
Data := CV;
if Data^.ihFont >= HandlesCount then
Exit;
if HandleTable[Data^.ihFont] <> $FFFFFFFF then
DeleteObject(HandleTable[Data^.ihFont]);
Move(data^.elfw.elfLogFont, A, SizeOf(A));
Move(a, F, SizeOf(F));
//Add &amp;
Change begin
By ijia 2003.04.18
// WideCharToMultiByte(1252, 0, A.lfFaceName, 32, At, 32, nil, nil);
原来的代码
// 以下为新增的代码
case A.lfCharSet of
EASTEUROPE_CHARSET: iCst := 1250;
RUSSIAN_CHARSET: iCst := 1251;
GREEK_CHARSET: iCst := 1253;
TURKISH_CHARSET: iCst := 1254;
BALTIC_CHARSET: iCst := 1257;
SHIFTJIS_CHARSET: iCst := 932;
129: iCst := 949;
CHINESEBIG5_CHARSET: iCst := 950;
GB2312_CHARSET: iCst := 936;
Symbol_charset: iCst := 2;
else
iCst := 1252;
end;
WideCharToMultiByte(iCst, 0, A.lfFaceName, 32, At, 32, nil, nil);
// Add &amp;
Change End
Move(AT, F.lfFaceName, 32);
HandleTable[Data^.ihFont] := CreateFontIndirect(F);
end;
 
您可以使用FastReport + PsfrExportFilters匯出報表至PDF文件,但是PsfrExportFilters中的PsfrPDFExport必須做小部份的修改才可以支援中文。
http://www.jane.com.tw
 
to:xxfeng
我按你的方法去做了更正了源程序,然事重新用component/install component 编译了一下,还是不行,
这是为什么呢??
编译也会出错,你能不能给我讲一个具体安装过程?
 

Similar threads

后退
顶部