[Lazarus-es] Impresion (matricial) en red con win7

Paola Bruccoleri pbruccoleri en adinet.com.uy
Mie Jun 20 22:31:14 CEST 2012


El 20/06/2012 05:26 p.m., Jorge M. Martinez Saez escribió:
> El 20-06-2012 13:11, Claudio Romero escribió:
>> Otra opción para analizar sería
>>
>> si \\jorge-martinez\okidata es una impresora de red matricial, que no
>> esta instalada en el windows local, puedes usar writeln para grabar lo
>> que vas a imprimir en un archivo de texto. Y luego ejecutar un bat
>> externo a lazarus o el mismo CMD.
>>
>> copy /b archivo_a_imprimir.txt \\jorge-martinez\okidata
>>
>> Aunque es una opción mas. Esto no usaría TPrinter, ni los nombres de
>
>> impresoras. Pero solo funciona en matriciales (ya que envio texto puro
>> a imprimir)
>>
>> En linux con QT4 yo hago algo parecido ya que Qt no soporta raw mode 
>> printing.
>>
>> Depende de como te sea mas cómodo para ti.
>>
>> Saludos.
>>
>> El día 20 de junio de 2012 13:58, Claudio 
>> Romero<clauslack en gmail.com>  escribió:
>>> Printer.Printers.Strings[numero] usa el nombre de la impresora que se
>>> ve en el panel de control de Windows. Para usarla la impresora debe
>>> estar instalada en windows (en Raw Mode o con cualquier driver de
>>> epson.) De todas maneras imprime en RawMode, sin usar drivers, solo
>>> caracteres de control.
>>>
>>> Saludos
>> _______________________________________________
>> Lazarus-es mailing list
>> Lazarus-es en lists.lazarus.freepascal.org
>> http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es
>>
> Muy buenas tus ideas.... al final he probado de varias formas y me 
> quedo momentaneamente con lo siguiente:
>
> for numero:= 0 to Printer.Printers.count -1 do
>        begin
>             if rightstr(Printer.Printers.Strings[numero],21)= 'OKIDATA 
> ML320_1 TURBO' then // aqui ya no importa si es local o en red ya que 
> solo hay una con ese nombre en toda la red...;)
>                Begin
>                  Printer.PrinterIndex:=numero;
>                  Printer.Rawmode:= True;
>                  Printer.BeginDoc;
>                end;
>        end;
>
> Claudio: Te pasastes, gracias, gracias.
>
> Saludos
>
y yo me he guardado todos estos mails! xq justamente lo necesito para el 
pos...
byeeeeeeeeee





More information about the Lazarus-es mailing list