Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
What's Wrong Here?
Message
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00560298
Message ID:
00560300
Views:
20
The problem is that form's demensions and coordinates usually are in pixels not charachters. See form's ScaleMode property. I guess, you can use FONTMETRIC( ) function to convert pixels to characters.

>I have a container with a button on it. When I click the button, I want
>to pop up a shortcut menu. The menu pops up, but WAY off the the right
>and WAY below the form.
>
>
>
>** Within the container
>WITH This
>
>  ** Define top, left position
>  nRow = ThisForm.Top + .Top + .tbnPopup.Height
>  nCol = ThisForm.Left + .Left
>
>  ** Create popup
>  DEFINE POPUP PopItems FROM nRow, nCol SHORTCUT
>
>  ** Add the menu bars
>  FOR nItem = 1 TO ALEN(aValues, 1)
>
>    DEFINE BAR nItem OF PopItems PROMPT aValues[nItem, 2]
>
>  ENDFOR
>
>  ** Define selection actions
>  ON SELECTION POPUP PopItems oContainer.SelectItem()
>
>  ** Show the popup
>  ACTIVATE POPUP PopItems
>
>ENDWITH
>
--sb--
Previous
Reply
Map
View

Click here to load this message in the networking platform