FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour to nages : add a xbrowse features
Posts: 7317
Joined: Thu Oct 18, 2012 07:17 PM
to nages : add a xbrowse features
Posted: Fri May 08, 2015 03:33 PM
Dear Nages,
Look this picture please



I wish insert on this menu at first menuitem a new option " Default Columns" and then the user can have the original columns
How we can make ?
METHOD SetColumns( nRow, nCol, nFlags ) CLASS TXBrowse

...
Menuitem "Default Columns" action -> ??
separator
for nFor := 1 to nLen

...
thanls
Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)

I use : FiveWin for Harbour March-April 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com
Posts: 10733
Joined: Sun Nov 19, 2006 05:22 AM
Re: to nages : add a xbrowse features
Posted: Sun May 10, 2015 12:24 AM
Code (fw): Select all Collapse
... ACTION ( ;
   ASort( ::aCols, nil, nil, { |x,y| x:nCreationOrder < y:nCreationorder } ), ;
   AEval( ::aCols, { |o| o:lHide := .f. } ), ;
   ::GetDisplayCols(), ;
   ::Refresh() )
Regards



G. N. Rao.

Hyderabad, India
Posts: 7317
Joined: Thu Oct 18, 2012 07:17 PM
Re: to nages : add a xbrowse features
Posted: Sun May 10, 2015 04:22 PM
thanks
Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)

I use : FiveWin for Harbour March-April 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com

Continue the discussion