Author: Gianni Turri
Posted: 2007-06-01 at 03:19:55
Hi Michael,
few lines of code to do the full job using the GdiPlusX library!
http://www.codeplex.com/VFPX/Release/ProjectReleases.aspx?ReleaseId=1711
Download the zip at the link, extract only
Source\Drawing.vct
Source\Drawing.vcx
Source\Drawing2D.vct
Source\Drawing2d.vcx
Source\Imaging.vct
Source\Imaging.vcx
Source\System.vcx
Source\System.vct
Source\Text.vct
Source\Text.vcx
Then run the following code to capture the screen in a file:
<code>
local loGdiPlusX
loGdiPlusX = newobject("xfcSystem", "system.vcx")
local loBmp as xfcBitmap
loBmp = loGdiPlusX.Drawing.Bitmap.FromScreen()
loBmp.Save("ScreenCapture.jpg", loGdiPlusX.Drawing.Imaging.ImageFormat.Jpeg)
</code>
you can also use this syntax to capture the current form
loBmp = loGdiPlusX.Drawing.Bitmap.FromScreen(Thisform)
or this syntax to capture the vfp screen area
loBmp = loGdiPlusX.Drawing.Bitmap.FromScreen(_screen)
Then when less "under pressure" take a look at the full contenent of the GdiPlusX zip,
it contains a project full of runnable samples.
Gianni
----- Original Message -----
From: MB Software Solutions <vfpmcp@mbsoftwaresolutions.com>
To: profoxtech@leafe.com
Sent: Thu, 31 May 2007 14:19:35 -0400
Subject: Re: Screencapture.prg -- converting the clipboard image to a file on disk?
>Matthew Jarvis wrote:
>> Sorry, but what I have doesn't do what you are looking for...
>>
>
>Well, I suppose I could run Stuart's code, have it launch MSPaint with a
>RUN command (that should be on every system, right?), save that to a
>file with some purposeful or perhaps random name in a temp folder, then
>pop up a form for the user to enter comments into an editbox, then usign
>blat to email both the comments and file back to me.
>
>Whew! Now...to put that plan into action.