Discussion :

[navyg]

Bonjour,

De toutes les discussions et littératures que j'ai lues, je pensais benoîtement que la fonction copy faisait une copie complète d'un tableau dynamique, et non pas seulement une affectation de pointeur. Or si je fais :

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
 
type
   taoaov=array of array of variant;
 
var
   a, b: taoaov;
 
procedure TForm1.FormCreate(Sender: TObject);
var
   i, j: integer;
begin
// détermination de la taille du tableau
setlength(a, 5, 5);
 
// et affectation de n'importe quoi
for i:=0 to high(a) do
   begin
   for j:=0 to high(a[i]) do
      begin
      a[i, j]:=i*j;
      end;
   end;
 
// copie du tableau a dans b
b:=copy(a);
 
// au débugage les pointeurs vers a et b sont différents !
// @a=$A3EFF8
// @b=$A3EFFC
 
// affectation d'une valeur à b[0, 0]
b[0, 0]='x';
 
// a[0, 0] devient aussi x
// à quoi sert copy alors ? autant écrire b:=a ? 
 
end;

NB : j'ai aussi essayé à la place de copy :

Code :

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

Move(Pointer(a)^, Pointer(b)^, SizeOf(a[0]) * Length(a);

Mais ça fait pareil.

J'ai sans doute, ENCORE, loupé quelque chose ...
Faut-il vraiment passer par une double boucle pour faire une copie indépendante ?
Merci de vos lumières ;o)

Yvan

[ShaiLeTroll]

Cherche sur le forum, on a parlé de ça il y a quelques semaines !

copier un tableau dynamique à deux dimensions
évoqué dans
Copie de variable de type record comprenant des éléments de type structuré

[navyg]

Cherche sur le forum, on a parlé de ça il y a quelques semaines !

copier un tableau dynamique à deux dimensions
évoqué dans
Copie de variable de type record comprenant des éléments de type structuré

Le premier lien je l'ai déjà lu tout à l'heure avant d'ouvrir mon sujet, car je n'avais pas vu de solution au problème ... mais je n'avais pas vu qu'il y avait une deuxième page ... oups ... je vais le revoir mais je n'ai pas tout compris .

Quant au second, je le connais bien car j'en suis à l'origine, mais je croyais justement avoir compris que copy résolvait le problème puisque c'est ce qu'on m'avait au final conseillé d'utiliser dans le class operator... mais j'avais encore mal compris il semble ...

Je vais reprendre à tête reposée car j'ai dû, comme je l'ai dit en premier, louper quelque chose ...
Pour l'instant je fonctionne avec une double boucle qui répond à mon problème, mais je cherchais une solution plus élégante et surtout rapide, mais il semble que ce ne soit pas si simple.