Visual Basic - Captura de pantalla

Life is soft - evento anual de software empresarial
 
Vista:

Captura de pantalla

Publicado por maria (12 intervenciones) el 18/08/2004 12:56:55
Me gustaría hacer un programa en visual basic que cuando lo ejecutes se realice un print de la pantalla del ordenador en ese momento. No se que componentes debo agregar, ni que componentes.
Alguien puede ayudarme un poco o darme alguna orientacion?
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Captura de pantalla

Publicado por lenitarr (23 intervenciones) el 18/08/2004 13:16:55
Yo uso este codigo para hacer una captura de pantalla y luego imprimirla, seguramente te sirva...
Private Declare Function BitBlt Lib "gdi32.dll" Alias "BitBlt" (ByVal hdcDest As IntPtr, ByVal nXDest As Integer, ByVal nYDest As Integer, ByVal nWidth As Integer, ByVal nHeight As Integer, ByVal hdcSrc As IntPtr, ByVal nXSrc As Integer, ByVal nYSrc As Integer, ByVal dwRop As System.Int32) As Long
Dim memoryImage As Bitmap

CaptureScreen()

e.Graphics.DrawImage(memoryImage, 0, 0)

Private Sub CaptureScreen()
Dim mygraphics As Graphics = Me.CreateGraphics()
Dim s As Size = Me.Size
memoryImage = New Bitmap(s.Width, s.Height, mygraphics)
Dim memoryGraphics As Graphics = Graphics.FromImage(memoryImage)
Dim dc1 As IntPtr = mygraphics.GetHdc
Dim dc2 As IntPtr = memoryGraphics.GetHdc
BitBlt(dc2, 0, 0, Me.ClientRectangle.Width, Me.ClientRectangle.Height, dc1, 0, 0, 13369376)
mygraphics.ReleaseHdc(dc1)
memoryGraphics.ReleaseHdc(dc2)
End Sub

Saludos.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Captura de pantalla

Publicado por maria (12 intervenciones) el 18/08/2004 13:41:20
Gracias por tu respues.
Si no te importa me gustaría saber qué referencias y componentes añades en visual para que no de errores.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Captura de pantalla

Publicado por lenitarr (23 intervenciones) el 18/08/2004 15:57:04
Simplemente con añadir el codigo va bien, no hay que añadir ningun control, crea una funcion que llame a CaptureScreen() y luego a e.Graphics.DrawImage(memoryImage, 0, 0) y voilá. Pruebalo a ver que tal y me cuentas.

Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar