首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > .NET > .NET >

怎么控制打印机打印 RAW 文件

2012-04-01 
如何控制打印机打印 RAW 文件RAW文件是 word类型的像素块矩阵,如何控制打印机打印呢?我这么操作后,打印任

如何控制打印机打印 RAW 文件

RAW文件是 word类型的像素块矩阵,如何控制打印机打印呢?

我这么操作后,打印任务是传到打印机里了,但是一直显示 “正在打印”,而没有东西出来 

Delphi(Pascal) code
 if not OpenPrinter(PChar(PrinterName), Handle, nil) then begin   ShowMessage('OpenPrinter Error ' + IntToStr(GetLastError));   Result:= 1;   Exit; end; with DocInfo do begin   pDocName    := PChar('XGY Print Server');   pOutputFile := nil;   pDataType   := 'RAW'; end; if StartDocPrinter(Handle, 1, @DocInfo)=0 then begin   ShowMessage('StartDocPrinter Error ' + IntToStr(GetLastError));   ClosePrinter(Handle);    Result:= 1;   Exit; end; if not StartPagePrinter(Handle) then begin   ShowMessage('StartPagePrinter Error ' + IntToStr(GetLastError));   EndDocPrinter(Handle);   ClosePrinter(Handle);   Result:= 1;   Exit; end; if not WritePrinter(Handle, lPixelBuf, lBufSize, N) then begin   ShowMessage('WritePrinter Error ' + IntToStr(GetLastError));   Result:= 1;   Exit; end; EndPagePrinter(Handle); EndDocPrinter(Handle); ClosePrinter(Handle);


[解决办法]
我来顶顶先
没研究过

热点排行