| Ver tema anterior :: Ver tema siguiente |
| Autor |
Mensaje |
xander2005 Cdt

Registrado: 16 Dic 2005Mensajes: 11
|
Publicado: Lun 14 Feb, 2011 4:17 pm Asunto: Ole Excel Print dialogs |
|
|
Hola a todos, llevo algún tiempo utilizando el excel a traves de Builder pero ahora me piden que antes de imprimir si es posible salga el cuadro de dialogo para poder elegir las impresoras.. como puedo hacerlo...con Printpreview consigo sacar la vista previa pero el cuadro de dialogo de impresoras directamente no lo consigo...
Un saludo y muchas gracias por vuestra atención... |
|
| Volver arriba |
|
 |
_Leo Site Admin

Registrado: 11 Ago 2002Mensajes: 1875Ubicación: Lanzarote - Islas Canarias (España)
|
Publicado: Mie 16 Feb, 2011 6:32 am Asunto: |
|
|
Hola, a ver si te vale este pequeño ejemplo:
| Código: | // Añadimos: #include<ComObj.hpp>
// Creamos una instancia de excel
Variant Application = CreateOleObject("Excel.Application");
// Cargamos un archivo
Variant Workbooks = Application.OlePropertyGet("Workbooks");
Variant Workbook = Workbooks.OleFunction("Open", "d:\\excel\\prueba.xls");
// Mostramos el dialogo de impresión
Variant Dialogs = Application.OlePropertyGet("Dialogs");
Variant Dialog = Dialogs.OlePropertyGet("Item", 8 /*xlDialogPrint*/);
Dialog.OleProcedure("Show");
Workbook.OleProcedure("Close", false);
Application.OleProcedure("Quit"); |
|
|
| Volver arriba |
|
 |
xander2005 Cdt

Registrado: 16 Dic 2005Mensajes: 11
|
Publicado: Lun 21 Feb, 2011 5:21 pm Asunto: |
|
|
| Muchísimas gracias _Leo eres un crack!!!! si no fuera por ti no se que haríamos muchos de nosotros... |
|
| Volver arriba |
|
 |
|