Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Mouse wheel
Message
 
À
13/08/2005 20:32:23
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Titre:
Versions des environnements
Visual FoxPro:
VFP 9
OS:
Windows XP SP2
Network:
Windows 2000 Server
Database:
Visual FoxPro
Divers
Thread ID:
01040747
Message ID:
01040807
Vues:
10
Hi Grady,

>I have a form that displays a map. The form is much larger than the screen. I would like to be able to use the mouse wheel to move the map up and down the screen. Is there a way to accomplish this?

First, set the Scrollbar property of the form to 3 to enable scrollbars. In the ScrollWheel event of each control, you can put the following code:
Thisform.SetViewPort( Thisform.ViewPortLeft, Max(0,Thisform.ViewPortTop-Sign(m.nDirection)*16) )
This scrolls the form by 16 pixels each time you scroll the wheel. You can use BINDEVENT() to execute this code for every control without adding the code to each one.
--
Christof
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform