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 

Imagen de portapapeles a QRImage

 
Publicar nuevo tema   Responder al tema    Foros de discusión -> Consultas
Ver tema anterior :: Ver tema siguiente  
Autor Mensaje
Mensaje    Asunto: Imagen de portapapeles a QRImage Responder citando

Tengo este código:
Código:
void __fastcall TfPersona::PerFicClick(TObject *Sender)
{
     Graphics::TBitmap *pBitmap = new Graphics::TBitmap();
     HDC hdcSrc = GetWindowDC(this->Handle);

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

     ReleaseDC(this->Handle, hdcSrc);

     if (Clipboard()->HasFormat(CF_BITMAP))
     {
          Application->CreateForm(__classid(TfFicPer), &fFicPer);

          Clipboard()->Open();
          pBitmap->LoadFromClipboardFormat(CF_BITMAP, Clipboard()->GetAsHandle(CF_BITMAP), 0);
          Clipboard()->Close();

          fFicPer->QRImage2->Picture->Assign(pBitmap);
          cReportTitle = "FICHA PERSONAL " + Nombre->Text + " " + Apellidos->Text;
          fFicPer->qFicPer->Preview();
          delete fFicPer;
     }
     delete pBitmap;
     this->SetFocus();
}

para volcar un copia de pantalla en un QucikReport a través del portapapeles. He comprobado que en el mismo sí está la imagen pero al hacer el Preview me sale el formulario en blanco. ¿Alguna idea?
_________________
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

Lo he probado y funciona, ¿supongo que el TQRImage esta dentro de un TQRBand?
Volver arriba
Ver perfil de usuario Enviar mensaje privado
Mensaje    Asunto: Responder citando

Sí, dentro de una banda de detalle.
_________________
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.