Hallo, danke für die schnelle Antwort.
Ich habe mal im Netz rumgesucht und das hier zusammengebaut:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var tf: TextFile;
begin
AssignFile(tf, 'LPT1');
Rewrite(tf);
WriteLn(tf, '<STX>L');
WriteLn(tf, 'D11<CR>');
WriteLn(tf, '1A00000001501000123456789<CR>');
WriteLn(tf, '121100000000100Barcode A<CR>');
WriteLn(tf, 'E');
CloseFile(tf);
end;
end.
Diese
ASCII-Sequenz soll, laut Programmierhandbuch einen Barcode a mit den Werten 0 bis 9 drucken.
Wenn ich die Schaltfläche drücke, tut sich aber rein gar nichts. Keine Reaktion vom Drucker.
Kann mir jemand helfen?