Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
GDIplusX
Message
From
19/11/2007 10:56:32
 
 
To
19/11/2007 08:48:49
General information
Forum:
Visual FoxPro
Category:
COM/DCOM and OLE Automation
Title:
Environment versions
Visual FoxPro:
VFP 9
Miscellaneous
Thread ID:
01269875
Message ID:
01269912
Views:
27
>this code works if I have a multipage Tiff
>it shows nothing when its a one page TIFF
>What should be done in the case of a single page tiff?
>
>
>WITH _SCREEN.SYSTEM.Drawing
>	* Load the multiframe TIFF to GDI+
>	this.oMultif = .BITMAP.New(ALLTRIM(THIS.cSourceFile))
>	this.nFrames = this.oMultif.GetFrameCount()
>	this.txt3.Refresh()
>	IF this.nFrames > 1
>		this.nPictureCounter=0
>		this.oMultif.SelectActiveFrame(.Imaging.FrameDimension.PAGE, this.nPictureCounter)
>		This.Image1.PictureVal = this.oMultif.GetPictureVal(.Imaging.ImageFormat.Tiff)
>	ELSE
>		MESSAGEBOX("The selected file is not a Multiframe TIFF",0,'',5000)
>		*this.oMultif.SelectActiveFrame(.Imaging.FrameDimension.PAGE, this.nPictureCounter)
>		This.Image1.Picture = ALLTRIM(THIS.cSourceFile)
>		
>	ENDIF
>
>
>
>Thanks
>
>Peter


Hi Peter,

What value does the expression
this.oMultif.GetFrameCount()
Return to you ?
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform