Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Right-click menu
Message
 
 
To
06/03/1998 16:22:16
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00083141
Message ID:
00083225
Views:
23
Edward,

It's caused by a difference in the form font and the _screen font, but it was only a problem in 3.0. Here's a code fragment from my ContextMenu class that deals with it:

   if ( " 03." $ version() )
      set classlib to (this.ClassLibrary) additive
      this.AddObject( "moFont", "Font" )

      if ( ! this.moFont.EqualFont( _screen, thisform ) )
         pnRow = pnRow * ( this.moFont.FontMetric( 1, thisform ) + this.moFont.FontMetric( 5, thisform ) ) / ;
                         ( this.moFont.FontMetric( 1, _screen ) + this.moFont.FontMetric( 5, _screen ) )
         pnCol = pnCol * this.moFont.FontMetric( 6, thisform ) / this.moFont.FontMetric( 6, _screen )
      endif
   endif


>I didn't use much Right-click menus and now look at 'strange' situation (I guess it's something simple, but it's Friday:). Right-click menu is opened from Grid.Column.Control.Rightclick event with command ACTIVATE POPUP pop1 AT mrow(),mcol(), and for some reason it opens in different positions depending what I run: app or exe file.
>TIA.
df (was a 10 time MVP)

df FoxPro website
FoxPro Wiki site online, editable knowledgebase
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform