A few minor glitches with GROUP, RADMENU
Posted: Sat Jul 26, 2008 12:52 pm
Hi Antonio and fellow FiveLinuxers
GROUP doesn't seem to work properly with the PIXEL option, I believe that FiveLinux.ch is not correctly translating the @ <row>, <col> GROUP command because it is not including a [ <lUpdate: UPDATE> ] to pass as <.lUpdate.> into TGroup():New() so the <.lPixel.> value is passed in the wrong position.
This seems to work:
TRadMenu supports the PIXEL clause in the placement of the TRadio representing the first element of the array passed in to TRadMenu and correctly passes the lPixel setting to its child TRadios but the incrementation of nRow needs to be adjusted. I am using:
I am using 30 because it matches my spacing elsewhere. Maybe the vertical spacing should be a settable property of TRadMenu? Without this change the options pretty much block each other out when using the PIXEL clause.
As always these could be problems of my making, or have subsequently been fixed, but they certainly were issues with FiveLinux as it was here.
Regards
Doug
(xProgrammer)
GROUP doesn't seem to work properly with the PIXEL option, I believe that FiveLinux.ch is not correctly translating the @ <row>, <col> GROUP command because it is not including a [ <lUpdate: UPDATE> ] to pass as <.lUpdate.> into TGroup():New() so the <.lPixel.> value is passed in the wrong position.
This seems to work:
Code: Select all
#xcommand @ <nRow>, <nCol> GROUP [ <oGroup> ] ;
[ <label: LABEL, PROMPT> <cText> ] ;
[ <of: OF, WINDOW, DIALOG> <oWnd> ] ;
[ SIZE <nWidth>, <nHeight> ] ;
[ <lPixel: PIXEL> ] ;
[ <lUpdate: UPDATE> ] ;
=> ;
[ <oGroup> := ] TGroup():New( <nRow>, <nCol>,;
[<oWnd>], <cText>, <nWidth>, <nHeight>, <.lUpdate.>, <.lPixel.> )
Code: Select all
IF lPixel
nRow += 30
ELSE
nRow += 2.5
ENDIF
As always these could be problems of my making, or have subsequently been fixed, but they certainly were issues with FiveLinux as it was here.
Regards
Doug
(xProgrammer)