WBROWSE – XBROWSE

[Otto]

One line of code and you can switch from xBrowse to "Wbrowse" and back.
Regards,
Otto

Code: Select all  Expand view

DEFINE BUTTON FILE "setting.bmp"  OF oBar ;
ACTION  (IIF( oBrw:nRowHeight=25, oBrw:nRowHeight:=60,oBrw:nRowHeight:=25 ),oBrw:refresh() )   ;
PROMPT "Zeilenhöhe"                ;
MESSAGE "Zeilenhöhe"           NOBORDER