A problem in xBrowse with => oBrw:nRecSelColor

A problem in xBrowse with => oBrw:nRecSelColor

Postby ukoenig » Wed Aug 27, 2008 3: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.

Code: Select all  Expand view  RUN

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() }



Image

Regards
Uwe :lol:
Last edited by ukoenig on Wed Aug 27, 2008 3:15 pm, edited 2 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
ukoenig
 
Posts: 4043
Joined: Wed Dec 19, 2007 6:40 pm
Location: Germany

Postby nageswaragunupudi » Wed Aug 27, 2008 3:14 pm

As of now, we can not change it at runtime
Regards

G. N. Rao.
Hyderabad, India
User avatar
nageswaragunupudi
 
Posts: 10653
Joined: Sun Nov 19, 2006 5:22 am
Location: India

Selector

Postby ukoenig » Wed Aug 27, 2008 3: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.
User avatar
ukoenig
 
Posts: 4043
Joined: Wed Dec 19, 2007 6:40 pm
Location: Germany

Recselector

Postby ukoenig » Wed Aug 27, 2008 3: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 )

Image

Code: Select all  Expand view  RUN

// 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 :lol:
Last edited by ukoenig on Wed Aug 27, 2008 8:01 pm, edited 1 time 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
ukoenig
 
Posts: 4043
Joined: Wed Dec 19, 2007 6:40 pm
Location: Germany

Preview of Rec-Selector

Postby ukoenig » Wed Aug 27, 2008 4: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.

Image

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 )

Image

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

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

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.
User avatar
ukoenig
 
Posts: 4043
Joined: Wed Dec 19, 2007 6:40 pm
Location: Germany


Return to FiveWin for Harbour/xHarbour

Who is online

Users browsing this forum: Google [Bot] and 49 guests