Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Impresión
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

 
 
Herramientas Buscar en Tema Desplegado
  #6  
Antiguo 21-06-2006
erfedecai erfedecai is offline
Miembro
 
Registrado: jun 2004
Posts: 21
Poder: 0
erfedecai Va por buen camino
El código

Es un pequeño código (en c++) que imprime un documento en word en este caso por una impresora elegida.

Código:
//Creamos un objeto Printer
TPrinter * imp = Printer();
//Creamos las variables a usar
int indice_predeterminado, indice_temporal;
AnsiString nombre_predeterminado, nombre_temporal;
//Guardamos la impresora predeterminada hasta el momento
indice_predeterminado = imp->PrinterIndex;
nombre_predeterminado = imp->Printers->Strings[indice_predeterminado];
//Seleccionamos la impresora a elegir - El objeto TPrinterDialog
// se llama printer
if (printer->Execute())
{
//Cargamos la impresora predeterminada para imprimir
imp = Printer();
indice_temporal = imp->PrinterIndex;
nombre_temporal = imp->Printers->Strings[indice_temporal];
SetDefaultPrinter(nombre_temporal.c_str());
//Imprimimos los archivos
ShellExecute(NULL, "print","ruta del archivo", "", "", SW_HIDE);
}
//Volvemos a colocar la impresora por defecto
//Esto es necesario, ya que si no el objeto Print() del sistema
//se queda con el ultimo indice colocado y no funciona bien
//Esto último no estoy completamente seguro, aunque si no no funciona bien
SetDefaultPrinter(nombre_predeterminado.c_str());
imp->PrinterIndex = indice_predeterminado;
EDITADO (Neftalí): Para añadir los tags de code y que se lea mejor el código.

Un saludo

Última edición por Neftali [Germán.Estévez] fecha: 21-06-2006 a las 16:40:01.
Responder Con Cita
 



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
seleccion de impresora y letra de la impresora emeceuy Impresión 6 13-08-2017 14:11:05
Imprimir escogiendo nombre de impresora el_barto Impresión 3 12-06-2006 17:19:17
Ip y Nombre? Gabriel2 Varios 0 19-05-2005 14:11:19
Nombre de la Impresora Seleccionada Nuria Impresión 1 26-01-2004 11:55:30
obtener el nombre de impresora de printdialog Rafa Impresión 1 29-10-2003 13:27:14


La franja horaria es GMT +2. Ahora son las 10:45:58.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi