FiveTech Support Forums

Hello FiveWinners.

someone knows how to capture screen content and save to a file. JPG?

And as you can reduce the file size. Jpg?

As does Windows 7 at its bottom bar.

Thank you very much

viewtopic.php?f=6t=17947p=93759#p93759

&&

/------------------------------------------------------------------------------/
Function ImprimePantalla( oDlg, cFile )
/------------------------------------------------------------------------------/

/ Esta funcion crea un fichero BMP con el volcado de pantalla del Handle oDlg /
/ y luego se imprime. /

LOCAL hBmp, hDib, oPrn
DEFAULT cFile := "volcado.Bmp"

hBmp := WndBitmap( oDlg:hWnd )
hDib := DibFromBitmap( hBmp )
DibWrite( "TMP\" + cFile, hDib )
GloBalFree( hDib )
DeleteObject( hBmp )

PRINT oPrn NAME "Impresión de volcados de Pantalla" PREVIEW

  If Empty( oPrn:hDC )
     Return NIL
  End

  PAGE
     oPrn:SayBitmap( 800, 300, "TMP\" + cFile, 4200, 5000 )
  ENDPAGE

ENDPRINT

Return NIL

un saludo
JLL