Nein, was soll der ganze Firlefanz ?
Zitat von
tuxracer78:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var tf: TextFile;
begin
AssignFile(tf, 'LPT1:');
Rewrite(tf);
Writeln(tf,<BARCODE Beginn ESC Sequenz>+'1234567890123'+<BARCODE Ende ESC Sequenz>);
CloseFile(tf);
end;
Da tut sich aber immer noch nichts am Drucker.
LPT1: 1 = die Zahl EINS !! Doppelpunkt dahinter !!
ohne das ln am Ende von write wird nichts gedruckt
