Drukowanie przez LPT

0

Jak wysłac plik textowy bezpośrednio na LPT z pominięciem sterownika drukarki ???

JmP

0

Nie wiem czy jest to dobry pomysł, bo chyba różne drukarki moga mieć różny sposób komunikowania się z kompem. Inaczej nie byłyby potrzebne sterowniki. Tak mi się przynajmniej wydaje :)

--

Delphi 6

Pozdrówka

0

Opiszę Ci temat trochę szerzej. Nie mam takiej zwyczajnej drukarki, mam drukarkę kodów kreskowych. W tej drukarce drukowanie polega na wysłaniu odpowiednich kodów sterujących i textów w jednym stringu np:

^Q20,3
^W46
^H5
^S4
BQ,16,16,2,5,100,0,1,To jest text

Zrobiłem taki patent, że ustawiłem drukarkę systemową Generic/Text only (win xp). Powinna to być drukarka drukująca tylko text. Cały problem tkwi w Delphi, ponieważ jak robię wszystko zgodnie ze sztuką tzn:

var
text: string;
begin
text:='^Q20,3'#13#10+
'^W46'#13#10+
'^H5'#13#10+
'^S4'#13#10+
'BQ,16,16,2,5,100,0,1,To jest text';
Printer.BeginDoc;
Printer.Canvas.TextOut(0,0,Text);
Printer.EndDoc;
end;

to wówczas wywala mi wszystkie entery (#13#10), jak dam dla każdej linijki Printer.Canvas.TextOut(0,0,Text), to wywala mi #10, poza tym na początku stringa wprowadza chyba 08. Wiem to stąd, że w sterowniku ustawiłem sobie wydruk do pliku i obejrzałem ten plik.

Dlatego chcĘ wysłać stringa bezpośrednio na LPT !!! ufff.
Czekam na pomoc

JMP

0

Znalazałem !!!

Jak by kogoś to interesowało, to źródła znajdują się tu:

http://delphi.cartall.com.pl/frames.htm

FAQ: "Jak drukować tekstowo w Delphi?"
autor "Krzysztof Świątkowski"

JmP

1 użytkowników online, w tym zalogowanych: 0, gości: 1, botów: 0