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 :

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;
merci à tous.