Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Viewing PDF In IE Control
Message
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
01312276
Message ID:
01312280
Views:
20
Kevin,

Try
...
		* Load PDF
		Thisform.oWB.OBJECT.Navigate2(Thisform.cPdfFileName)
		* Wait for load to complete
		lnSeconds = SECONDS()
		DO WHILE (Thisform.oWB.OBJECT.Busy OR Thisform.oWB.OBJECT.ReadyState <> 4) ;
				AND SECONDS() - lnSeconds < 60
			DOEVENTS
		ENDDO

		TRY
			loDoc = Thisform.oWB.oBJECT.Document
			= loDoc.setPageMode("Page Only")
			= loDoc.setShowToolbar(0)
		FINALLY 	
			loDoc = null
		ENDTRY	
...
>I'm using this code from Sergey's site to open a PDF file in a web browser control:
>
>
>PROCEDURE ShowPdf
>	&& Clear Web browser control by loading blank page
>	Thisform.oWB.OBJECT.Navigate2("About:Blank")
>	&& Wait for load to complete
>	lnSeconds = SECONDS()
>	DO WHILE Thisform.oWB.OBJECT.Busy AND SECONDS() - lnSeconds < 60
>		DOEVENTS
>	ENDDO
>
>	&& Load PDF
>	Thisform.oWB.OBJECT.Navigate2(Thisform.cPdfFileName)
>	&& Wait for load to complete
>	lnSeconds = SECONDS()
>	DO WHILE Thisform.oWB.OBJECT.Busy AND SECONDS() - lnSeconds < 60
>		DOEVENTS
>	ENDDO
>ENDPROC
>
>
>It works great, except that the viewer is showing the thumbs panel and the toolbar. Any way to turn these off by default?
--sb--
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform