Discussion :

[Art19]

bonjour,

je voudrais remplir un tableau passe en argument d'une fonction dans la fonction appelee recursivement et ajouter des elements a la suite du tableau a chaque appel de la fonction. Mais pour l'instant a chaque appel de ma fonction le tableau redevient vide. Mon code:

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
 
 
type MyArray = array of Double;
 
procedure stockIndex( pa: JAKata; f: String; out tab: MyArray; out list: TStringList );
begin
 
tabLength := Length(tab);
 
for i := 0 to pa.nb-1 do begin
 
Inc(tabLength);
tab[tabLength-1] := pa.index;
 
end; 
end;

sauf qu'a chaque appel de stockIndex tabLength redevient nul donc mon tableau est vide!!! Alors que moi je voudrais qu'il contienne tous les elements ajoutes depuis le debut!

[sjrd]

Utilise des var à la place de out dans tes paramètres. Les paramètres passés en out sont automatiquement "vidés" avant l'appel de la fonction. Cela s'applique aux chaînes et aux tableaux dynamiques, essentiellement.

[Art19]

ok merci sjrd