Is there any way I can print out the form as it looks on the screen?

Is there any way I can print out the form as it looks on the screen?  VFP9



Thanks,

Thorkell

"Thorkell" <thorkell@simnet.is> schrieb im Newsbeitrag
news:e00XHU9YFHA.3220@TK2MSFTNGP14.phx.gbl...
> Is there any way I can print out the form as it looks on the screen?  VFP9

There is nothing built in, but several tools available. Try a
Google groups search, e.g. subject "print screen", groups *fox*
http://groups-beta.google.com/group...=S
earch
You can create your own function using the CreateCompatibleBitmap API
too, or have a look at GDI+ (www.universalthread.com, Downloads search
for "GDI")


hth
-Stefan


--
|\_/| ------ ProLib - programmers liberty -----------------
(.. ) Our MVPs and MCPs make the Fox run....
- /  See us at www.prolib.de or www.AFPages.de
-----------------------------------------------------------

LOL!

"Paul Pedersen" <no-reply@swen.com> schrieb im Newsbeitrag
news:eRTDyFHZFHA.2288@TK2MSFTNGP14.phx.gbl...
> See attached.
>
> "Thorkell" <thorkell@simnet.is> wrote in message
> news:e00XHU9YFHA.3220@TK2MSFTNGP14.phx.gbl... 
VFP9 
>
>
>

"Paul Pedersen" <no-reply@swen.com> schrieb im Newsbeitrag
news:eRTDyFHZFHA.2288@TK2MSFTNGP14.phx.gbl...
> See attached.

Thanks Paul. Just tried and had some great results using your technique.
Any hints how to create PDF files that way?


TIA
-Stefan

This routine will print the clipboard from Word

ox=CREATEOBJECT("word.application")
ox.Visible = .t.
odoc=ox.Documents.Add()
ox.Selection.Paste
odoc.printout


This function will send the keystrokes to Windows to capture your screenshot
to the clipboard.   There are probably other methods.


* Declare the Function
DECLARE INTEGER keybd_event IN Win32API ;
INTEGER, INTEGER, INTEGER, INTEGER
VK_SNAPSHOT = 44    && from the winuser.h
VK_LMENU = 164
KEYEVENTF_KEYUP = 2
KEYEVENTF_EXTENDEDKEY = 1


* To get just the Active window
DOEVENTS
keybd_event(VK_SNAPSHOT, 1, 0, 0 )
keybd_event(VK_SNAPSHOT, 1, KEYEVENTF_KEYUP, 0 )
DOEVENTS


* To get the Full windows desktop
DOEVENTS
keybd_event( VK_LMENU,    0, KEYEVENTF_EXTENDEDKEY, 0 )  && key down
keybd_event( VK_SNAPSHOT, 0, KEYEVENTF_EXTENDEDKEY, 0 )
keybd_event( VK_SNAPSHOT, 0, KEYEVENTF_EXTENDEDKEY + KEYEVENTF_KEYUP, 0 )
keybd_event( VK_LMENU,    0, KEYEVENTF_EXTENDEDKEY + KEYEVENTF_KEYUP, 0 )
DOEVENTS


I hope this helps,

Dan






"Thorkell" <thorkell@simnet.is> wrote in message
news:e00XHU9YFHA.3220@TK2MSFTNGP14.phx.gbl...
> Is there any way I can print out the form as it looks on the screen?  VFP9
>
>
>
> Thanks,
>
> Thorkell
>
>

Thank you guys for the info and a good laugh. The code from Dan Tallent
works fine.



Thorkell

I'm glad I could help,

Someone else might have a better (faster) method to printout the contents of
the clipboard.

Dan Tallent


"Thorkell" <thorkell@simnet.is> wrote in message
news:eD1R1eGaFHA.900@tk2msftngp13.phx.gbl...
> Thank you guys for the info and a good laugh. The code from Dan Tallent
> works fine.
>
>
>
> Thorkell
>
>