Hola Jes�s.. estoy mirando los foros...
Aqu� tu mencionas un ejemplo:
http://www.lazarus.freepascal.org/index.php?PHPSESSID=c2fee4496e99ac6221d5ddfe55ed3e8b&topic=8174.msg39185#msg39185

pero yo no lo tengo.. me lo puedes enviar o decirme d�nde bajarlo? muchas gracias

--- El s�b 31-jul-10, Paola Bruccoleri <pbruccoleri en adinet.com.uy> escribi�:

Lo siento, en ese post solo mencione el directorio donde se encuentran los respectivos archivos de proyecto: calleditorwithpkg.lpi y selectprinter.lpi �es a eso a que te refieres?

Jesus Reyes A.

Jesus Reyes escribi�:

Hola Jes�s..
t� dices esto:
"forgot to comment, a solution that might worth to try, for taking advantage of dot matrix printers and lazreport, first export the report using TfrTextExporFilter and then sent the generated file using printer in RawMode.
see the samples on lazreport/samples/editor and printers/samples/rawmode On writing this it occured to me that it might be possible to extend text exporter by including control characters so dot matrix printer can print texts in bold and italic, will try to make it later."

ese ejemplo, rawmode no est�.. si est� el archivo calleditorwithpkg.lpi (en C:\lazarus\components\lazreport\samples\editor) pero el otro no..

estoy buscando ejemplos de como imprimir en una imprsora de matriz, espec�ficamente una tickeadora (no fiscal) epson tmu950. Adem�s, para setear algunas cosas, se deben mandar caracteres de control (x ej Chr(27)+Chr(33)+Chr(nMode), donde nMode es un nro relacionado a algo).. como corte de papel, letra m�s grande, etc..

muchsa gracias
chauuuuuuuuuu

--- El s�b 31-jul-10, Paola Bruccoleri <pbruccoleri en adinet.com.uy> escribi�:

sorry, me confundi con el directorio dialogs, el archivo de proyecto para el ejemplo rawmode es rawmodetest.lpi.

lazarus/components/printers/samples/rawmode deberia estar, si no puedes bajar los archivos desde aqui: http://svn.freepascal.org/cgi-bin/viewvc.cgi/trunk/components/printers/samples/rawmode/?root=lazarus

si, para eso sirve el rawmode de TPrinter

muchsa gracias chauuuuuuuuuu

Jesus Reyes A.

Jesus Reyes escribi�:

ok, nuevamente muchas gracias
chauuuuuuuuuu

Jesus Reyes escribi�:

el Printer.Write imprime a continuaci�n... veo que no existe Printer.writeln Existe alg�n m�todo o espec�ficamente tenemos que enviar el codigo de salto de l�nea?
chauuuuuuuuuuuu

Yo le agregue los caracteres

procedure ImprimirCadenaRaw(S:String);
const Kenter=CHR(13)+CHR(10);
var  Written: Integer;
begin
    Written:=0;
    S:=S+Kenter;
    Printer.Write(S[1], Length(S), Written);
end;

Claudio Romero escribi�:

ok... ya me parec�a!! pero por las dudas pregunt�.. chauuuuuuuuuuu

Tengo un sistema que env�a la impresi�n directamente a un archivo que puede ser un puerto paralelo, serial o un archivo de texto. El c�digo es el siguiente:

procedure TfSistema.oImprimirClick;
var
MyPrinter:textfile;
cStr:string;
begin
    try
      AssignFILE(MyPrinter,'LPT1');
//      AssignFILE(MyPrinter,'LPTFILE.txt');
      ReWrite(MyPrinter);
      Writeln(MyPrinter,chr(27)+'@');  // Inicializa
      Writeln(MyPrinter,chr(27)+':');  // 16cpi
      Writeln(MyPrinter,'        AEROPUERTO "MANCO CAPAC"');
      Writeln(MyPrinter,'          R.U.C. 20100004675');
      Writeln(MyPrinter,'          Maq:  041191200036');
      Writeln(MyPrinter,'----------------------------------------');
***
    Otros Datos a imprimir
***
      Writeln(MyPrinter,chr(27)+'d0'); //Corte
       // WriteLn(MyPrinter,#27#105);
    finally
      CloseFile(MyPrinter);
  end;
end;

Espero sea lo que est�s necesitando

Yuri Pacoricona Palomino escribi�:

Tengo un sistema que env�a la impresi�n directamente a un archivo que puede ser un puerto paralelo, serial o un archivo de texto. El c�digo es el siguiente:

Hola Yuri..
muchas gracias.. tb probar� esta opci�n!!
chauuuuuuuuuu