Page en cours de chargement

Donnez votre avis..
Que pensez-vous de gambaslinux.fr?
 
Interessant
Il manque des rubriques
excellent site
Résultats
INTERFACE GAMBAS
LOGICIELS GAMBAS 3
TUTORIELS
=Bibliothèque
DRAWAREA - variation de gbchart
VARIATION DE VALEURS DANS GB.CHART

gbchart.png

Bonjour,
aujourd'hui nous allons voir quelques petites astuces du composant GB.chart.


Préparation
Nous allons creer un nouveau projet avec une drawarea et le composant GB.chart coché.
Maintenant nous allons tracer une courbe avec 21 valeurs en X.
Les valeurs en Y sont placées dans un tableau  dans une fonction toute faite genre ceci:

PUBLIC SUB initcourbech()
tableaucourbe[0] = 0
tableaucourbe[1] = 0
tableaucourbe[2] = 0
tableaucourbe[3] = 0
tableaucourbe[4] = 0
tableaucourbe[5] = 0
tableaucourbe[7] = 0
tableaucourbe[7] = 0
tableaucourbe[8] = 0
tableaucourbe[9] = 0
tableaucourbe[10] = 0
tableaucourbe[11] = 0
tableaucourbe[12] = 0
tableaucourbe[13] = 0
tableaucourbe[14] = 0
tableaucourbe[15] = 0
tableaucourbe[17] = 0
tableaucourbe[17] = 0
tableaucourbe[18] = 0
tableaucourbe[19] = 0
tableaucourbe[20] = 0
END

n'oubliez pas de declarer d'abord votre tableau par :

tableaucourbe[21] AS Float
ensuite declarons le nombre de courbes,l'axe des X et le type de courbe :

chart.countdatasets = 1
chart[1].color = &hffff00&
chart.headers.values = ["0", "1", "2", "3", "4", "5", "7", "7", "8", "9", "10", "11", "12", "13", "14", "15", "17", "17", "18", "19", "20"]

vous pouvez modifier la valeur de l'axe des Y de cette facon :

chart[0].values = [0.01]

0 est la 1ere courbe
0.01 est la valeur de notre axe Y pour le point 0

Dessinons notre courbe par :

PUBLIC SUB drawingarea1_draw()
'pour tracer le graphique dans la drawingarea
chart.width = drawingarea1.width
chart.height = drawingarea1.height
chart.draw
END

Voila.
Maintenant nous allons nous amuser a faire varier des valeurs de cette courbe



maintenant nous allons creer  un dial,une valuebox et un slider sur notre form.
Le slider nous permet de choisir la valeur en X de notre courbe et le dial la valeur Y.

PUBLIC SUB dial1_change()
valuebox1.value = dial1.value / 10
majcourbe(slider1.value, valuebox1.value)
END
PUBLIC SUB slider1_change()
label3.text = slider1.value
lavaleur = fmain.lamodif(slider1.value)
valuebox1.value = lavaleur
dial1.value = lavaleur * 10
END
'mise a jour de la courbe modifée
PUBLIC SUB majcourbe(lindex AS Integer, donnee AS variant)
chart[0].values[lindex] = donnee
drawingarea1.clear
drawingarea1.refresh
END

vous pouvez modifier la courbe facilement de cette facon.
La ligne en rouge est très importante. Elle vous permet de modifier une valeur de cette courbe. détaillons la :

chart[numero de la courbe] . Values[coordonnées en X] = Coordonnée en Y


voici ce que cela donne en video.

VOIR LA VIDEO ICI

Pas mal non ?
voila pour aujourd'hui.




Date de création : 18/06/2010 @ 13:59
Dernière modification : 27/01/2012 @ 22:36
Catégorie : DRAWAREA
Page lue 5506 fois


Imprimer l'article Imprimer l'article


react.gifRéactions à cet article


Réaction n°2 

par spheris le 19/04/2011 @ 11:33

Masterssi,
sans aucun souci.
Il te suffit d'ouvrir ton fichier avec les valeurs comme ceci puis de créer une variable tableau de type float (dim mytable[] as float) et les y mettre dedans.

ACCES RAPIDE
RECHERCHE




LES INSTRUCTIONS
Divers
INSTRUCTIONS
Où ça, qui ça?
VISITES

   visiteurs

   visiteurs en ligne

ARCHIVES GAMBAS 1/2
^ Haut ^