unit U_printPdf; interface uses Windows,forms; // formId =1 功能id //mRecid='文件表记录号' //printNumber=1 打印份数 //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' ; implementation end.