老古董的條碼機TTP-242
網路上找了好幾天只找到函數庫說明
就是沒有Tsclib.dll for win xp
請前輩幫幫忙

附件為
TSC函數庫說明.pdf
TSPL_TSPL2_Programming_2007_4_14.pdf
TSCLib.dll

http://delphi.ktop.com.tw/download.php?download=upload/4786dcb631b73_TSCLib.7z

不過後來覺得還是用寫port的方式比較列印快...

小弟的印表機初始化（註解不會對齊...sorry）
[code delphi]
procedure TForm1.Button1Click(Sender: TObject);
var
f:TextFile;
begin
ASSIGNFILE(F,'LPT1');
REWRITE(F);
Writeln(F,'CLS'); //清除buffer
WRITELN(F,'SIZE 60 mm,102 mm'); //設定紙張大小,寬 60,高 102
Writeln(F,'SET GAP 0'); //設定 列印模式為 gap 模式
Writeln(F,'GAP 0,0'); //設定gap間距
Writeln(F,'OFFSET 20 mm'); //紙張空白的 head 為 20 mm
Writeln(F,'SPEED 10'); //設定列印速度為最快
Writeln(F,'REFERENCE 15,130');
Writeln(F,'SET KEY1 OFF'); //設定印表機按鍵失效,預防多次列印
CLOSEFILE(F);
end;[/code]

測試列印
[code delphi]
procedure TForm1.Button2Click(Sender: TObject);
var
f:TextFile;
begin
ASSIGNFILE(F,'LPT1');
REWRITE(F);
WRITELN(F, Memo1.Lines.Text);
CLOSEFILE(F);
Sleep(4000);
end;
[/code]

編輯記錄

感謝edp兄
條碼機本來也是用寫port的方式
後來接觸的條碼機都是使用函式庫
照說明書使用.dll感覺比較簡單
所以想把TTP242改看看

這裡有TSC的Driver
http://www.edobi.com/downloadfiles/drivers/tsc.win9x.me.nt4.2k.xp.zip
適用於TDP-522、TDP-643、TTP-2410、TTP/TDP-242、TTP/TDP-243(E)、TTP/TDP-243M(244ME)、TTP/TDP-342(M)。

------
先查HELP
再查GOOGLE
最後才發問

沒人有義務替你解答問題
在標題或文章中標明很急
並不會增加網友回答速度

Developing Tool:
1.Delphi 6
2.Visual Studio 2005
3.Visual Studio 2008
DBMS:
MS-SQL