FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#2
|
|||
|
|||
No lo he probado, pero supongo que algo asi deveria servirte
Código:
var i : integer; begin for i := 0 to Printer.Printers.Count - 1 do begin Printer.PrinterIndex := i; QuickRep1.PrinterSettings.PrinterIndex := Printer.PrinterIndex; end; end; |
|
|
|