>Hi All
>
>I have an application with a menu. In the menu's cleanup code I have following code:
>
>*************************************************
>Define POPUP Uppermenu MARGIN RELATIVE SHADOW COLOR SCHEME 4
>DEFINE bar 1 of uppermenu Prompt "hey"
>DEFINE bar 1 of uppermenu Prompt "hey1"
>DEFINE bar 1 of uppermenu Prompt "blah"
>
>
>DEFINE POPUP blah MARGIN SCROLL COLOR SCHEME 4
>
>&& bunch of definitions
>
>SELECT table
>
>lnCount = 1
>
>Scan for !DELETED()
>
> lsPrompt = table.field
> DEFINE BAR (lnCount) OF blah Prompt (lsPrompt)
> lncount = lnCount +1
>endscan
>
>
>on bar 3 of uppermenu Activate popup scrubs
>
>*************************************************
>
>The problem is that I have about 55 entries in the table. All of them get added to the menu, but only 40 are displayed. I added scroll hoping it'll add scroll bar for the popup but it is still only displaying 40 menu items out of 55.
>
>Is there a way to do it? Am I better of creating a selection screen? Is there something I am doing wrong?
>
>Thanks.
Hi Alexander,
I guess there is something wrong (though I'm not sure why). I just tried creating 55 (and more) items. It automatically create a scroller (an arrow) at the top and bottom of the popup menu.
This is also documented in VFP help:
"If a menu isn't large enough to contain all of the menu items, a scroll bar appears so that you can scroll through the menu items"
Regards
Herman