Discussion :

[Ludo_360]

bonjour,

J'ai une vingtaine de Speedbutton dont les noms sont: btn_h1 .. btn_h21.

Je souhaite les appellés tous à la suite dans une boucle
for ii:= 1 to 21 do

Je n'arrive pas à savoir si je peux le faire, et si oui, comment le faire:

form1.btn_h(ii) := x ;

ça ne marche pas.. Quelques conseils de synthaxe seraient les bienvenus.

merci

++

[PadawanDuDelphi]

Salut,

Regarde du côté de FindComponent, il y a de nombreux exemples sur le forum.

A+.

[Ludo_360]

merci je vais voir ça...

je faisais déja
if form1.components.tag = ii then

mais le problème c'est que je dois modifier le caption après de chacun des button et que je n'ai pas le droit d'écrire form1.component.caption = tab[ii]..




merci qd mèm je vais regarder ça de plus près

++

[PadawanDuDelphi]

Peut-être un problème de cast.

Essayes un truc du style:

Code :

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

1
2
3
4
For ii:=0 to 21 do
begin
  (FindCompnent('btn_h'+intToStr(ii)') As TSpeedButton).Caption := 'Ton Caption';
end;

A+.