Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Drag Drop - Resize
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Divers
Thread ID:
00878808
Message ID:
00878882
Vues:
20
>Hello all,
>Anybody have an example or know how to get me started on resizing a control at runtime by dragging on it? Thanks,
>
>jfh

In addition to the other suggestions, you can also place the following code in your controls keypress event (works just like keypress control sizing at designtime).
* KeyPress Method
LPARAMETERS nKeyCode, nShiftAltCtrl
IF nShiftAltCtrl=1 && Shift
   WITH this
   IF nKeyCode=56 AND .height>1 &&Up
      .Height=.Height-1
   ELSE
   IF nKeyCode=50 &&Down
      .Height=.height+1
   ELSE
   IF nKeyCode=54 &&Right
      .width=.width+1
   ELSE 
   IF nKeyCode=52 AND .width>1 &&Left
      .width=.width-1   
   ENDIF
   ENDIF
   ENDIF
   ENDIF
   ENDWITH
ELSE
ENDIF
Imagination is more important than knowledge
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform