FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Capturar la Pantalla y salvarla como JPG (para Antonio)
Posts: 392
Joined: Tue Jul 29, 2008 01:55 PM
Capturar la Pantalla y salvarla como JPG (para Antonio)
Posted: Tue Jan 26, 2010 11:50 AM

Hola FiveWinners.

Alguien sabe como capturar el contenido de la pantalla y guardarla en un archivo .JPG?

Y como se puede reducir el tamaño del archivo .JPG haciendo una pantalla miniatura?

Asi como lo hace Windows 7 en su barra inferior.

Saludos

Visite Chiapas, el paraiso de México.
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: Capturar la Pantalla y salvarla como JPG
Posted: Tue Jan 26, 2010 01:16 PM

Aqui explicamos como generar un JPG a partir de una ventana:

viewtopic.php?p=93192#p93192

El bitmap puedes reducirlo con BmpResize() y del mismo modo obtener el JPG más pequeño

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 392
Joined: Tue Jul 29, 2008 01:55 PM
Re: Capturar la Pantalla y salvarla como JPG
Posted: Wed Jan 27, 2010 05:52 AM

Caray se ve muy simple.

Antonio, Gracias por responder.

Voy a probarlo

saludos

Visite Chiapas, el paraiso de México.
Posts: 392
Joined: Tue Jul 29, 2008 01:55 PM
Re: Capturar la Pantalla y salvarla como JPG ( Para Antonio)
Posted: Wed Jan 27, 2010 09:29 PM

Antonio:

lo que realmente requiero es poder capturar la imagen de la pantalla como lo ve el usuario: he usado la siguiente secuencia :

     DibWrite( "screen.bmp", DibFromBitmap( WndBitmap( oWnd:hWnd ) ) ) , ;
     ShellExecute( GetActiveWindow() ,nil, cFilePath(GetModuleFileName(GetInstance())) + "screen.bmp",'','',5)        )

El resultado que me muestra es la primera pantalla o ventana que se creo, PERO, sobre ese ventana, he mostrado varios diálogos en diferentes posiciones y estos últimos NO se capturan.

Ya he intentado capturar las ventanas de los diálogos, pero el resultado es que solo se captura el dialogo en si, pero no la ventana completa.

Es decir lo que quiero capturar como JPG O BMP es lo que el usuario esta observando la pantalla.

tienes alguna idea?

Gracias

Saludos

Visite Chiapas, el paraiso de México.
Posts: 1445
Joined: Mon Oct 10, 2005 02:38 PM
Re: Capturar la Pantalla y salvarla como JPG ( Para Antonio)
Posted: Wed Jan 27, 2010 09:47 PM
devtuxtla wrote:Antonio:

lo que realmente requiero es poder capturar la imagen de la pantalla como lo ve el usuario: he usado la siguiente secuencia :

DibWrite( "screen.bmp", DibFromBitmap( WndBitmap( oWnd:hWnd ) ) ) , ;
ShellExecute( GetActiveWindow() ,nil, cFilePath(GetModuleFileName(GetInstance())) + "screen.bmp",'','',5) )

El resultado que me muestra es la primera pantalla o ventana que se creo, PERO, sobre ese ventana, he mostrado varios diálogos en diferentes posiciones y estos últimos NO se capturan.

Ya he intentado capturar las ventanas de los diálogos, pero el resultado es que solo se captura el dialogo en si, pero no la ventana completa.

Es decir lo que quiero capturar como JPG O BMP es lo que el usuario esta observando la pantalla.

tienes alguna idea?

Gracias

Saludos


Aunque sea sólo por probar y según tu código, haz:

DibWrite( "screen.bmp", DibFromBitmap( WndBitmap( GetDeskTopWindow() ) ) ) , ;
ShellExecute( GetActiveWindow() ,nil, cFilePath(GetModuleFileName(GetInstance())) + "screen.bmp",'','',5) )


Por lo que dices, no creo que funcione pero esto es gratis.

Un Saludo
Carlos G.

Un Saludo

Carlos G.



FiveWin 25.12 + Harbour 3.2.0dev (r2502110321), BCC 7.7 Windows 11 Home

Posts: 392
Joined: Tue Jul 29, 2008 01:55 PM
Re: Capturar la Pantalla y salvarla como JPG (para Antonio)
Posted: Wed Jan 27, 2010 10:53 PM

OYE Carlos...

Excelente

Saludos

Visite Chiapas, el paraiso de México.

Continue the discussion