SetLength (rtl)

De Wiki1000

(Différences entre les versions)

Version du 16 août 2009 à 09:54

Procedure setLength(var s:variant; newlength:Integer);

Cette fonction à deux usages :

V	Chaine à définir.
newlength	Nouvelle longueur de la chaine.

V	Tableau ouvert.
newlength	Nouvelle taille du tableau.

Exemple

procedure foo();
var p:Array of string; idx:Integer;
begin
  setLength(p,10);
  for idx:=0 to 9 do
   p[idx] := inttostr(idx);
end;

Voir aussi:

Whos here now: Members 0 Guests 0 Bots & Crawlers 1

@@ Ligne 1 : / Ligne 1 : @@
-<source lang='delphi'>Procedure setLength(var s:String; newlength:Integer);</source>
+<source lang='delphi'>Procedure setLength(var s:variant; newlength:Integer);</source>
-Cette fonction définie la longueur d'une chaine de caractère.
+Cette fonction à deux usages :
+*Appliquée à une chaîne elle définie sa longueur en caractère.
 {|class="wikitable"
 |-
-|s
+|V
 |Chaine à définir.
 |-
 |newlength
 |Nouvelle longueur de la chaine.
+|}
+*Appliquée à un tableau ouvert elle définie sa taille en élément.
+{|class="wikitable"
+|-
+|V
+|Tableau ouvert.
+|-
+|newlength
+|Nouvelle taille du tableau.
 |}
@@ Ligne 15 : / Ligne 28 : @@
 <source lang='delphi'>
+procedure foo();
+var p:Array of string; idx:Integer;
 begin
+  setLength(p,10);
+  for idx:=0 to 9 do
+   p[idx] := inttostr(idx);
 end;
 </source>
@@ Ligne 23 : / Ligne 41 : @@
 {{Footer|Développement DSM}}
 [[category:RTL Variant]]