Discussion :

[SurfingJeff]

Peut on réinitialiser d'un coup tous les champ de tous les enregistrement(soit 256 ici) de type "record" sans utiliser une boucle for i= ...to...do... ?:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 
type
  TArticle = record
    PrixAchatHT          : currency;
    PrixPublicTTC        : currency;
    Designation          : string;
    Stock                : Integer;
end;
 
var
  Article : Array [1..256] of TArticle;

Par réinitialiser cela signifie mettre les champs currency et integer à zéro, et les champs string à null

[e-ric]

Non

e-ric

[Cl@udius]

Comme dit E-ric avec un tableau statique tu n'as pas d'autre moyen que de faire une boucle.

Par contre avec un tableau dynamique il suffit de mettre sa longueur à 0 puis à 256.

@+

[e-ric]

Comme dit E-ric avec un tableau statique tu n'as pas d'autre moyen que de faire une boucle.

Par contre avec un tableau dynamique il suffit de mettre sa longueur à 0 puis à 256.

@+

je souhaiterais connaître le rapport entre l'initialisation des éléments d'un tableau et l'utilisation de setLength, est-ce que SetLength procède à des initialisations implicites pour les types simples ?

Personnellement, je préfère initialiser moi-même les éléments du tableau, au moins c'est explicite.

Cordialement

e-ric

[Cl@udius]

Salut,

est-ce que SetLength procède à des initialisations implicites pour les types simples ?

Oui 0 pour des Integer et Float, une chaine vide ('') pour des strings, False pour des Boolean, etc...

Personnellement, je préfère initialiser moi-même les éléments du tableau, au moins c'est explicite.

Bien sûr, si les valeurs par défaut ne correspondent pas à tes besoins.

@+ Claudius

[PadawanDuDelphi]

Bonjour,

avec une approche différente peut-être:

Code :

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

1
2
var
  Article : Array of TArticle;

Et en jouant sur setlength:

Code :

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

1
2
3
4
5
setlength(Article,256);  //alloué un tableau de 256 valeurs
  Article[0].Stock := 10; ;  //La tu remplis tes tableaux
...............
  setlength(Article,0);   //Efface ton tableau
  setlength(Article,256); //et le réalloue

@+.

[PadawanDuDelphi]

J'ai été devancé...

[SurfingJeff]

Bigre je n'avais pas pensé à la methode setlength avec une taille égale à zéro...(pas très logique de pouvoir définir un tableau de longueur nulle, mais bon ca marche...)

[Cl@udius]

Bigre je n'avais pas pensé à la methode setlength avec une taille égale à zéro...(pas très logique de pouvoir définir un tableau de longueur nulle, mais bon ca marche...)

Si si c'est logique, c'est d'ailleurs ce que tu devras faire avant de quitter ton appli pour libérer la mémoire allouée au tableau.

@+ Claudius