Discussion :

[free07]

Bonjour,

J'arrive pas à trouver comment initialiser un tableau à trois dimensions dans mon code :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
 
const
  k_TYPE1 : array[0..255] of integer = (278,33,72,60,11,etc : pour 255 valeurs);
 
   k_Family = (Famille1, Famille2, Famille3);
   k_Style = (Normal, Faible, Fort);
 
var
   p_Game: array[Family, Style, 0..255] of integer; 
 
begin
  p_Game[Famille1, Normal] := k_TYPE1; // erreur type incompatible
  ...

J'ai une erreur de type incompatible lors de l'affectation p_Game, delphi ne nous permet pas de faire ce genre d'affectation ?
Merci d'avance

[jeromelef2]

bonjour,

avec la syntaxe suivante, c'est ok

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
const
  k_TYPE1 : array[0..4] of integer = (278,33,72,60,11); // à mettre sur 255 avec les valeurs
type
   k_Family = (Famille1, Famille2, Famille3);
   k_Style = (Normal, Faible, Fort);
 
var
  p_Game: array[k_Family, k_Style, 0..255] of integer;
begin
  p_Game [Famille1, Normal, 0] := k_TYPE1[0]; 
  p_Game [Famille1, Normal, 15] := k_TYPE1[1]; 
  p_Game [Famille1, Normal, 32] := k_TYPE1[2];
...

sauf que je suppose que cela ne corresponds pas à ce que tu voulais.

le problème de l'erreur est la suivante :
du définit pour p_game , une famille,un style, un entier, et tu dis que tu veux mettre un entier
du affecte à pgame, une famille, un style et tu veux lui mettre un tableau d'entier.

est ce que tu comprends mieux ton erreur ?

[tourlourou]

Code :

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

1
2
3
4
5
6
7
8
9
10
11
const
  k_TYPE1 : array[0..3] of integer = (278,33,72,60);
type
   k_Family = (Famille1, Famille2, Famille3);
   k_Style = (Normal, Faible, Fort);
 
var
   p_Game: array[k_Family, k_Style, 0..3] of integer;
 
begin
  p_Game[Famille1, Normal] := k_TYPE1;

fonctionne sous CodeTyphon (Lazarus)

Nota : k_TYPE1 : array[0..255] of integer = (278,33,72,60,11,etc : pour 256 valeurs); : origine de l'erreur ?

[free07]

bonjour,

avec la syntaxe suivante, c'est ok

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
const
  k_TYPE1 : array[0..4] of integer = (278,33,72,60,11); // à mettre sur 255 avec les valeurs
type
   k_Family = (Famille1, Famille2, Famille3);
   k_Style = (Normal, Faible, Fort);
 
var
  p_Game: array[k_Family, k_Style, 0..255] of integer;
begin
  p_Game [Famille1, Normal, 0] := k_TYPE1[0]; 
  p_Game [Famille1, Normal, 15] := k_TYPE1[1]; 
  p_Game [Famille1, Normal, 32] := k_TYPE1[2];
...

sauf que je suppose que cela ne corresponds pas à ce que tu voulais.

le problème de l'erreur est la suivante :
du définit pour p_game , une famille,un style, un entier, et tu dis que tu veux mettre un entier
du affecte à pgame, une famille, un style et tu veux lui mettre un tableau d'entier.

est ce que tu comprends mieux ton erreur ?

En fait, je définis pour une famille et un style, un tableau d'entier et c'est ce que je cherche à affecter.
Il faut bien lire :

Code :

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

1
2
3
 
const
  k_TYPE1 : array[0..255] of integer = (278,33,72,60,11,etc : pour 256 valeurs);

Code :

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

1
2
3
4
5
6
7
8
9
10
11
const
  k_TYPE1 : array[0..3] of integer = (278,33,72,60);
type
   k_Family = (Famille1, Famille2, Famille3);
   k_Style = (Normal, Faible, Fort);
 
var
   p_Game: array[k_Family, k_Style, 0..3] of integer;
 
begin
  p_Game[Famille1, Normal] := k_TYPE1;

fonctionne sous CodeTyphon (Lazarus)

Nota : k_TYPE1 : array[0..255] of integer = (278,33,72,60,11,etc : pour 256 valeurs); : origine de l'erreur ?

