Générer des variables avec une boucle

**Anamelech** · 02/11/2006, 13h42

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 :

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

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.

**Linkin** · 02/11/2006, 13h48

Pourquoi ne pas utiliser un tableau?

Code :

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

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

Et ensuite

Code :

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

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

**pinson** · 02/11/2006, 13h49

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.

**Anamelech** · 02/11/2006, 13h52

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...

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...

**pinson** · 02/11/2006, 13h58

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.

**e-ric** · 02/11/2006, 14h01

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 :

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

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

**Anamelech** · 02/11/2006, 14h12

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 !

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...

**pinson** · 02/11/2006, 14h24

Ok... C'est quoi ton modéliseur, que je ne travaille pas avec

(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ù ???

**Anamelech** · 02/11/2006, 14h41

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...).

**pinson** · 02/11/2006, 14h45

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

Code :

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

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 :

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

1
2
3
4
5
z1 := zz1 + ...;
z2 := zz2 + ...;
.
.
.

Voilà.

**Anamelech** · 02/11/2006, 14h54

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...

**Eric Boisvert** · 02/11/2006, 14h59

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 :

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

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

exemple en C:

Code :

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

1
2
3
4
5
 if (a==1) 
 {
      b=1;
 }

exemple en Python:

Code :

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

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

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

**Anamelech** · 02/11/2006, 15h04

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 :

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

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 ?

**Eric Boisvert** · 02/11/2006, 15h12

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é!

**Anamelech** · 02/11/2006, 15h25

ç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....

**LadyWasky** · 03/11/2006, 12h33

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

Générer des variables avec une boucle

Delphi

Discussions similaires

Partager

Partager