Discussion :

[jojo86]

Bonsoir, je voulais savoir comment je pouvais modifier la propriétée TOP de plusieur object en même temps les objects sont Tedit Tlabel et des boutons...

J'ai essayé :

Code :

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

1
2
3
4
5
 
With Edit1,Edit2,Boutton1,Boutton2 do 
 
Top:=Top+48;
end

Merci de votre aide.

[Archimède]

comme ça, tu peux :

Code :

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

1
2
3
4
5
6
7
8
9
10
 
procedure TForm1.FormCreate(Sender: TObject);
var
i:integer;
objet: array[1..2] of Tcontrol;
begin
objet[1]:=edit1;
objet[2]:=button1;
for i:=1 to 2 do objet[i].Top:=100;
end;

avec with ??

[jojo86]

J'aimerais comprendre en détail... Aray sert à créer un tableau c'est sa?

Est-ce que quelqu'un pourait m'éxpliquer objet: array[1..2] of Tcontrol;

Je n'arriva pas à m'imaginer ce tableau.Merci de votre aide !

[droggo]

Xou,

J'aimerais comprendre en détail... Aray sert à créer un tableau c'est sa?

Est-ce que quelqu'un pourait m'éxpliquer objet: array[1..2] of Tcontrol;

Je n'arriva pas à m'imaginer ce tableau.Merci de votre aide !

Avant de se lancer dans ce genre de truc, il faut apprendre les bases, ça te permettra de comprendre.

[Aka Guymelef]

Effectivement le mot-clé array sert à déclarer les tableaux. Dans l'ordre de la syntaxe on a :

le mot clé array : indique qu'on déclare une variable de type tableau
[x..y] : permet de définir la taille du tableau ainsi que l'index minimal (x) et maximal (y)
of T : déclare le type de donnée T contenu dans chaque case du tableau.

Code :

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

objet: array[1..2] of Tcontrol;

Déclare donc un tableau nommé objet qui peut contenir 2 objets de type TControl, le premier index vaut 1 et le dernier index vaut 2.