Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
General field to clipboard
Message
 
To
12/07/2001 15:45:25
General information
Forum:
Visual FoxPro
Category:
Windows API functions
Miscellaneous
Thread ID:
00529829
Message ID:
00529973
Views:
29
Mike,
my code should work as far as the correct delimeters and parsing - str2 was run thru a conversion utility to gif and then output to the web browser and, as far as I know, worked every time.

>Claude:
>The following code is used to put the screen into a general field.
>
> * "Press" or for the user
> declare integer keybd_event in Win32API integer, ;
> integer, integer, integer
> vk_snapshot = 44
>
> * Copy the active application window to the clipboard
> * (equivalent to )
> =keybd_event(vk_snapshot, 0, 0, 0)
>
>
>lnSelect = select()
>
>define window PrintScr from 500, 500 TO 600, 600
>activate window PrintScr
>
>* Let the user know we are working, wait one second to allow print screen to finish
>wait window "Preparing Screen Print" timeout 1
>
>create cursor PrintScreen (ScreenPrt G, Notes M)
>select PrintScreen
>append blank
>
>* >* ScreenPrt general field
>* = Save changes to and close the ScreenPrt general
>* field
>keyboard '{Ctrl+V}{Ctrl+W}' plain clear
>modify general ScreenPrt window PrintScr
>
>
> Using this code from Gentofil.prg
>CASE FSEEK(liHandlein,599)>0 AND FREAD(liHandlein,2)="BM"
> lcExtension="BMP"
> liEndOffset=FSEEK(liHandlein,599)+83
>
>(which is very similar to your suggestion)
>The debugger tells me that FREAD(liHandlein,2) is " " when the screen was saved on a Windows 98 box and
>2 odd characters (1 of which is a funny "y". I commented out the AND above and saved to a file with a .BMP
>extension and tried to open it with Futuris Imager. There is nothing there to show me.
>
>Any ideas?
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform