Converting wbrowse to xbrowse

[Euclides]

Hi to all!
I am converting an old system (Fivewin with C**pper) to FWH and decided to use xbrowse instead wbrowse.
(why I am doing this will be posted in a later subject)
Before to diving into doccumentation and source, I have two questions about how 'translate' wbrowse to xbrowse.
1 - oLbx:bRClicked := {|nRow, nCol| MsgInfo("Row:"+str(oLbx:nAt,3)+" Col:"+str(oLbx:nAtCol(nCol),3)) }
2 - oLbx:ShowSizes()
TIA, Euclides

[nageswaragunupudi]

Code: Select all  Expand view

  oBrw:bRClicked := { || MsgInfo( "Row : " + cValToChar( oBrw:nRowSel ) + " Col : " + cValToChar( oBrw:nColSel ) ) }
 

Code: Select all  Expand view

function XbrShowSizes( oBrw )

   XBrowse( ArrTranspose( { oBrw:cHeaders, oBrw:nWidths } ), nil, nil, { |o| o:cHeaders := { "Header", "Width" } } )

return nil


 

[Euclides]

Thanks Nages.
I promise you, that I will learn more about xBrowse soon.
Regards, Euclides