oBarGet on xbrowse header

[reinaldocrespo]

Hello everyone!

1. Is it possible to have a button or a series of buttons on the header of an xbrowse column?

2. I tried to add a button to the get object on the header of an xbrowse but I get a runtime error. I'm guessing the get object hasn't been instantiated until :CreateFromCode() is executed.

Code: Select all  Expand view

...
      :nHeaderHeight := 40
      :lGetBar       := .t.
      :oCol:oBarGet:bAction   := {|| MsgInfo( "clicked ") }
      :oCol:oBarGet:cBmpName  := "SEARCH16"
      :oCol:oBarGet:cCueText  := "Filtered ManagerID"
 

Error occurred at: 12/06/2017, 19:45:21
Error description: Error BASE/1005 No exported variable: BACTION
Args:
[ 1] = U
[ 2] = B {|| ... }

Any Ideas?


Reinaldo.

[AntoninoP]

Hello,
I think you need to call

Code: Select all  Expand view

:oCol:CreateBarGet()

before access it...

[nageswaragunupudi]

Mr Reinaldo

As of now, this is not possible.

2. I tried to add a button to the get object on the header of an xbrowse but I get a runtime error. I'm guessing the get object hasn't been instantiated until :CreateFromCode() is executed.

oBarGets are created during execution of oBrw:Adjust() by calling an "internal" method oCol:CreateBarGet(). WIKI clearly lists this as one of the internal methods.

oBrw:Adjust() method is executed in oBrw:CreateFromCode() in case of browses on windows and ON INIT in case of browses on Dialogs.

After oBrw:Adjust() is executed, oBarGets of the specified columns are created but now it is too late to add button and bAction, because we need to do this at the time of creation of Get.

[AntoninoP]

oBarGets are created during execution of oBrw:Adjust() by calling an "internal" method oCol:CreateBarGet(). WIKI clearly lists this as one of the internal methods.

Just for curiosity, why is it not declared as hidden ?

[nageswaragunupudi]

Yes, we could have declared this method as protected.

[reinaldocrespo]

Mr Reinaldo

After oBrw:Adjust() is executed, oBarGets of the specified columns are created but now it is too late to add button and bAction, because we need to do this at the time of creation of Get.

I suppose it wouldn't be too complicated to add a couple of new DATA to the column object so that bAction and cbitmap to be used with the TGet object be declared before it is created. I will do it on my end while it gets added to xbrowse.

Reinaldo.

[nageswaragunupudi]

yes

[nageswaragunupudi]

Provided in 17.12.