Page loading

Share your opinion
What do you think about gambaslinux.fr?
 
Interesting
It miss some informations
Excellent website
Results
WIDGETS GAMBAS
GAMBAS 3 SOFTWARES
TUTORIALS
Library
DRAWAREA - move gbchart line
VARIATION DE VALEURS DANS GB.CHART
French only sorry...

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.




Creation date : 18/06/2010 @ 13:59
Last update : 27/01/2012 @ 22:36
Category : DRAWAREA
Page read 5502 times


Print the article Print the article


react.gifReactions to this article


Reaction #2 

by spheris 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.

QUICK MENU
SEARCH




LANGUAGE
COMPONENTS
Other
LANGUAGE
Where, who?
VISITS

   visitors

   visitors online

ARCHIVES GAMBAS 1/2
^ Top ^