Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Drag Drop - Resize
Message
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Miscellaneous
Thread ID:
00878808
Message ID:
00878882
Views:
19
>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
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform