|
procedure TForm1.btn2Click(Sender: TObject);
var
ivan:TStringList;
Txt:AnsiString ;
begin
ivan:=TStringList.Create;
ivan.LoadFromFile('C:\Users\Master\Downloads\Ejemplo\r1.txt');
txt:=ivan.Text;
Write_RAW_StringToPrinter(txt,'ZDesigner GC420t (EPL)');
end;
ahi si funciono pero leyendo desde un txt
voy a seguir probando gracias a todos por su interes en ayudar
__________________
IVAND
|