Bonjour à tous.
-Ajouter un Chart1 et un DbChartSource1 à une fiche.
-Cliquer sur DbChartSource1 et mettre :
-DataSource: DataSource1 (reliée auparavant à un DataSet).// Pour relier 'DbChartSource1' au Dataset.
-FieldX: COD_CLT (un code d'un client,d'un produit,une Date etc..)
-FieldY: MNT_CLT (un Montant, un resultat...)
-Ensuite double cliquer sur Chart1 et ajouter une 'Line Series' par exemple.
-Selectionner 'Chart1lineSeries1' et attribuer la valeur 'DbChartSource1' à '+Source'.// pour relier le graphe à 'DbChartSource1'.
-Mettre Active à False.
-Ajouter un bouton, qu'on appelle 'Active' à la fiche.
-Et l'implémenter par :
merci à tous.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5 procedure TForm1.ActiveClick(Sender: TObject); begin Chart1LineSeries1.Active:=false ; Chart1LineSeries1.Active:=true ; end;![]()
Partager