| Usuario |
Capturar Formulario como imagen? |
Desconocido
|
| Enviado - 4/6/2002 |
| |
| Necesito capturar un formulario completo como imagen y poder asignarlo a otro ocx (VSVIEW 7.0) para poder incorporarlo como informe??? |
| |
|
Desconocido
|
| Enviado - 19/6/2002 |
| |
Aquí te paso un código de ejemplo a ver si te vale:
En un formulario en blanco incorpora un botón llamado cmdPrintScreen y un picturebox llamado picture1, ahora pega el siguiente código:
Private Sub cmdPrintScreen_Click()
'1 is the screen. Replace it with 0 and you'll get the form
keybd_event vbKeySnapshot, 1, 0&, 0&
'update the clipboard before doing something else
DoEvents
'copy clipboard to the picturebox (vbCFBitmap = 2)
Picture1 = Clipboard.GetData(vbCFBitmap) ' Original Size
End Sub
En un módulo bas pega lo siquiente:
Public Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)
Un saludo. |
| |
|
|
|
Microsoft Certified