FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour Question rPreview
Posts: 1048
Joined: Mon Oct 24, 2005 09:54 AM
Question rPreview
Posted: Thu Mar 03, 2016 06:18 PM

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

Regards,
Günther
---------------------------------
office@byte-one.com
Posts: 10733
Joined: Sun Nov 19, 2006 05:22 AM
Re: Question rPreview
Posted: Thu Mar 03, 2016 11:35 PM

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 ?

Regards



G. N. Rao.

Hyderabad, India
Posts: 1048
Joined: Mon Oct 24, 2005 09:54 AM
Re: Question rPreview
Posted: Fri Mar 04, 2016 12:23 AM

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!

Regards,
Günther
---------------------------------
office@byte-one.com
Posts: 10733
Joined: Sun Nov 19, 2006 05:22 AM
Re: Question rPreview
Posted: Fri Mar 04, 2016 12:29 AM

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

Regards



G. N. Rao.

Hyderabad, India
Posts: 1048
Joined: Mon Oct 24, 2005 09:54 AM
Re: Question rPreview
Posted: Fri Mar 04, 2016 11:56 AM

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

Regards,
Günther
---------------------------------
office@byte-one.com
Posts: 10733
Joined: Sun Nov 19, 2006 05:22 AM
Re: Question rPreview
Posted: Fri Mar 04, 2016 12:06 PM
byte-one wrote: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?
Regards



G. N. Rao.

Hyderabad, India
Posts: 1048
Joined: Mon Oct 24, 2005 09:54 AM
Re: Question rPreview
Posted: Fri Mar 04, 2016 12:17 PM
Yes, but i switch the thumbnails in XP to black/white and then is ok!
Code (fw): Select all Collapse
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??
Regards,
Günther
---------------------------------
office@byte-one.com

Continue the discussion