Discussion :

[PpPool]

Bonjour à tous,

j'ai les déclarations de record suivants :

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
 
 
  TMyTypeSerie=(TSLine,TSBubble,TSBar);
 
  TMyCaracteristiquesTSLine=record
    Epaisseur:Integer;
    Brush:TBrushStyle;
    Pinceau:TPen;
  end;
 
  TMyCaracteristiquesTSBubble=record
    Marqueur:TMyMarqueurSerieBubble;
  end;
 
....

Je voudrai déclarer un nouveau record, en spécifiant des directives de déclaration

exemple

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
 
 
  TMySerie=record
    Nom:String;
    TypeSerie:TMyTypeSerie;
//ICI A CE NIVEAU
//PAR EXEMPLE SI TypeSerie=TSLine THEN
Caracteristiques:TMyCaracteristiquesTSLine;
//ELSE IF TypeSerie=TSBubble THEN
Caracteristiques:TMyCaracteristiquesTSBar;
//...
  end;

Peut-on réaliser cela ? j'ai déjà vu passer dans des posts précédents des infos à ce sujet sur les directives de compilations, mais je n'ai rien retouvé.

KK'un peut il me tuyauter ?

Merci d'avance

@

[Nono40]

Ce que tu cherches c'est ceci je pense :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
type
TMyTypeSerie=(TSLine,TSBubble,TSBar);
 
TMySerie=record
    Nom:String;
    Case TypeSerie:TMyTypeSerie Of
      TSLine :(
                Toto:Integer
              );
      TSBubble:(
                Tito:Integer;
              );
  End;

Par contre le membre "Caracteristiques" devra avoir un nom différent dans chaque cas.

[PpPool]

Ce que tu cherches c'est ceci je pense :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
type
TMyTypeSerie=(TSLine,TSBubble,TSBar);
 
TMySerie=record
    Nom:String;
    Case TypeSerie:TMyTypeSerie Of
      TSLine :(
                Toto:Integer
              );
      TSBubble:(
                Tito:Integer;
              );
  End;

Par contre le membre "Caracteristiques" devra avoir un nom différent dans chaque cas.

Merci bcq Nono, çà marche nickel