LE DIAL (OU AFFICHEUR A AIGUILLE)

---

Bonjour,
aujourd'hui nous allons nous interesser au DIAL.
C'est un compteur à aiguille pas très esthétique mais bien pratique pour fixer assez rapidement une valeur ou pour avoir une visualisation rapide d'une valeur.

A) les propriétés

NAME : change le nom du dial
Dial1.name = "toto"

BACKGROUND : Change la couleur d'arriere plan du Dial
Dial1.Background = &H9FFF9F&

DROP : recoit l'évènement Glisser/déplacer. 2 états possibles TRUE ou FALSE
Dial1.Drop = TRUE

ENABLED : Active ou desactive le widget.2 etats possibles TRUE ou FALSE
Dial1.Enabled = TRUE

EXPAND : Agrandi à la taille du conteneur le Dial
Dial1.Expand = FALSE

FONT : Ne fonctionne pas car pas d'écriture.

FOREGROUND : ne Fonctionne pas non plus

HEIGHT : Fixe la hauteur en pixel du Dial
Dial1.Height  = 234

IGNORE : ignore l'agrandissement du conteneur dnas le contenu
Dial1.Ignore = FALSE

MARK :Affiche les graduations sur le Dial
Dial1.Mark = TRUE

MAXVALUE : Fixe la valeur maximale du Dial
Dial1.MaxValue = 1000

MINVALUE : fixe la valeur minimale du Dial
Dial1.MinValue = 0

MOUSE : Choisi le curseur lors du passage de la souris à l'interieur du Dial.
Dial1.Mouse = 2

PAGESTEP : fixe l'echelle des grandfes graduations.
Dial1.PageStep = 10
informations :Comprendre "Par pas de 10"

STEP : Fixe l'echelle des petites graduations et le pas unitaire du Dial.
Dial1.Step = 1

TAG : Etiquette qui permet la manipulation d'un Dial en Tableau.
Dial1.Tag = "ert"

TOOLTIP : Fixe une chaine de caractere sous forme de bulle d'aide qui s'affiche lors d'un passage de souris sur le Dial.
Dial1.Tooltip = "C'est le Dial"

VISIBLE : Rend ou non visible le Dial dans votre interface.
Dial1.Visible = TRUE

WIDTH = Fixe la taille horizontale en pixels de votre Dial.
Dial1.Width = 345

WRAP : Avec cette propriété activée, le Dial tournera sur 360 degrés.
Dial1.Wrap = TRUE

X : Fixe les coordonnées Horizontale (l'origine étant en haut à gauche) du Dial sur l'écran.
Dial1.X = 23

Y : Fixe les coordonnées Verticales (l'origine étant en haut à gauche) du Dial sur l'écran.
Dial1.Y = 27

B)LES EVENEMENTS
L'évènement le plus utile à mon avis est l'évènement CHANGE qui vous permet comme dans l'exemple téléchargeable ci dessous de fixer rapidement une valeur.

A bientôt.


Voici le code source de l'application exemple :

PUBLIC SUB form_OPEN() me.center button1.setfocus() END PUBLIC SUB button1_click() 'CLOSE button me.CLOSE END PUBLIC SUB dial1_change()'change event FOR dial lcdnumber1.value = dial1.value / 10 END PUBLIC SUB lcdnumber1_dblclick() 'set focus TO button TO remove cube inside dial button1.setfocus() END