Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Resizeable Shapes
Message
De
25/02/1998 07:45:17
Cetin Basoz
Engineerica Inc.
Izmir, Turquie
 
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Divers
Thread ID:
00081011
Message ID:
00081031
Vues:
17
>Does anyone know of a simple way to create dynamically resizeable objects (like shapes etc) on a form ? I mean resizing the object the way one resizes a window, e.g. by clicking on the border and dragging. Everything we have tried is very slow.
>Thnx,
>
>Eylon
Hi Eylon,
Sorry I missed you were asking dynamically sizing an object on a form. Well you could use mousedown event for that.
if nButton = 1
        this.width = max(nxCoord-this.left,1)
	this.height = max(nyCoord-this.top,1)
*If this is a container
*	This.Shape1.height = this.height - 2
*	This.Shape1.width = this.width - 2

*	This.Shape1.top = 1
*	This.Shape1.left = 1
endif	
Of course this one assumes you start mousedown at the lower left corner. You should extend the code to check where it started and act upon it.
Cetin
Çetin Basöz

The way to Go
Flutter - For mobile, web and desktop.
World's most advanced open source relational database.
.Net for foxheads - Blog (main)
FoxSharp - Blog (mirror)
Welcome to FoxyClasses

LinqPad - C#,VB,F#,SQL,eSQL ... scratchpad
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform