Bonjour,
Je chercher à faire un graphique comme celui ci
J'ai réussi à faire le fond avec ca
Maintenant j'ai une liste d'ordonnés, et j'aimerais à partir de ces valeurs faire une courbe comme ci dessus...
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27 with stat.canvas do begin Brush.Color := $00C2EECE; //Color est en réalité Form1.Color c'est à dire la propriète color de form1 que l'on peut voir // et modifier dans l'inspecteur d'objet Pen.Color := $00C2EECE; Brush.Style := bsSolid; // ainsi, le rectangle sera rempli. //pour voir les autres possibilités faire F1 sur bsSolid Rectangle(0, 0, stat.Width, stat.Height); //permet d'effacer le dessin Pen.Color := $00A8E3B3; for i := 0 to (stat.Width div 50) do begin moveto(stat.Width - i * 50, 0); lineto(stat.Width - i * 50, stat.Height); end; for i := 0 to (stat.Height div 25) do begin moveto(0, stat.Height - i * 25); lineto(stat.Width, stat.Height - i * 25); end; Pen.Color := clblack; for i := 0 to listbox1.Count - 1 do begin // ICI LES VALEURS end; end;
Comment dessiner des points ? Comment les relier ?
Comment colorer la partie inférieur de la courbe ?
Comment faire cet effet de transparence ?
Merci d'avance pour votre aide
Partager