Krug
Много сообщений (42) |
 | Как вписать TTP246M? |
| | 14.09.2007 13:24:05 |
Всем доброго времени суток...
Стоит задача вписать этот принтер в нашу самописную программу (печатается штрих-кода из базы). Так вот, с принтером поставляется специальная DLL-ка + описание процедур...
согласно инструкциям получсился код:
.......
.......
openport('TSC TTP-246M');// подключаемся к принтеру
setup('58','30','4.0','13','0','3','0');// задаём размеры этикетки и парамеры печати
nobackfeed;
clearbuffer();
barcode('64','100','EAN13','8','1','0','2','4',PAnsiChar(NomerS));// задаю парамеры штрих-кода и переменную, которая печатается в виде штрих-кода (номер из базы. присваивается заранее)
printlabel(PAnsiChar(Chislo),'1');// печаь нужного количества
closeport();// отключаемся от принтера
.......
Так вот, почему-то штрих-код печатается высокой всего 1 мм...
Что это? Глюк или я что-то неверно наваял? Вроде процедуры-то простые...
|
Krug
Много сообщений (42) |
 | Как вписать TTP246M? |
| | 14.09.2007 14:20:55 |
А.. понял
заработало
barcode('64','100','EAN13','8','1','0','2','4',PAnsiChar(NomerS))
вот эта "8" - это ж высота штрих-кода. В точках задаётся же
Надо требуемое кол-во мм умножать на 8
Спасибо, стормозил
|