Discussion :

[c_icla]

Bonjour,

Une question sur l'utilisation de setlength avec une string : setlength alloue de la mémoire pour la chaine. Mais si j'affecte une valeur à la chaîne, la mémoire allouée change-t-elle automatiquement ?

Par exemple

Code :

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

1
2
3
4
5
6
7
Procedure Test;
Var S : String;
Begin
  SetLength(S, 100); // 100 octets alloués pour S
  S := 'Toto';      // toujours 100 octets pour S ? 
                    // ou Delphi a-t-il réorganisé la mémoire ? 
end;

Existe-t-il un moyen de connaître la mémoire allouée pour une string ?

Merci.

[kirua2150]

salut, j'veux pas dire de bétise mais je crois que le setlength ne sert à rien appliqué à String (les string sont gérés par Delphi).
Par exemple si tu fais :

Code :

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

1
2
3
 
setlength(machaine,0);
machaine := 'toto';

il va bien mettre 'toto' dans machaine sans planter.

[slimjoe]

salut, j'veux pas dire de bétise mais je crois que le setlength ne sert à rien appliqué à String (les string sont gérés par Delphi).
Par exemple si tu fais :

Code :

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

1
2
3
 
setlength(machaine,0);
machaine := 'toto';

il va bien mettre 'toto' dans machaine sans planter.

Ça vient de l'aide de Delphi 7 :

For a long-string or dynamic-array variable, SetLength reallocates the string or array referenced by S to the given length. Existing characters in the string or elements in the array are preserved, but the content of newly allocated space is undefined.

[Bejaia-In]

Extrait de l'aide Delphi 7 (en Français bien-sûr) :

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
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
Quand vous déclarez une chaîne longue :

S: string;

il n'est pas nécessaire de l'initialiser. Les chaînes longues sont automatiquement initialisées vides. Pour tester si une chaîne longue est vide, vous pouvez utiliser la variable EmptyStr :

  S = EmptyStr;

ou la comparer à une chaîne vide :

  S = '';

Une chaîne vide ne contient pas de données utilisables. Donc, essayer d'accéder par indice à une chaîne vide est similaire à l'accès à nil et provoque une violation d'accès :

var
  S: string;
begin
  S[i];  // cela provoque une violation d'accès
  // instructions
end;

De même, si vous transtypez une chaîne vide en un PChar, le résultat est un pointeur nil. Donc, si vous transmettez un tel PChar à une routine qui doit le lire ou l'écrire, la routine doit gérer la valeur nil :

var
  S: string;  // chaîne vide
begin
  proc(PChar(S));  // assurez-vous que proc peut gérer nil
  // instructions
end;

Si ce n'est pas le cas, vous devez initialiser la chaîne :

  S := 'No longer nil';
  proc(PChar(S));  // proc n'a plus besoin de gérer nil

ou vous devez en spécifier la longueur en utilisant la procédure SetLength :

  SetLength(S, 100);  // attribue à la chaîne S une longueur dynamique 100
  proc(PChar(S));  // proc n'a plus besoin de gérer nil

Quand vous utilisez SetLength, les caractères existant déjà dans la chaîne sont préservés mais le contenu de l'espace nouvellement alloué est indéterminé. Après un appel à SetLength, S est certain de référencer une chaîne unique, c'est-à-dire une chaîne avec un compteur de référence à 1. Pour connaître la longueur d'une chaîne, utilisez la fonction Length.

N'oubliez pas qu'une chaîne déclarée de la manière suivante :

  S: string[n];

est implicitement une chaîne courte et pas une chaîne longue de longueur n. Pour déclarer une chaîne longue ayant spécifiquement la longueur n, déclarez une variable de type chaîne, puis utilisez la procédure SetLength :

  S: string;
  SetLength(S, n);

[slimjoe]

Length(maChaine) ?

[Jipété]

Yep !

Un "must read" sur les strings (trouvé le lien qq part ici ou sur un autre forum)

[Reisubar]

Mais si j'affecte une valeur à la chaîne, la mémoire allouée change-t-elle automatiquement ?

Oui. Pour plus de détails, voir ici :
http://reisubar.developpez.com/tutor...trings-pchars/

Existe-t-il un moyen de connaître la mémoire allouée pour une string ?

Pour un AnsiString, la taille en octets est implicitement donnée par la fonction Length().

[c_icla]

Le tutorial est très détaillé.

Mon souci était d'éviter de déclencher une exception OutOfMemory (l'objet sert à gérer les erreurs).
La solution la plus simple est donc de passer par un PChar, lui allouer sa mémoire en début de programme et la désallouer à la fin.

Merci.