FiveTech Support Forums

I use XBROWSE with MySql. I would like to know the field name in column. Because the user can swap or hide the column.
for example
=============
XBROWSE COLUMN 'room', 'name', 'mobile'
if the user swap 'name' to 1st column, then when the user dblclick on 1st column. How do I know that it is field name 'name'?

Thank you in advance

dutch wrote:I use XBROWSE with MySql. I would like to know the field name in column. Because the user can swap or hide the column.
for example
=============
XBROWSE COLUMN 'room', 'name', 'mobile'
if the user swap 'name' to 1st column, then when the user dblclick on 1st column. How do I know that it is field name 'name'?

Thank you in advance

All actions are attached to the column object and move with the column object.

For example:
When you define the browse, "room" is the first column.
You defined some action oBrw:aCols[ 1 ]:bLDClickData := {|| roomaction() }
Wherever the user moves / swaps this column, if the user clicks on the "room" column, the same action is taken.

All the datas/codeblocks assigned to a column pertain that column object, not to the visible serial number of the column.

nageswaragunupudi wrote:All actions are attached to the column object and move with the column object.

For example:
When you define the browse, "room" is the first column.
You defined some action oBrw:aCols[ 1 ]:bLDClickData := {|| roomaction() }
Wherever the user moves / swaps this column, if the user clicks on the "room" column, the same action is taken.

All the datas/codeblocks assigned to a column pertain that column object, not to the visible serial number of the column.

There is no bLClicked data for TXBrwColumn.
The intention of the original authors of the XBrowse is not to use single-click for any action, because single-click is used for navigation in the browse. If an action is assigned to single click, there would be confusion between navigation and which cell to act upon.

Still if you want to assign action to single click, assign the action to oBrw:bRClicked and you can ascertain the active column with oBrw:SelectedCol()

nageswaragunupudi wrote:There is no bLClicked data for TXBrwColumn.
The intention of the original authors of the XBrowse is not to use single-click for any action, because single-click is used for navigation in the browse. If an action is assigned to single click, there would be confusion between navigation and which cell to act upon.

Still if you want to assign action to single click, assign the action to oBrw:bRClicked and you can ascertain the active column with oBrw:SelectedCol()

oCol:cExpr --> FieldName

nageswaragunupudi wrote:oCol:cExpr --> FieldName

nageswaragunupudi wrote:oCol:cExpr --> FieldName

Maurizio wrote:I have these 2 functions

if XBrowse_FindCol(oBrw,'COST') > 0
oBrw:DelCol( XBrowse_FindCol(oBrw,'COST'))
ENDIF

Code (fw): Select all Collapse

//-------------------------------------------------------------------------------------------
 Function XBrowse_FindCol(o,cField)
 Local n := 1 // := ascan(o:aCols,{|x| upper(x:cExpr)== upper(cField)})
 local nH := 0
 FOR n := 1 to len(o:aCols)
    IF o:aCols[n]:lHide
       nH ++
    ENDIF    
 
    IF   HB_IsString(o:aCols[n]:cExpr)  .and. UPPER(o:aCols[n]:cExpr) == UPPER(cField)
       Return n - nH 
    ENDIF    
 next 
  
 Return 0

and I added in xBrowse.prg the method fcol

oBrw:fCol('COST'):bEditWhen := {||iif( ::Fields( "PADRE" ):Value ==2,.F.,.T. )}

Code (fw): Select all Collapse

// my_modi
METHOD fCol(cField) CLASS TXBrowse
Local n := 0 
 FOR n := 1 to len(::aCols)
    IF HB_IsString(::aCols[n]:cExpr)  .and. UPPER(::aCols[n]:cExpr) == UPPER(cField)
       exit 
    ENDIF    
 next 
return If( n > 0, ::aCols[ n ], nil )

Maurizio

I use

cField := oBrw:aCols[oBrw:nColSel]:cExpr

Maurizio

nageswaragunupudi wrote:oCol:cExpr --> FieldName

nageswaragunupudi wrote:Clarification:
When xbrowse is created with columns clause like this:

Code (fw): Select all Collapse

COLUMNS "ITEM","UPPER(NAME)","QTY","PRICE","QTY * PRICE" ;
HEADERS "Item", "Name", "Quantity", "Rate", "Amount" ;

The expressions listed in COLUMNS clause are stored in each oCol:cExpr.
So, oCol:cExpr need not always contain the field name, but actually the expression used in the COLUMNS clause.