delphi自助列印源碼

『壹』 如何在delphi中實現列印功能

Api函數列表
--與列印相關
Api函數名 函數說明 適用范圍
W3.x W95 NT
AddPrinterConnection 為當前用戶建立與列印機的聯系 否 是 是
StartPagePrinter 開始列印機 否 是 是
StartDoc 開始列印作業 是 是 是
StartDocPrinter 開始列印作業 否 是 是
AddPrintProvidor 加入一個列印機支持器 否 是 是
AddForm 加入一個列印機窗體 否 是 是
AddPort 加入一個列印機埠 否 是 是
AddMonitor 加入一個列印機管理器 否 是 是
ShellExecute 打開或列印指定文件 否 是 是
ClosePrinter 關閉打開的列印機 否 是 是
WritePrinter 向列印機輸出數據 否 是 是
AddPrinter 在列印機伺服器上建立一個列印機 否 是 是
SetAbortProc 設備列印作業的放棄函數 否 是 是
SetPrinter 設置列印機信息 否 是 是
SetPrinterData 設置列印機配置 否 是 是
SetJob 設置列印作業信息 否 是 是
ResetPrinter 設置列印數據類型和設備模式值 否 是 是
DeletePrinterConnection 刪除與列印機的連接 否 是 是
DeletePrintProcessor 刪除列印機處理器 否 是 是
DeletePrinterDriver 刪除列印機驅動程序 否 是 是
DeletePrinter 刪除列印機伺服器上的列印機 否 是 是
DeleteMonitor 刪除列印機監視器 否 是 是
DeletePrintProvidor 刪除列印機提供者 否 是 是
DeleteForm 刪除列印機窗體層差 否 是 是
AbortPrinter 刪除列印機緩沖文件 否 是 是
DeletePort 刪除列印機埠 否 是 是
AddJob 啟動一個列印作業 否 是 是
AdvancedDocumentProperties 進行列印機高級設置 否 是 是
PrintDlg 建立列印文本對話框 否 是 是
EnumPrintProcessors 枚舉已安裝的列印機處理器 否 是 是
EnumPrinterDrivers 枚舉已安裝的列印機驅動程序 否 是 是
EnumPorts 枚舉可用列印機埠 否 是 是
EnumPrintProcessorDatatypes 枚舉列印機所支持的數據類型 否 是 是
EnumForms 枚舉所支持的列印機窗體 否 是 是
AbortDoc 終止一項列印作業 是 是 是
PrinterProperties 修改列印機屬性 否 是 是
AddPrintProcessor 將列印處理器復制到列印機伺服器中 否 是 是
AddPrinterDriver 將列印機驅動程序復制到列印機伺服器中 否 是 是
PrinterMessageBox 顯示列印作業出錯信息 否 是 是
ConnectToPrinterDlg 顯示瀏覽對話並連接網路列印機 否 是 是
EndPagePrinter 結束列印頁 否 是 是
EndDoc 結束列印作業 是 是 是
EndDocPrinter 結束列印作業 否 是 是
StartPage 准備列印機接收數據 是 是 是
WaitForPrinterChange 監測列印機或列印機伺服器變化 否 是 是
GetPrintProcessorDirectory 獲取列印機驅動處理器路徑 否 是 是
GetPrinterDriver 獲取列印機驅動程序信息 否 是 是
GetPrinterDriverDirectory 獲取列印機驅動程序路徑 否 是 是
GetPrinter 獲取列印機信息 否 是 是

『貳』 delphi 中怎樣做頁面列印功能。像我們打開某個網頁一樣，直接點擊列印就可以列印整個頁面啦！

DELPHI是一個開發工具，所有的列印都需要寫腳本實現。列印的插件有FASTREPORT和QUICKREPORT或者REPORTBUILDER。

『叄』 Delphi 中Printer列印相關的例子

以下代碼輸出以標簽的字體列印輸出一行文字：

