Discussion :

[tintin62]

bonjour
j'ouvre un nouveau sujet pour pas pollué le précèdent
je voudrais changer ma déclaration suivante

Code :

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

1
2
 
RectArray: array [1 .. 66] of TRectangle;

donc d'apres ce que vient apprendre je dois faire

Code :

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

1
2
3
4
5
6
7
 
var
RectArray: array  of TRectangle;
nbrpiece:integer;
begin
nbrpiece:=66;
SetLength(RectArray, nbrpiece);

et pour détruire le array

Code :

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

1
2
3
4
 
for I:= Low(Rectarray) to High(Rectarray) do
   Rectarray[I].Free;
  SetLength(Rectarray, 0);