change the ndatalines (xbrowse) on line - RESOLVED -

[Silvio.Falconi]

Initially a test line in the browse consists of a single example line

WITH OBJECT oBrw
IF lmore
:nDataLines := 2
ELSE
:nDataLines := 1
ENDIF

...
END

Code: Select all  Expand view  RUN

 :bStrData := { || oDbf:Street + CRLF +oDbf:city+" "+ oDbf:state }

the user by a menu popup can change the configuration and set more rows
on command of menu I made

Code: Select all  Expand view  RUN

Function oBtnMenu2(oBrw,oDbf,oParent,cSection,nRow,nCol)
   local oMenu,oItem1
  MENU oMenu POPUP
 MENUITEM oItem1 PROMPT "More Rows" ;
      ACTION (lMore := !lMore,;
                 ( IIF( lMore,oBrw:nDataLines := 2,oBrw:nDataLines := 1 ),;
                   oBrw:refresh()) )
      ENDMENU
      oItem1:SetCheck(lMore)
     ACTIVATE POPUP oMenu OF oParent AT  oBrw:nTop+nRow, oBrw:nLeft+nCol
return nil
 

Why not refresh the oBrw ?

[Marc Venken]

Silvio,

Please try : chr(13)+chr(10) in stead of CRLF

COLUMNS "ID", "FIRST+CHR(13)+CHR(10)+LAST", ;
"STREET+CHR(13)+CHR(10)+CITY+CHR(13)+CHR(10)+STATE+ '-' + ZIP" ;
HEADERS "ID", "NAME", "ADDRESS" ;

I can be wrong ))))

[nageswaragunupudi]

nDataLines is used by xbrowse only while creating the browse for the first time for calculating the row height. After creation of the browse. i.e., during runtime, it is never used and changing the values does not do anything.
During runtime, you can change the data oBrw:nRowHeight.

[nageswaragunupudi]

Silvio,

Please try : chr(13)+chr(10) in stead of CRLF

COLUMNS "ID", "FIRST+CHR(13)+CHR(10)+LAST", ;
"STREET+CHR(13)+CHR(10)+CITY+CHR(13)+CHR(10)+STATE+ '-' + ZIP" ;
HEADERS "ID", "NAME", "ADDRESS" ;

I can be wrong ))))

Not correct.
chr(13)+chr(10) or CRLF should not be inside the quotes.

Code: Select all  Expand view  RUN

     COLUMNS "ID", "FIRST+CHR(13)+CHR(10)+LAST", ;
 

is not correct

Code: Select all  Expand view  RUN

     COLUMNS "ID", "FIRST"+CHR(13)+CHR(10)+"LAST", ;
 

is correct.
You can use CRLF also.

[Silvio.Falconi]

nDataLines is used by xbrowse only while creating the browse for the first time for calculating the row height. After creation of the browse. i.e., during runtime, it is never used and changing the values does not do anything.
During runtime, you can change the data oBrw:nRowHeight.

thanks run correctly

this is only a test

one row


two rows