printer.canvas.font.assign(label1.font);
printer.canvas.font.pixelsperinch:=getdevicecaps(printer.canvas.handle,LOGPIXELSY);
printer.begindoc;
printer.canvas.textout(0,0,label.caption);
printer.enddoc;

『肆』 DELPHI中怎麼實現數據的批量列印

DELPHI你這個好像不太熟悉，不知道是什麼軟體，你要是想實現數據批量列印的話，可以使用專業的可變數據批量列印軟體。在電腦上安裝之後，可以用軟體設計製作，然後批量生成，生成後，就可以連接列印機實現數據的批量列印了

標簽上各項內容使用資料庫導入的方式添加，只需要添加一次，後面的標簽內容就可以按照資料庫的順序自動生成了，這個在預覽的時候可以翻頁查看生成效果。

『伍』 如何將Delphi 編寫的程序轉換成源碼，詳細點

朋友，想實現這些功能，任何一種通用語言都可以辦到。甚至使用具有宏編程功能的一些辦公軟體也可以。

我建議你使用Delphi或VB。其開發工具可以使任何初學者都快速上手。並且在顯示上可以優雅地實現。

另外，單就此軟體而言，恐怕將不可避免地使用資料庫。作為個人使用，可採用最簡單的Access桌面資料庫。

我想你的設計意圖大概是，針對歷史數據進行分析和匯總，並給出最接近中獎的一組數字。所以，除掌握開發語言外，你還必須對用於操作資料庫的SQL語言有一定了解。

總結：學習Delphi，Access，SQL。此三種工具在書店有大量相關書籍可供購入。最好找以「Delphi資料庫編程」為核心的書。其中將會提供翔實的常式。1.編程語言和操作系統：Visual c++ (vc) visual baseic vb visual foxpro delphi c++ builder powerbuider;vc.net vb.net;Asp.net java；Windows32 win95,win98,win2000,windows me,windows2000,windowsxp,windowNT/winnt; linux,PDA/windowsCE/smartphone手機/arm/ppc2000/ppc2002; pocket pc2002, ce.net;掌上電腦，嵌入式設備，移動設備；

2.控制項及平台：二維繪圖控制項、2d/3D圖形控制項、三維圖形控制項、矢量圖形控制項、矢量繪圖控制項、圖形中間件、圖形插件、圖形瀏覽控制項,CAD插件、CAD控制項、矢量控制項、GIS控制項、GIS圖形控制項,GIS插件,圖形軟體開發源碼,測繪控制項,視頻CAD，圖形演算法庫、幾何演算法庫、winCE圖形控制項 PDA圖形控制項,源碼、免費下載、軟體試用、編程資源、矢量圖形軟體開發,演算法源碼，c++源碼,SmartPhone,CAD軟體開發,GIS軟體開發，Linux圖形平台，CAD自主平台,CAD開發平台，GIS開發平台，圖形軟體開發引擎,IE圖形控制項,幾何演算法控制項；

3.文件格式解析、文件格式轉換、圖形文件瀏覽、BMP、GIF、ICO、TGA、PCX、WBMP、WMF、EMF,JPEG、PNG、MNG、TIFF、JBIG、PNM,PPM,PGM、RAS，DXF ,DWF(4.0-6.0)、DWG(2.5-2005) 、IGS, MIF,PLT,PRN,HPGL/HPGL2、DGN(8.0), SHP, IGSAT, PS/IGES, PS/STEP, PS/VDA-FS, PS/PRO ENGINEER, PS/ACIS, PS/BOBY SHOP，QCD，SHX字體、TTF字體、SHP字體，LIN,GBR，pat，AutoCAD字體線型，mdf，dwg瀏覽，SVG格式；dwg2005,dwgr14,autocad2005,r14,r15,r18,2006,,GERBER RS-274X

