FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour Converting wbrowse to xbrowse
Posts: 159
Joined: Wed Mar 28, 2007 01:19 PM

Converting wbrowse to xbrowse

Posted: Fri Mar 04, 2016 05:35 PM

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

Posts: 10733
Joined: Sun Nov 19, 2006 05:22 AM

Re: Converting wbrowse to xbrowse

Posted: Fri Mar 04, 2016 11:05 PM
Code (fw): Select all Collapse
   oBrw:bRClicked := { || MsgInfo( "Row : " + cValToChar( oBrw:nRowSel ) + " Col : " + cValToChar( oBrw:nColSel ) ) }


Code (fw): Select all Collapse
function XbrShowSizes( oBrw )

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

return nil
Regards



G. N. Rao.

Hyderabad, India
Posts: 159
Joined: Wed Mar 28, 2007 01:19 PM

Re: Converting wbrowse to xbrowse

Posted: Sat Mar 05, 2016 12:49 AM

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

Continue the discussion