>What did you put?
>
>ray

Each menu option consists of a container with a checkbox, label and shape...

The container has a custom method called "selectme" as follows:
-------------------------------------------------

  PROCEDURE SELECTME
    THIS.BACKCOLOR = RGB(0,0,128)
    WITH THIS.lblMenu
      .FONTBOLD = .T.
      .FORECOLOR = RGB(255,255,255)
    ENDWITH
    * move this option into view if it is off screen
    nOptTop    = THIS.TOP + THIS.PARENT.TOP
    nOptBottom = THIS.TOP + THIS.HEIGHT + THIS.PARENT.TOP
    nScnBottom = THISFORM.HEIGHT   && - SYSMETRIC(9)
    * scroll menu up if option is below screen
    IF nOptBottom > nScnBottom
      THIS.PARENT.TOP = THIS.PARENT.TOP - ( nOptBottom - nScnBottom )
      THISFORM.VScrollBar.SetSize()
    ELSE
      * scroll menu down if option is above screen
      IF nOptTop < THISFORM.TOP
        THIS.PARENT.TOP = THIS.TOP * -1
        THISFORM.VScrollBar.SetSize()
      ENDIF
    ENDIF

-------------------------------------------------