| Pregunta: | 12805 - IMPRESORA POR DEFECTO |
| Autor: | Tavinho OP |
| Hola amigos
Como puedo seleccionar la impresora desde Tprinter y que tenga efecto para todos mis reportes de mi aplicación, utilizando Qreport Gracias chau. | |
| Respuesta: | Andy Nin |
| Mira a ver si esto te sirve.. lo encontre una vez no recuerdo donde...
procedure SetDefaultPrinter(const device: string); // Si existe mas de un printer asigno el que quiero directamente var IniFile: TIniFile; begin IniFile := TIniFile.Create('WIN.INI'); try IniFile.WriteString('windows', 'device', device); except IniFile.Free; raise; end; IniFile.Free; SendMessage(HWND_BROADCAST, WM_WININICHANGE, 0, LPARAM(pchar('windows'))); end; | |