Question rPreview

[byte-one]

Hi to all!
I have seen, that the minipages in preview in WIN XP are not right visible (transparent?). Can anyone test this?

[nageswaragunupudi]

Do you have XP? Can you please post a screen shot?
Meanwhile, can you build \fwh\samples\ximage02.prg and check how it looks on XP as well as later OS ?

[byte-one]

Same routines to make bitmaps with CreateCompatibleBitmap() use on other places in program without problems! if i use CreateCompatibleBitmap() only in black/white (the standard hdc) is ok! My opinion is that TImageList() or TTreeView() is the problem!
Tomorrow ill send a screenshoot!

[nageswaragunupudi]

Thanks.
Meanwhile, as I suggested please check ximage02.prg also. This is another approach to preview. This is to check if this alternative approach works on XP

[byte-one]

Mr. Rao, tested ximage02.prg in XP. All ok!

[nageswaragunupudi]

Mr. Rao, tested ximage02.prg in XP. All ok!

Good to know.
But do you still have the problem with our standard RPreview on XP?

[byte-one]

Yes, but i switch the thumbnails in XP to black/white and then is ok!

Code: Select all  Expand view

local hDC1 := GetDC( 0 )
   local hDC := CreateCompatibleDC( hDC1 )
   local hBmp := CreateCompatibleBitmap( if(iswinxp(),hDC,hDC1), nWidth, nHeight )    //switching here!
   local hOldBmp := SelectObject( hDC, hBmp )
   local hEMF := GetEnhMetaFile( cEmf )

Is TImageList() the reason??