將列印內容送往區域網指定的印表機列印

2021-06-06 09:14:38 字數 2015 閱讀 7378

列印內容寫在報表中,使用frrptdesign: tfrreport、frpreview1: tfrpreview;兩個控制項。

在窗體上放乙個frpreview1,

1.報表模板首先從檔案載入frrptdesign.loadfromfile(barcodefile);

2.動態賦值: 

var

frview: tfrview;

templatefile: string;

begin

frrptdesign.loadfromfile(templatefile);//從模版檔案載入報表框架

frview := frrptdesign.findobject('studentname');

if frview <> nil then

frview.memo.text := 'chinmusam';

.....

frrptdesign.preview := frpreview1;//指定為窗體介面上的顯示區域

frrptdesign.showreport;

if bassignprinter then //如果指定了印表機

begin

setdefaultprinter(iniconfig.defaultprinter);//從配置檔案中讀取指定的網路印表機名稱 一般形如: \\it-02993\hpj200

end;

if frrptdesign.changeprinter(printer.printerindex, printer.printers.indexof(iniconfig.defaultprinter)) then //列印時,實時調配為指定的印表機進行列印

for i := 1 to icopy do//列印的份數

frrptdesign.preview.print; //即可將報表內容直接送往印表機(介面並不顯示報表的內容)

end;

附上setdefaultprinter方法: 

uses printers, windows

procedure setdefaultprinter(sprinter: string);

var localprinter: tprinter;

device: array[0..255] of char;

driver: array[0..255] of char;

port: array[0..255] of char;

s : array[0..255] of char;

hdevicemode: thandle;

begin

if trim(sprinter) <> '' then

begin

localprinter := tprinter.create;

tryif localprinter.printers.indexof(sprinter) >-1 then

begin

localprinter.printerindex := localprinter.printers.indexof(sprinter);

localprinter.getprinter(device, driver, port, hdevicemode);

strcopy (s, device);

strcat (s, ',');

strcat (s, driver);

strcat (s, ',');

strcat (s, port);

writeprofilestring('windows', 'device', s);

strcopy (s, 'windows');

sendmessage (hwnd_broadcast, wm_wininichange, 0, longint(@s));

end;

finally

freeandnil(localprinter);

end;

end;

end;

惠普區域網共享印表機設定 惠普印表機區域網共享

2017 01 18 10 42 19 印表機是很多辦公室人員都會用到的列印裝置,而惠普hp1020印表機就是比較受歡迎的一款印表機,然而有很多windows7系統使用者並不知道要怎麼安裝惠普hp1020印表機,其實方法很.2017 01 04 11 19 48 有win7旗艦版32位系統使用者在安...

區域網共享印表機只能列印第一頁

這幾天辦公室的人老喊 小郝,我的電腦是不是壞了,怎麼共享印表機列印word文件只能列印一頁,但在重灌系統之前一直都是好用的,本以為是印表機沒有設定好可是弄了半天也沒弄好!最後在網上找到了答案!原來是七月份乙個補丁更新出的毛病,到裝印表機的那台電腦上面去,把那三個補丁刪了,然後重啟就ok了。三個補丁如...

區域網印表機共享怎麼設定?如何設定印表機共享?

印表機是什麼?印表機 printer 是計算機的輸出裝置之一,用於將計算機處理結果列印在相關介質上。衡量印表機好壞的指標有三項 列印分別率,列印速度和雜訊。區域網印表機共享怎麼設定?如何設定印表機共享?要實現兩台印表機或者是多台印表機共享,首先要了解如何設定並共享區域網內有印表機電腦的印表機,之後需...