codigo de print screen en foxpro

[alejandra paz]

necesito capturar la pantalla atraves de foxpro, y que este a la misma
vez me la guarde como imagen

[Ricardo Pina]

El 7 de mayo de 2012 17:27, alejandra paz <alejand...@gmail.com> escribió:

necesito capturar la pantalla atraves de foxpro, y que este a la misma
vez me la guarde como  imagen

--

            

                   Ricardo Pina

Desarrollo y Servicios Informáticos

                  Profesionales
               www.dsip.com.ar

 

 

[Fox Learner]

solo programa la tecla Impr Pant.

Con ON KEY LABEL NombreTecla

Revisa la ayuda del comando ON KEY.

O si de plano no encuentras cual sería el nombre de la etiqueta de la
tecla usa Lastkey()

Ejemplo. Copia y pega esto en un prg y ejecutalo:

CLEAR
R="S"
DO WHILE R="S"

CLEAR
@ 5,35 SAY "PRESIONE UNA TECLA POR FAVOR"
INKEY(0)
@ 10,35 SAY "EL VALOR DE LA ULTIMA TECLA ES:"
@ 10,75 SAY STR(LASTKEY())

@ 15,40 SAY "REPETIR (S/N):" GET R PICT "@!" VALID R$"SN"
READ

ENDDO

CLEAR
RETURN

[Luis Maria Guayan]

Lo puedes hacer con la clase GdiPlusX que la puedes descargar gratuitamente de http://vfpx.codeplex.com/wikipage?title=GDIPlusX

Mira este breve ejemplo:

DO LOCFILE("System.App")
LOCAL loBmp AS xfcBitmap
WITH _SCREEN.SYSTEM.Drawing
  loBmp = .BITMAP.FromScreen(_SCREEN) && el parametro es el objecto que quieres capturar
  loBmp.SAVE("c:\Pantalla.Png", .Imaging.ImageFormat.Png)
ENDWITH

Luis María Guayán
Tucumán, Argentina
_________________________
http://www.PortalFox.com
Nada corre como un zorro
_________________________

[Fox Learner]

Soporte de graficos de vfp:

http://msdn.microsoft.com/en-US/library/7a4a6w5e(v=vs.80).aspx

[Luis Maria Guayan]

-- Capturando pantallas con GdiPlus-X --
http://www.portalfox.com/article.php?sid=2346

Luis María Guayán
Tucumán, Argentina
_________________________
http://www.PortalFox.com
Nada corre como un zorro
_________________________

El 07/05/2012 17:27, alejandra paz escribió:

[Edward Cifuentes]