diff --git a/public10/ThreeFun/Fun/U_printPdf.pas b/public10/ThreeFun/Fun/U_printPdf.pas index 7fce004..4a4ba89 100644 --- a/public10/ThreeFun/Fun/U_printPdf.pas +++ b/public10/ThreeFun/Fun/U_printPdf.pas @@ -8,6 +8,19 @@ uses //printFlag=1 '打印预览;0立即打印 //DataBaseStr function printPdf(App:Tapplication; FormID:integer;Title:PChar; GCode: PChar; GName: PChar;mRecid:PChar;printNumber:Integer;printFlag:Integer;printer:integer;DataBaseStr:PChar):hwnd;stdcall;external 'pdfPrint.dll' Name 'GetDllForm' ; + // formId =1 功能id + //mRecid='文件表记录号' + //printNumber=1 打印份数 + //printFlag=1 '打印预览;0立即打印 + //DataBaseStr + function printReport(App:Tapplication; FormID:integer;Title:PChar; GCode: PChar; GName: PChar;mRecid:PChar;printNumber:Integer;printFlag:Integer;printer:integer;DataBaseStr:PChar):hwnd;stdcall;external 'pdfPrint.dll' Name 'GetDllForm' ; + // formId =1 功能id + //mRecid='文件表记录号' + //exportFileType=1 导出文件类型 pdf ,bmp ,jpg + //DataBaseStr + //返回结果,保存文件的记录号 主键 + function exportFile(App:Tapplication; FormID:integer;Title:PChar; GCode: PChar; GName: PChar;mRecid:PChar;exportFileType:PChar;DataBaseStr:PChar):hwnd;stdcall;external 'pdfPrint.dll' Name 'ExportFile' ; + implementation end.