Howdy...
It should go something like this:
uses Printers;
var a:word;
lst:textFile;
begin
AssignFile(lst,'LPT1'); //or LPT2,... COM1, COM2,...
rewrite(lst);
for a:=1 to memo1.Lines.Count do
writeln(lst,memo1.Lines.Strings[a-1]);
CloseFile(lst);
end;
Aris, www.slohost.net
-----Original Message-----
From: Pedro de Barros [mailto:[EMAIL PROTECTED]
Sent: Thursday, August 25, 2005 12:38 PM
To: [email protected]
Subject: Printing to EPSON ESC/POS Printer
Importance: High
Hi,
I'm trying to develop an application that prints the contents of a TMemo
component to an EPSON ESC/POS printer (EPSON TM-U200).
However, I am having difficulty figuring out exactly how to do this, as I
only want to print ASCII text.
Any pointers will be appreciated.
Thanks in advance,
Pedro
_______________________________________________
Delphi mailing list -> [email protected]
http://www.elists.org/mailman/listinfo/delphi
_______________________________________________
Delphi mailing list -> [email protected]
http://www.elists.org/mailman/listinfo/delphi
