We resolved the issue with gdi+.
No need for any workarounds now.
We suggest a small fix which works for all TIF files from disk.
FIX:
Please locate this line of code in the function FW_ReadImage(…)
in \fwh\source\function\imgtxtio.prg:
aBmp[ 1 ] := GDIP_ImageFromFile( uBmp, !lGdipImage, Upper( cFileExt( uBmp ) ) == "GIF" )
we need to chage
as
The modified code appears like this:
aBmp[ 1 ] := GDIP_ImageFromFile( uBmp, !lGdipImage, Upper( cFileExt( uBmp ) ) $ "GIF,TIFF" )
With this fix, you need not use the above work around.
But you keep
oImage:lBmpTransparent := .f.
The results as tested by us are good and as good as Microsoft Photo.
This is a screenshot comparing Microsoft Photo (left) and xImage(right)
Test program
XIMAGE( "image.tif",, .f. )
With this fix, we can view tif files even with TBitmap