Discussion :

[alainvh]

Bonjour.
J'essaie de créer mon premier Chart, et ce dynamiquement (afin de mieux appréhender le fonctionnement de ce composant).
J'utilise un code de Cl@udius (discussion de janvier 2007) pour m'aider à démarrer. Voici mon code intégral :

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
28
29
30
31
32
33
34
35
36
37
38
39
40
41
 
unit Unit1;
 
interface
 
uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, ExtCtrls, TeeProcs, TeEngine, Chart, StdCtrls;
 
type
  TForm1 = class(TForm)
    Memo1: TMemo;
    ButtonGo: TButton;
    Chart1: TChart;
    procedure ButtonGoClick(Sender: TObject);
  private
    { Déclarations privées }
  public
    { Déclarations publiques }
  end;
 
var
  Form1: TForm1;
 
implementation
 
{$R *.dfm}
 
procedure TForm1.ButtonGoClick(Sender: TObject);
var Series1: TLineSeries;
begin
  Series1 := TLineSeries.Create(Chart1);
  with Series1 do begin
    ParentChart := Chart1;
    SeriesColor := clRed;
    XLabelsSource := 'MON_CHAMP_ABSCISSE';
    YValues.ValueSource := 'MON_CHAMP_ORDONNEE';
  end;
end;
 
end.

Mais ça plante à la compilation à la ligne :
var Series1: TLineSeries;
avec le message : Identificateur non déclaré : 'TLineSeries'
Je demande donc une fois de plus une aide...
Amicalement,
Alain

[alainvh]

Suite...
Je lis dans l'aide Delphi :

Ajoutez un composant Series au moyen de l'éditeur de graphes.

On doit pouvoir réaliser ceci dynamiquement...

Placez un composant Line Series dans la fiche. (Le composant TLineSeries affiche tous les points en les reliant par une ligne)

Sans doute, mais où se cache-t-il, cet animal de composant ?

[banban54]

bonjour

je pense qu'il faut d'abord créer un chart avant de créer la série, ensuite mettre le chart comme parent de la série.

edit: Ajouter 'Series' dans la close Uses du programme!
à+

[alainvh]

Bonjour Banban54... et merci pour ta réponse !
Il n'y avait pas de pb de création de Chart (le composant est déposé sur la forme), mais... bingo !

edit: Ajouter 'Series' dans la close Uses du programme!

Je me doutais bien qu'il s'agissait d'une entoureloupe de ce genre. Question : y a-t-il une combine (dans l'aide de Delphi ou autre) pour trouver ce qu'il faut ajouter dans la clause Uses ???
Merci encore et bon dimanche.
Amicalement,
Alain

[alainvh]

Afin de ne pas mélanger les genres, je clos cette discussion, mais repose ma dernière question dans une nouvelle discussion.
Merci à tous.