4.資源下載：SHX字體下載，TTF字體，SHP字體，圖庫下載，建築圖庫，電氣圖庫，園林圖庫下載，dwf2dxf.exe，dwg2dxf.exe，hpgl2cad.exe，askern.dll,asocx.ocx,depend.exe,winrar.exe,winzip.exe,zip,rar,mfc42.dll

5.演算法總匯：求交演算法，相切，裁減，直線、圓、弧、橢圓、樣條曲線、函數曲線、曲面、三維消隱、面積演算法、長度計算、體積計算；點雲，不規則體、三角形、找最小區域、查找最大區域、路徑查找、相量、向量、矢量、單位向量、矩陣、矩陣變換，交點、切點、圓心等、解析幾何、線性代數,貝賽爾曲線演算法；坐標變換；

6. 圖形技術匯總：Unigraphics,pro/engineer,i-deas,pkpm,3ds,3dmax,mastercam9.0,dwfsdk toolkit,PRO/E,SOLiDWORKS,AUTOCAD,Intellicad，VisualCASE,SolidEdge,UG,caxa,MDA,catia,powercad，opengl，heidi，acis，ug，microstation，opendwg，opendgn，Freetype，OpenSceneGraph，brlcad，mapinfo，arcinfo，hoops，zlib，solidedge，mdt，gdi++,directX,directdraw,directshow,計算機圖形學，OdDbDatabasePtr，DWGdirect使用；

7. PDM/MRPII/ERP/OA等行業：圖形文件瀏覽、圖檔管理、審圖、批註圖紙、許可權管理、web圖檔管理、xml/rml批註文件 兼容Volo View Express和AutoCAD格式；數字簽名等；redline,rml紅線批註文件,產品數據管理,電子圖紙管理

『陸』 高分請教，在DELPHI怎麼向列印機發送控制碼指令

在delphi中設置列印機屬性方法如下：一、使用列印機設置對話框：PrinterSetupDialog1.Execute;二、使用代碼進行設置：以下代碼來源於網路：procere setprint(pagesize:tpagesize;width,height:variant;Orientation:tprinterOrientation);var Device: array[0..255] of char; Driver: array[0..255] of char; Port: array[0..255] of char; hDMode: THandle; PDMode: PDEVMODE;begin//設置列印機 try Printer.PrinterIndex := Printer.PrinterIndex; Printer.GetPrinter(Device, Driver, Port, hDMode); if hDMode 0 then begin pDMode := GlobalLock(hDMode); if pDMode nil then begin if pagesize=Custom then begin //設定自定義紙張 pDMode^.dmFields := pDMode^.dmFields or dm_PaperSize or DM_PAPERWIDTH or DM_PAPERLENGTH; pDMode^.dmPaperSize := 0; pDMode^.DMPAPERWIDTH:= width*10 ; pDMode^.DMPAPERLENGTH:=height*10; end else begin //設定紙張類型 pDMode^.dmFields := pDMode^.dmFields or DM_PAPERSIZE ; if pagesize=A3 then pDMode^.dmPaperSize := DMPAPER_A3; if pagesize=A4 then pDMode^.dmPaperSize := DMPAPER_A4; if pagesize=A5 then pDMode^.dmPaperSize := DMPAPER_A5; if pagesize=B4 then pDMode^.dmPaperSize := DMPAPER_B4; if pagesize=B5 then pDMode^.dmPaperSize := DMPAPER_B5; if pagesize=CSheet then pDMode^.dmPaperSize := DMPAPER_CSheet; if pagesize=Executive then pDMode^.dmPaperSize := DMPAPER_Executive; if pagesize=Letter then pDMode^.dmPaperSize:= DMPAPER_Letter; end; printer.Orientation:=Orientation; GlobalUnlock(hDMode); end; end ; Printer.PrinterIndex := Printer.PrinterIndex; except showmessage('沒有默認選擇列印機，或默認列印機不可使！'); exit; end; end;