Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Form to printer
Message
From
17/05/2004 11:00:05
 
 
To
14/05/2004 08:57:19
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Title:
Miscellaneous
Thread ID:
00903942
Message ID:
00904581
Views:
14
Tracy - Sorry for the confusion. I have the DibApi32.Dll in the default data folder on the server. I implemented this about a year ago and it has worked great on a system which has 98, XP and Window 2000 workstations. Sorry I didn't get back to you sooner as I responded to the earlier thread and then headed out of town.

Hope this helps.

Gaylen

>Hi Gaylen,
>I read this message and tried your code. I receive an error that my Windows XP machine cannot load DibApi32. Where is that from? I do not have it...
>
>Actually, a correction, I do have it but not in my path. I have it with the VFE Framework...
>
>
>
>*********************************
>* Print the current window
>function printscr()
>
>	DECLARE INTEGER GetDesktopWindow IN Win32api
>
>	DECLARE INTEGER PrintWindow IN DibApi32 ;
>	INTEGER HWnd, ;
>	INTEGER fPrintArea, ;
>	INTEGER fPrintOpt, ;
>	INTEGER wxScale, ;
>	INTEGER wyScale, ;
>	STRING @ szJobName
>
>	LOCAL nRetVal,cJobName && title you want to show when printing
>
>	cJobName = 'Print Screen' && could be passed as a parameter, also.
>
>	nRetVal = PrintWindow(GetDesktopWindow(),1,1,0,0,@cJobName)
>	IF nRetVal != 0
>		IF nRetVal != 6 && 6 = User canceled printing
>			MESSAGEBOX("Unable to print the window" + chr(10) + ;
>			"See System Administrator " + STR(nRetVal),48, ;
>			"FUBA Print Screen ")
>		ENDIF
>	ENDIF
>
>RETURN
>
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform