Author: cchvfp
Posted: 2007-06-01 at 09:20:50
For this specific need, the files
> Source\Drawing.vct
> Source\Drawing.vcx
> Source\System.vcx
> Source\System.vct
Probably will make it work.
But the header files (*.h) are still needed !
Hope this helps
Cesar Chalom
> 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:
>
>
>
> 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)
>
>
>
> 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
> 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.
>
>
[excessive quoting removed by server]