Discussion :

[Tangui]

Bonjour à tous,

j'ai un gros problème lorsque j'essaye d'intégrer un record dans un tableau dynamique (access violation...).

Voici le code en question :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
TCase = record
    empty : boolean;
  end;
 
  TMapObj = class
    private
    name : string;
    mapType : string;
    map : array[0..99] of array[0..99] of TCase;
    procedure init(width : integer; height : integer);
  end;

Merci d'avance !

[anapurna]

...
Voici le code en question :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
 Type  
  TCase = record
    empty : boolean;
  end;
  Tarrayofcase : Array of  TCase;
  TMapObj = class
    private
    name : string;
    mapType : string;
    map : array of Tarrayofcase;
    procedure init(width : integer; height : integer);
  end;

...

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 
procedure TMapObj.init(width,height : integer);
begin
  Setlength(map,with,heigth);
  ...
end;
 
...
begin
  init(99,99);  
end;

ton tableau n'etait pas dynamique mais statique du fait de l'indicer dans sa declaration

@+ Phil

[sjrd]

Euh le problème c'est surtout que t'as déclaré une classe (class) au lieu d'un record (record)