Club Builder - Foros de discusión Club Builder
Foro de C++Builder en español
 
 FAQFAQ   BuscarBuscar   MiembrosMiembros   Grupos de UsuariosGrupos de Usuarios   RegistrarseRegistrarse 
 PerfilPerfil   Entra para ver tus mensajes privadosEntra para ver tus mensajes privados   EntrarEntrar 

Problema al imprimir desde el portapapeles

 
Publicar nuevo tema   Responder al tema    Foros de discusión -> Consultas
Ver tema anterior :: Ver tema siguiente  
Autor Mensaje
Mensaje    Asunto: Problema al imprimir desde el portapapeles Responder citando

Necesito hacer una copia de pantalla para imprimirla. Estoy usando este código que ya puse por aquí:
Código:
void __fastcall TfPersona::PerFicClick(TObject *Sender)
{
     Graphics::TBitmap *ImgBmp = new Graphics::TBitmap();
     HDC hdcSrc = GetWindowDC(this->Handle);

     ImgBmp->Width  = this->Width;
     ImgBmp->Height = this->Height;
     BitBlt(ImgBmp->Canvas->Handle, 0, 0, ImgBmp->Width, ImgBmp->Height, hdcSrc, 0, 0, SRCCOPY);
     Clipboard()->Assign(ImgBmp);
     ReleaseDC(this->Handle, hdcSrc);

     if (Clipboard()->HasFormat(CF_BITMAP))
     {
          Application->CreateForm(__classid(TfFicPer), &fFicPer);
          fFicPer->QRImage2->Picture->Assign(Clipboard());
          cReportTitle = "FICHA PERSONAL " + Nombre->Text + " " + Apellidos->Text;
          fFicPer->qFicPer, 0, -1);
          delete fFicPer;
     }
     delete ImgBmp;
     this->SetFocus();
}

El problema es que si hago un preview del QR sí veo en la pantalla la imagen pero si lo imprimo a mi me sale una hoja en blanco y, peor aún, a mi cliente le sale un gran cuadro negro donde debería estar el gráfico. Lo curioso es que el mismo formulario lo empleo en otra parte de la aplicación para imprimir una imagen guardada en una tabla y en este caso sí lo hace bien.
_________________
Un saludo

Necesitamos tu ayuda: Envía AI al 27595 (Coste 1,20 euros + IVA)
Volver arriba
Ver perfil de usuario Enviar mensaje privado Enviar email
Mensaje    Asunto: Responder citando

Añade esta línea inmediatamente debajo de donde declaras "ImgBmp":
Código:
ImgBmp->PixelFormat = pf24bit;
(avísame si con esto te sigue saliendo el recuadro en negro)

Y otro detalle, ¿realmente necesitas usar el portapapeles?, puedes asignar el bitmap directamente al TQRImage:
Código:
fFicPer->QRImage2->Picture->Assign(ImgBmp);
Volver arriba
Ver perfil de usuario Enviar mensaje privado
Mensaje    Asunto: Responder citando

Muchas gracias Leo.
_Leo escribió:
Añade esta línea inmediatamente debajo de donde declaras "ImgBmp":
Código:
ImgBmp->PixelFormat = pf24bit;
(avísame si con esto te sigue saliendo el recuadro en negro)

Al menos a mi ahora me sale bien. Veremos el lunes cuando se lo instale al cliente.
_Leo escribió:
Y otro detalle, ¿realmente necesitas usar el portapapeles?, puedes asignar el bitmap directamente al TQRImage:
Código:
fFicPer->QRImage2->Picture->Assign(ImgBmp);

Es que lo hago es un "pantallazo" de una ficha. Tenía dos opciones: o creaba un formulario con todos sus QRLabel y demás y lo rellenaba o hacía una copia de pantalla; por eso es lo del portapapeles.
_________________
Un saludo

Necesitamos tu ayuda: Envía AI al 27595 (Coste 1,20 euros + IVA)
Volver arriba
Ver perfil de usuario Enviar mensaje privado Enviar email
Mensaje    Asunto: Responder citando

Angel escribió:
Es que lo hago es un "pantallazo" de una ficha. Tenía dos opciones: o creaba un formulario con todos sus QRLabel y demás y lo rellenaba o hacía una copia de pantalla; por eso es lo del portapapeles.

Pero lo que no entiendo es, capturas la pantalla en el bitmap, luego copias el bitmap en el portapapeles y luego el portapapeles en el QRImage, o sea, el paso intermedio de pasarlo al portapapeles es lo que no entiendo, ya que si tienes la captura en el bitmap puedes pasar el bitmap directamente al QRImage sin pasar por el portapapeles, igual se me escapa algo..
Volver arriba
Ver perfil de usuario Enviar mensaje privado
Mensaje    Asunto: Responder citando

_Leo escribió:
Pero lo que no entiendo es, capturas la pantalla en el bitmap, luego copias el bitmap en el portapapeles y luego el portapapeles en el QRImage, o sea, el paso intermedio de pasarlo al portapapeles es lo que no entiendo, ya que si tienes la captura en el bitmap puedes pasar el bitmap directamente al QRImage sin pasar por el portapapeles, igual se me escapa algo..

Embarassed ¿Ves? Eso no se me había ocurrido. ¡Qué vergüenza! De hecho, una vez caturada la pantalla, el portapapeles no lo uso para nada. ¡Seré borrico!
_________________
Un saludo

Necesitamos tu ayuda: Envía AI al 27595 (Coste 1,20 euros + IVA)
Volver arriba
Ver perfil de usuario Enviar mensaje privado Enviar email
Mostrar mensajes de anteriores:   
Cambiar a:  
No puedes publicar temas nuevos en este foro
No puedes responder a temas en este foro
No puedes editar tus mensajes en este foro
No puedes borrar tus mensajes en este foro
No puedes votar en las encuestas de este foro


Hosting WordPress Indedmedia desde 3,99 €
© 2002–2026 Club Builder · Funciona con phpBB.