En fait, j'ai fait une erreur de frappe, j'aurais du mettre 256 valeurs, ce n'est malheureusement pas l'origine du problème.

Merci pour votre aide

[jeromelef2]

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
 
type
   k_Type = array[0..3] of integer ;
   k_Family = (Famille1, Famille2, Famille3);
   k_Style = (Normal, Faible, Fort);
const
  k_TYPE1 : k_type = (278,33,72,60);
 
var
   p_Game: array[k_Family, k_Style] of k_TYPE;
 
begin
  p_Game[Famille1, Normal] := k_TYPE1;

[Linkin]

Ce que tu cherches, ne serait pas ça?
(il faut déclarer un type commun pour les tableaux d'entier que tu veux affecter)

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
type
  k_Type=array[0..3] of integer;
const
  k_TYPE1 : k_Type = (278,33,72,60);
type
   k_Family = (Famille1, Famille2, Famille3);
   k_Style = (Normal, Faible, Fort);
 
var
   p_Game: array[k_Family,k_Style] of k_Type;
 
begin
  p_Game[Famille1, Normal] := k_TYPE1;

[free07]

Désolé mais j'aurais du préciser que je vais avoir plusieurs définitions de contantes comme suit :

Code :

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

1
2
3
4
5
6
 
const
  k_TYPE1 : array[0..255] of integer = (278,33,72,60,11,etc : pour 256 valeurs);
  k_TYPE2 : array[0..255] of integer = (12,6,27,etc : pour 256 valeurs);
  k_TYPE3 : array[0..255] of integer = (256 valeurs);
  ...

Je ne peux donc pas faire :

Code :

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

p_Game: array[k_Family,k_Style] of k_Type;

puisque je peux avoir aussi :

Code :

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

1
2
3
4
5
6
 
  p_Game[Famille1, Normal] := k_TYPE2;
// ou bien
  p_Game[Famille1, Normal] := k_TYPE3;
// tout comme :
  p_Game[Famille1, Normal] := k_TYPE1;

Je suis donc obligé de garder la définition :

Code :

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

p_Game: array[k_Family, k_Style, 0..255] of integer;

J'espère que je suis explicite.

[ShaiLeTroll]

Je ne comprends pas ta réponse !
La solution de Linkin est correcte et ta démonstration pour moi le confirme !

Code :

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

1
2
3
4
5
6
7
8
type
  k_Type=array[0..255] of integer;
 
const
  k_TYPE1 : k_Type = (278,33,72,60,11,etc : pour 256 valeurs);
  k_TYPE2 : k_Type = (12,6,27,etc : pour 256 valeurs);
  k_TYPE3 : k_Type = (256 valeurs);
  ...

Tu confonds Type et Variable !

[free07]

Je ne comprends pas ta réponse !
La solution de Linkin est correcte et ta démonstration pour moi le confirme !

Code :

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

1
2
3
4
5
6
7
8
type
  k_Type=array[0..255] of integer;
 
const
  k_TYPE1 : k_Type = (278,33,72,60,11,etc : pour 256 valeurs);
  k_TYPE2 : k_Type = (12,6,27,etc : pour 256 valeurs);
  k_TYPE3 : k_Type = (256 valeurs);
  ...

Tu confonds Type et Variable !

Bon sang, je me suis complétement perdu dans les définitions, j'ai effectivement mal suivi la solution de Linkin et de jeromelef2.
Ok, merci à tous !

[Paul TOTH]

tu peux sans doute faire plus simple avec une seule constate p_Game

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
 
type
  Tk_Type = array[0..4] of Integer;
  Pk_Type = ^Tk_Type;
 
  k_Family = (Famille1, Famille2{, Famille3});
  k_Style = (Normal, Faible, Fort);
  TGame = array[k_Family, k_Style] of Pk_Type;
 
const
  k_TYPE1 : Tk_Type = (278,33,72,60,11); // à mettre sur 255 avec les valeurs
  k_TYPE2 : Tk_Type = (278,33,72,60,11); // à mettre sur 255 avec les valeurs
 
  p_Game: TGame = (
    ( // Famille1
      { Normal } @k_TYPE1,
      { Faible } @k_TYPE2,
      { Fort   } @k_TYPE1
    ),( // Famille2
      { Normal } @k_TYPE1,
      { Faible } @k_TYPE2,
      { Fort   } @k_TYPE1
    )
  );