Générer des variables avec une boucle

Bonjour,

Je suis débutant en Delphi et je voudrai créer trois variable Z1, Z2 et Z3 à partir de zz1, zz2 et zz3. Plutôt que de faire Z1=qqchose+zz1 et recommencer pour Z2 et Z3 j'aimerai utiliser une boucle et générer comme ça les trois variables d'un coup. J'ai essayé avec ça:

Code:

---

1 2 3 4 5

for i:=1 to 3 do begin j:=IntToStr(i); Z+j:=Zmax-zz+j; end;

---

mais ça marche pas. Est-ce que quelqu'un sait comment faire ?

Merci d'avance.

Pourquoi ne pas utiliser un tableau?

Code:

---

1 2 3

Z : array[0..2] of integer; zz : array[0..2] of integer;

---

Et ensuite

Code:

---

1 2 3 4 5

for i:=1 to 3 do begin Z[i]:=Z[High(Z)]-zz[i]; end;

---

Oui ça ne peut pas marcher...

Tu peux utiliser un tableau de 3 valeurs, une liste, un record, bref une structure.

Sinon, vu que tu as fait une boucle de 5 lignes, il vaut mieux faire 3 lignes :
z1 := zz1 + qqueschoses;
z2 := zz2 + qqueschoses;
z3 := zz3 + qqueschoses;

Si vraiment tu as un nombre dynamic de variable ou un grand nombre de variables utilise Array of MonType ou si le nombre est fixe array [0..MonNombre] of MonType.

Je trouve tout de même qu'avec un bon copier coller, cela va vite...

A toi de voir.

Je ne peux pas utiliser de tableau parce que pour en faire un il fait déclarer le dit tableau dans la partie déclaration du programme et je n'y ai pas accès, je peux juste bidouiller le corps du programme...

Citation:

---

Sinon, vu que tu as fait une boucle de 5 lignes, il vaut mieux faire 3 lignes

---

A terme je voudrai faire ça avec plus de 3 variables...

As-tu accès au .pas ? Tes variables sont déclarées où ??? Tu en as combien ???

Essaye de nous donner le maximum d'information, car je ne comprends pas comment tu peux faire en Delphi pour ne pas avoir accès aux déclarations.

Citation:

---

Envoyé par Anamelech

Bonjour,

Je suis débutant en Delphi et je voudrai créer trois variable Z1, Z2 et Z3 à partir de zz1, zz2 et zz3. Plutôt que de faire Z1=qqchose+zz1 et recommencer pour Z2 et Z3 j'aimerai utiliser une boucle et générer comme ça les trois variables d'un coup. J'ai essayé avec ça:

Code:

---

1 2 3 4 5

for i:=1 to 3 do begin j:=IntToStr(i); Z+j:=Zmax-zz+j; end;

---

mais ça marche pas. Est-ce que quelqu'un sait comment faire ?

Merci d'avance.

---

Appréciation perso : Tu cherches bien des complications pour rien, affectes tes variables l'une après l'autre, c'est bien plus simple.

e-ric

J'ai pas accès à la partie déclaration parce que je travaille avec un logiciel de modélisation qui est apparemment écrit en Delphi (y'a rien d'indiqué) pour ce qui est de l'entrée des différentes données/caractéristiques de ce que l'on veut modéliser. Du coup je ne sais pas comment sont déclarées les variables mais je peux quand même en créer de nouvelles directement dans ce que je pense être le corps du programme !

Citation:

---

Appréciation perso : Tu cherches bien des complications pour rien, affectes tes variables l'une après l'autre, c'est bien plus simple.

---

Avec plus d'une dizaine de variables je trouve ça un peu lourd et pas très joli...

Ok... C'est quoi ton modéliseur, que je ne travaille pas avec :D :D (j'aimerais savoir, ce ne serais pas together)

Bon, sinon, sérieusement, quelle doit être la portée de tes nouvelles variables ? Si ce n'est que dans ta fonction, alors tu peux faire :
var
montableau : array of MonType;
dans ta fonction ou procedure.

Sinon tu es bloquée. Tes variables Z1, ... sont déclarées où ???

Je les déclare pas ! je mets Z:=un truc et il fait comme si elles étaient déclarées ce qui n'est pas a priori possible si c'est en Delphi mais ça lui pose pas de problème ! Et comme ça ressemble furieusement à du Delphi je sais pas trop comment ça marche...Sinon c'est un programme qui a été développé par un laboratoire et que mon chef a récupéré et m'a refilé, donc je sais pas grand chose dessus (et j'ai l'impression que mon chef non plus...).

Et bien alors au lieu de faire Z := Montruc, fait un truc comme ça :

Code:

---

1 2	for i := 0 to Z.Count-1 do Z[i] := zz[i] + quelqueschoses;

---

Il va te dire que ton z et ton zz sont des array of LeurType.

Sinon ensuite je ne vois pas d'autres solutions que de faire :

Code:

---

1 2 3 4 5

z1 := zz1 + ...; z2 := zz2 + ...; . . .

---

Voilà.

Il veut pas, il dit que la variable n'est pas définie, pourtant si je la déclare sous une autre forme que celle d'un tableau il dit rien et exécute le programme comme il faut...

peut-être tu peux copier coller environs 20 lignes de code...
peut-être quelqu'un pourra te dire de quel langage il s'agit...

Il y a toute sorte d'indice dans 20 lignes de codes...
exemple d'un if en Delphi:

Code:

---

1 2	if a=1 then b:=1;

---

exemple en C:

Code:

---

1 2 3 4 5

if (a==1) { b=1; }

---

exemple en Python:

Code:

---

1 2 3

if a==1: b=1;

---

Bref, j'ai pas l'intension de tous les faire...

Argh ! En fouillant dans le logiciel de *ù$*^$)=àç ! je viens de trouver une rubrique variables mais il semblerait que les "amis" de mon chef lui ont refilé une version light, du coup on n'a pas accès au déclaration de variables ! Mais je sais toujours pas pourquoi je peux me servir de nouvelles variables non-déclarées....


Sinon voici un extrait de code:

Code:

---

1 2 3 4 5 6 7 8 9

E:=FloatToStr(Energie);D:=FloatToStr(Duree_pulse*1000); Tiret:='-';Joule:='J';milliseconde:='ms'; for i:=1 to 1 do begin dYcum:=(i-1)*decalageY; Ylas:=Y_depart+dYcum; X_depart:=Xmin+decalageX/2; for j:=1 to nb_pulses do begin

---

C'est bien du Delphi ?

Ca ressemble beaucoup entk!

Pour ce qui est de l'utilisation des variables non déclarées sans problèmes,
je peux pas l'expliquer...à moins que tu ai beaucoup de chance...
et que les variables que tu as nomées et tentées d'utiliser soit déjà déclaré!8O

ça peut pas être un coup de bol, parce que quand j'appelle mes variables zzz1, ça fonctionne et je pense qu'il y a peu de chance que les gusses qui ont fait ce programme aient appelé une variable comme ça, pareille pour une variable jhgft, alors....

Ce ne serait pas du Delphi Script (DScript) ou un truc comme ça par hasard ? :koi: