Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Right-click menu
Message
De
09/03/1998 08:53:59
 
 
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Divers
Thread ID:
00083141
Message ID:
00083339
Vues:
24
>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
>

>

Thanks a lot. It's really VFP3 situation.
Edward Pikman
Independent Consultant
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform