FiveTech Support Forums

function main

LOCAL oDlg

DEFINE DIALOG oDlg FROM 6, 7 TO 21, 72 ;
      TITLE "Test01" ;
          GRADIENT { { 1, nRGB( 199, 216, 237 ), nRGB( 237, 242, 248 ) } }


@ 0.3, 0.3 to 3.8, 22.414 // This box disappears

@ 1, 1 SAY "This is a test"
@ 2, 1 SAY "This is a another test"

ACTIVATE DIALOG oDlg;
CENTER

RETURN NIL

@ 0.3, 0.3 GROUP TO 3.8, 22.414

!short: BOX - GROUPS */

#xcommand @ <nTop>, <nLeft>[color=#FF0000] [[/color] GROUP <oGroup> [color=#FF0000]][/color] ;
             [ TO <nBottom>, <nRight> ] ;
             [ <label:LABEL,PROMPT> <cLabel> ] ;
             [ OF <oWnd> ] ;
             [ COLOR <nClrFore> [,<nClrBack>] ] ;
             [ <lPixel: PIXEL> ] ;
             [ <lDesign: DESIGN> ] ;
             [ FONT <oFont> ] ;
             [ <lTransparent: TRANSPARENT> ] ;
             [ SIZE <nWidth>, <nHeight> ] ;
       => ;
          [ <oGroup> := ] TGroup():New( <nTop>, <nLeft>, <nBottom>, <nRight>,;
             <cLabel>, <oWnd>, <nClrFore>, <nClrBack>, <.lPixel.>,;
             [<.lDesign.>], [<oFont>], [<.lTransparent.>], <nWidth>, <nHeight> )