線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:3416
推到 Plurk!
推到 Facebook!

如何送PCL指令到USB印表機上

答題得分者是:小蚊子
lbbozj
一般會員


發表:1
回覆:3
積分:0
註冊:2007-06-13

發送簡訊給我
#1 引用回覆 回覆 發表時間:2007-06-13 16:46:26 IP:59.120.xxx.xxx 訂閱
各位高手
這個是我在網路上找到的印表機指令
http://h10025.www1.hp.com/ewfrf/wc/document?docname=c00073733&lc=zh-hant&cc=

如果是用RS232的可以用超級終端機
或自已寫的COM test來送指令
但是現在的印表機都usb
所以有人有辦法送PCL指令到USB的印表機上嗎?
編輯記錄
lbbozj 重新編輯於 2007-06-14 13:28:10, 註解 無‧
小蚊子
中階會員


發表:55
回覆:267
積分:94
註冊:2002-06-08

發送簡訊給我
#2 引用回覆 回覆 發表時間:2007-06-14 12:13:08 IP:210.66.xxx.xxx 訂閱
PLC 與 PCL 是不一樣??   您的標題有誤

PLC 一種自動化控制的裝置

PCL HP 機器的專屬語言, EPSON 是 ESC ..... 等
lbbozj
一般會員


發表:1
回覆:3
積分:0
註冊:2007-06-13

發送簡訊給我
#3 引用回覆 回覆 發表時間:2007-06-14 13:30:51 IP:59.120.xxx.xxx 訂閱
謝謝您的指正
我修改標題了
難怪沒人回應^^
請問有人知道如何送PCL指令到USB印表機上
小蚊子
中階會員


發表:55
回覆:267
積分:94
註冊:2002-06-08

發送簡訊給我
#4 引用回覆 回覆 發表時間:2007-06-14 14:41:01 IP:210.66.xxx.xxx 訂閱
這是用 COM PORT 觀念改寫,應該可以.......... 您嘗試看看



var
POSX: TEXTFILE;

begin
// ....
Assignfile(POSX,'USB001'); // COM4');
REWRITE(POSX);

Str := #27 '!' #00........ ;// 要送出的PCL 碼
Writeln(POSX, Str ); //
//.............

CLOSEFILE(POSX);
end;

lbbozj
一般會員


發表:1
回覆:3
積分:0
註冊:2007-06-13

發送簡訊給我
#5 引用回覆 回覆 發表時間:2007-06-15 10:51:02 IP:59.120.xxx.xxx 訂閱
那在VB 下就是像這個樣子了哦!
filemane= "USB001"
hFile = CreateFile(filemane, GENERIC_WRITE Or GENERIC_READ, FILE_SHARE_READ Or FILE_SHARE_WRITE, 0, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, 0)

可是還是不行耶!
是不是我 filemane不該用USB001
(那該用什麼我試過用印表機名稱也不對呀!)

=========引 用 小蚊子 文 章===================
這是用 COM PORT 觀念改寫,應該可以.......... 您嘗試看看




系統時間:2017-10-22 19:59:38
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!