Ver Mensaje Individual
  #4  
Antiguo 28-05-2003
__cadetill __cadetill is offline
Miembro
 
Registrado: may 2003
Posts: 3.387
Reputación: 25
__cadetill Va por buen camino
un ejemplo de llamada

Código:
 
AddImpresora( 'EPSON_GEN', 'LPT1:', 'Generic / Text Only', 'winprint' );
Para imprimir por ella, tendras que recorrer las impresoras instaladas hasta que des con ella, buscando por el nombre que le has asignado (en el ejemplo EPSON_GEN). Añade Printers en el uses de tu form

Código:
var i : integer;
begin
     i := 0;
     while (Printer.Printers[i] <> 'EPSON_GEN') and 
         (i < Printer.Printers.Count - 1) do
        inc(i);
     if i < Printer.Printers.Count - 1 then
        Printer.PrinterIndex := i;
end;
Espero te sirva
Responder Con Cita