FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour A problem in xBrowse with => oBrw:nRecSelColor
Posts: 4043
Joined: Wed Dec 19, 2007 06:40 PM
A problem in xBrowse with => oBrw:nRecSelColor
Posted: Wed Aug 27, 2008 03:09 PM
Hello,

I want to change the Rec-Select-Color at runtime.

It seems, there is a problem.
The background-color of the pointer changes.

oLbx20:bLClicked := { | nRow, nCol | ROW_POS6 := oLbx20:nRowSel, ;
   SELCOLOR := NEW_SELCOL(), ;        // new selected color 
   oLbx0:SetBackGround( ), ;           // tested erase background ( doesn't help )
   oLbx0:nRecSelColor := SELCOLOR, ; // new Color for record select
   oLbx0:Refresh() }




Regards
Uwe :-)
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.
Posts: 10733
Joined: Sun Nov 19, 2006 05:22 AM
A problem in xBrowse with => oBrw:nRecSelColor
Posted: Wed Aug 27, 2008 03:14 PM

As of now, we can not change it at runtime

Regards



G. N. Rao.

Hyderabad, India
Posts: 4043
Joined: Wed Dec 19, 2007 06:40 PM
Selector
Posted: Wed Aug 27, 2008 03:18 PM

Thank you very much,

for the moment i leave it like that.
I hope, it works with BITMAPS and BRUSHES.
It is the next test.

Regards
Uwe :lol:

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.
Posts: 4043
Joined: Wed Dec 19, 2007 06:40 PM
Recselector
Posted: Wed Aug 27, 2008 03:57 PM
Hello,

It seems, the complete Record-selector-part doesn't work at runtime.
The background-color is disabled and the old pointer is still visible.
( It means, for folder-page-preview No. 5, i have to open a extra
preview-dialog )



// Brush Select
// ------------------

REDEFINE BUTTONBMP oBtn40  ID 50 OF oFld:aDialogs[5] ;
ACTION ( cFilter := "BMP (*.bmp)|*.bmp|" , ;
   cNewBITM := cGetFile32( cFilter,"Select a Picture"), ;
   IIF( empty( cNewBITM ), ;
   MsgAlert( "No file selected !","ATTENTION" ), NIL ), ;
   BRSELECT1 := cFileNoPath( cNewBITM ), oBRSELECT1:Refresh(), ;
   oLbx0:hBrushRecSel( BRSELECT1 ), oLbx0:Refresh() ) ;
BITMAP "bitmap" PROMPT "    &Brush" TEXTRIGHT
oBtn40:cToolTip = { "Select a " + CRLF + "xBrowse-Brush", "Brush-Select", 1, CLR_BLACK, 14089979 }


Regards
Uwe :-)
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.
Posts: 4043
Joined: Wed Dec 19, 2007 06:40 PM
Preview of Rec-Selector
Posted: Wed Aug 27, 2008 04:33 PM
How i solved the problem :

A copy of the original Browser is shown in a extra dialog.
I think, nobody will change this at runtime in his application.
It is just for the tools.

That was the rest of the visual-part, i had to test.
I couldn't find any other problems in xBrowse.



I tested BMP ( 15 x 15 with a red circle )
Is there a special format to be used ?
It looks a bit funny.

oBmp5 := ReadBitmap( 0, BRSELECT2 ) // the Bitmap
oLbx0:hBmpRecSel( oBmp5 )



i don't know why, but this didn't work

DEFINE BRUSH oBrush5 FILE BRSELECT1 // the Brush
oLbx0:hBrushRecSel( oBrush5 )

Regards
Uwe :-)
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.

Continue the discussion