SoloCodigo

Programación General => Visual Basic 6.0 e inferiores => Mensaje iniciado por: Super_G en Lunes 26 de Abril de 2004, 16:30

Título: Capturar Pantalla
Publicado por: Super_G en Lunes 26 de Abril de 2004, 16:30
¿existe alguna funcion de alguna DLL o del mismo VBASICque me permita capturar la pantalla actual en un archivo BMP?
Título: Re: Capturar Pantalla
Publicado por: Cyclop en Lunes 26 de Abril de 2004, 21:13
revisa esto, pero no recuerdo como funciona

http://www.geocities.com/icotext/bajar.htm (http://www.geocities.com/icotext/bajar.htm)


creo que es asi

getDesktop "C:\pantalla.jpg", 100

o

uval = getDesktop("C:\pantalla.jpg")
Título: Re: Capturar Pantalla
Publicado por: pixel en Martes 27 de Abril de 2004, 02:16
hola Cyclop.

A mi también me interesa la función de esta dll la cual baje, pero el visual basic no me acepta referenciarme a esta libreria, pensé que era porque no estaba registrada en el registro de windows, la registre pero sigue igual. Indica que "No se puede hacer agregar una referencia al archivo especificado".  No reconoce las funciones.

saludos.
Título: Re: Capturar Pantalla
Publicado por: Brroz en Martes 27 de Abril de 2004, 09:09
Hola.

Podéis probar con esto, simula una pulsación de la tecla imprimir pantalla:

Código: Text
  1.  
  2. Private Const VK_SNAPSHOT = &H2C
  3. Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)
  4.  
  5. Public Sub PrtScn()
  6.         keybd_event VK_SNAPSHOT, 1, 0&, 0&
  7.         DoEvents
  8.         SavePicture Clipboard.GetData, "C:\Ruta\Archivo.bmp"
  9. End Sub
  10.  
  11.  

Suerte.
Título: Re: Capturar Pantalla
Publicado por: pixel en Miércoles 28 de Abril de 2004, 00:15
si, si funciona, esta muy bien la captura de ventana que realiza ese código, muchas gracias Brroz.  B)

Ese código ejecuta el equivalente a pulsar la tecla de Alt-ImprPant.
el código para tomar una captura de pantalla del escritorio completo sería parecido a ese código?  :huh:

saludos.
Título: Re: Capturar Pantalla
Publicado por: Super_G en Viernes 30 de Abril de 2004, 16:19
Muchas gracias amigos!!!!!!!!!!!!!!!!!