passage en paramètre d'un array dynamique 2D

Je veux lancer ma fonction swap comme ceci :

type
monTableau: array of array of Integer
setlength(monTableau,NbLignes,NbColonnnes);
... Code ...
TForm2.swap(0,0,5,5,monTableau);

Cependant, il met une erreur lors de la compilation sur "array of array of Integer" de la fonction swap, alors que monTableau est bien reconnu

Code:

---

1 2 3 4 5 6

procedure TForm2.Swap(i,j,n1,n2: Integer,tab: array of array of integer); begin tab[i, j]:=tab[i, j] xor tab[n1, n2]; tab[n1,n2]:=tab[i, j] xor tab[n1, n2]; tab[i, j]:=tab[i, j] xor tab[n1, n2]; end;

---

Je vois qu'il y a une virgule entre les paramètres de ta procédure, Mais il faut mettre un point virgule entre les variable de type différent.

Code:

---

1 2	procedure TForm2.Swap(i,j,n1,n2: Integer;tab: array of array of integer);

---

Je pense que ça devrais marcher. :wink:

(il y avait peut-être des erreurs de points virgules mais dans mon programme, il n'y a en fait que le tableau qui est passé en paramètre)

en fait, il met l'erreur suivante au niveau de la définition de la fonction:
procedure TForm2.Swap(tab: array of array of integer);
[Erreur] Unit2.pas(15): Identificateur attendu(e) mais 'ARRAY' trouvé(e)

à ce niveau
TForm2.swap(monTableau);
[Erreur] Unit2.pas(76): Types incompatibles : 'Array' et 'dynamic array'

dans la procédure swap:
tab[i, j]:=tab[i, j] xor tab[n1, n2];
[Erreur] Unit2.pas(91): Type tableau requis

voilà, c'est peut-être plus clair comme ça

Essaie de crée un nouveau type :

Code:

---

type TonType = array of array of integer;

---

Et met ce nouveau type dans tes paramètres. Je pense que là ça marchera.

P.S. J'avais eu un pb symilaire, mais avec une valeur de retour que j'ai résolu comme ça.

merci c'était ça.