Click above to get retro games delivered to your door ever month!

ATTACH ... BOX                                                  DFCTRL.CH   
Makes a new type of control BOX
------------------------------------------------------------------------------
Syntax:

     ATTACH <cId> TO <aParent> BOX <nType> ;
                  AT <nTop>, <nLeft>, <nBottom>, <nRight> ;
                  [PAGE <nPage>] ;
                  [COLOR <aCol>] ;
                  [FILL <cFill>] ;
                  [DISPLAYIF <uDiIf>];
                  [REFRESHID <cRID>] ;

Parameters:

     <cId>      Shows the name of the control 
     <aParent>  Item of objects form in which the controls are added 
     <nType>    Type Box. If the value of nType is 1 BOX type: normal, 2
                button, 3 filled.
     AT <nTop>, <nLeft>, <nBottom>, <nRight> Coordinates where is the
                control BOX on the oggetto. Coordinates are of the objects
     <nPage>    Number of page where is the control If nPage = 0 the
                control is available on all pages of management
     <aCol>     Array where there are attributes of color Clipper used for
                link at the control the specific color
     FILL <cFill> Character to use as background of the BOX 
     AYIF <uDiIf> Conditional Display. the control in shown on the objects
                if the expression in <uDiIf> is True
     REFRESHID <cRID> Show the  groups of refresh which contain the control

Description:

     Makes a new control of type BOX on object Form. This control can be
     used to  group in logical way data at video. The boxs can be drawed
     with survey effect and packed. This effect is obtained by variations
     of valors in <aCol>.
     
     For manage this CONTROL from program is necessary to use the function
     tbCTRLArr().This function will give the array that forms the CONTROL.
     With modification of this array is possible change during RUN-TIME
     characteristic of the CONTROL.

Example:

     Example 1 :
     
     Value of item of the array when the CONTROL
     is of type BOX :
     
     #include "DFCTRL.CH"
     
     LOCAL aCTRL := tbCTRLArr( oWin, "BOX0001" )
     
     aCTRL[FORM_CTRL_TYP      ] // Type CONTROL
     aCTRL[FORM_CTRL_ID       ] // ID of control
     aCTRL[FORM_CTRL_RID      ] // Refresh ID of CONTROL
     aCTRL[FORM_CTRL_PAGE     ] // Page of CONTROL
     aCTRL[FORM_CTRL_STABLE   ] // Flag for stable fhe CONTROL
     aCTRL[FORM_CTRL_DISPLAYIF] // CodeBlock of "Showing only if ..."
     
     aCTRL[FORM_BOX_TYPE  ] // Type of BOX
     aCTRL[FORM_BOX_TOP   ] // Coordinates of the CONTROL
     aCTRL[FORM_BOX_LEFT  ] //
     aCTRL[FORM_BOX_BOTTOM] //
     aCTRL[FORM_BOX_RIGHT ] //
     aCTRL[FORM_BOX_CLRID ] // Array of colors
     aCTRL[FORM_BOX_FILL  ] // Characters FILL for the BOX
     
     Example 2 :
     
     #include "DFCTRL.CH"
     
     ATTACH "box0026" TO oWin:W_CONTROL BOX 02 ; //
       AT   0,  0,  3, 77            ; // Coordinates
       PAGE  0                       ; // Page
       COLOR {"N/G","B+/GR*","W+/G"} ; // Array of colors
       FILL  " "             ; // Character for fill
       DISPLAYIF {||.T.}     // Conditional Display