MensajePublicado: Lun 03 Dic, 2012 6:37 am    Asunto: indice de impresoras instaladas y predeterminada Responder citando
Espero sirba a alguien es sencillo pero funcional


Código:

//CBImpresora es un TComboBox
        //Creamos un objeto Printer
        TPrinter * imp = Printer();
        //Agregamos la impresora Predeterminada al text del combobox
        CBImpresora->Text = imp->Printers->Strings[imp->PrinterIndex];
        // Agregamos las impresoras existentes al ComboBox
        for(int x=0;x<imp>Printers->Count-1;x++)
                CBImpresora->Items->Add(imp->Printers->Strings[x]);