Discussion :

[Guigui_]

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 :

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

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;

[Samchi]

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 :

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

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

Je pense que ça devrais marcher.

[Guigui_]

(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

[Samchi]

Essaie de crée un nouveau type :

Code :

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

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.

[Guigui_]

merci c'était ça.