trasparent bitmap on xbrowse

Post Reply
User avatar
Silvio.Falconi
Posts: 4956
Joined: Thu Oct 18, 2012 7:17 pm

trasparent bitmap on xbrowse

Post by Silvio.Falconi »

Image

any solution ?
Last edited by Silvio.Falconi on Mon Jun 10, 2019 2:18 pm, edited 2 times in total.
I use : FiveWin for Harbour August 2020 (Revision) - Harbour 3.2.0dev (r1712141320) - Bcc7.30 - xMate ver. 1.15.3 - PellesC
User avatar
ukoenig
Posts: 3981
Joined: Wed Dec 19, 2007 6:40 pm
Location: Germany
Contact:

Re: trasparent bitmap

Post by ukoenig »

Silvio,

2 transparent images

Image

Image

a little bit smaller ( if to heavy )

Image

Image

regards
Uwe :D
Last edited by ukoenig on Tue Jun 11, 2019 11:03 am, edited 4 times in total.
Since 1995 ( the first release of FW 1.9 )
i work with FW.
If you have any questions about special functions, maybe i can help.
User avatar
Silvio.Falconi
Posts: 4956
Joined: Thu Oct 18, 2012 7:17 pm

Re: trasparent bitmap

Post by Silvio.Falconi »

Thanks
but I wish have the fwbitmaps default
I think Antonio can change it
I use : FiveWin for Harbour August 2020 (Revision) - Harbour 3.2.0dev (r1712141320) - Bcc7.30 - xMate ver. 1.15.3 - PellesC
User avatar
nageswaragunupudi
Posts: 8017
Joined: Sun Nov 19, 2006 5:22 am
Location: India
Contact:

Re: trasparent bitmap on xbrowse

Post by nageswaragunupudi »

The problem is not with bitmaps.
The problem is with the painting of XBrowse.

When we navigate to the cell with arrow-keys with go-up, go-down or go-left, the gap is not visible.
But when we navigate to the cell with go-right or with a mouse click, the gap is visible.

We are looking into it.
Regards

G. N. Rao.
Hyderabad, India
User avatar
Silvio.Falconi
Posts: 4956
Joined: Thu Oct 18, 2012 7:17 pm

Re: trasparent bitmap on xbrowse

Post by Silvio.Falconi »

Must I sent you my small test ?
I use : FiveWin for Harbour August 2020 (Revision) - Harbour 3.2.0dev (r1712141320) - Bcc7.30 - xMate ver. 1.15.3 - PellesC
User avatar
nageswaragunupudi
Posts: 8017
Joined: Sun Nov 19, 2006 5:22 am
Location: India
Contact:

Re: trasparent bitmap on xbrowse

Post by nageswaragunupudi »

Not necessary.
I know the problem.
But this takes time.
Regards

G. N. Rao.
Hyderabad, India
User avatar
Silvio.Falconi
Posts: 4956
Joined: Thu Oct 18, 2012 7:17 pm

Re: trasparent bitmap on xbrowse

Post by Silvio.Falconi »

i must also resolve the problem on this topic
http://forums.fivetechsupport.com/viewt ... 83#p222642
on the oldest app (monouser) it run ok,only I made an operation now I cannot make with tdatabase
I use : FiveWin for Harbour August 2020 (Revision) - Harbour 3.2.0dev (r1712141320) - Bcc7.30 - xMate ver. 1.15.3 - PellesC
User avatar
ukoenig
Posts: 3981
Joined: Wed Dec 19, 2007 6:40 pm
Location: Germany
Contact:

Re: trasparent bitmap on xbrowse

Post by ukoenig »

I tested a solution that works in all directions
The problem is not with bitmaps.
The problem is with the painting of XBrowse.
When we navigate to the cell with arrow-keys with go-up, go-down
or go-left, the gap is not visible.
But when we navigate to the cell with go-right or with a mouse click, the gap is visible.
The test is using a bClrStd-combination

@ 80,20 XBROWSE oBrw SIZE 520, 485 PIXEL OF oDlg2;
DATASOURCE oCust ;
AUTOSORT FOOTERS FASTEDIT ;
COLUMNS "Last", "First", "Age", "Married", "Values1", "Values2" ;
HEADERS "Last ( Index )", "First", "Age", "Married", "Values1", "Values2" ;
COLSIZES 110, 80, 40, 100, 120, 120 COLOR nXBrText, nXBrColor

WITH OBJECT oBrw
// painting cell-colors of column 3
:aCols[ 3 ]:bClrStd := {|| PAINT_CELL(oBrw, nRange) }
// xBrowse-color
:bClrStd := { || { If( oCust:Deleted(), CLR_HRED, nXBrText ), nXBrColor } }

// a defined button

:aCols[ 6 ]:addbmpfile( c_Path1 + "Plus.png" )
:aCols[ 6 ]:lBtnTransparent := .t.
:aCols[ 6 ]:nBtnBmp := 1
:aCols[ 6 ]:nEditType := EDIT_BUTTON
:aCols[ 6 ]:bEditBlock := { | nRow, nCol, oCol, nKey | ;
MsgAlert( "Row : = " + ALLTRIM( STR( oBrw:Keyno() ) ) + CRLF + ;
"Col : = " + ALLTRIM( STR( oBrw:nColSel ) ), "SELECTION" ) }

:CreateFromCode()
END

Image

regards
Uwe :D
Last edited by ukoenig on Tue Jun 11, 2019 6:38 pm, edited 3 times in total.
Since 1995 ( the first release of FW 1.9 )
i work with FW.
If you have any questions about special functions, maybe i can help.
Post Reply