Par exemple: var i:= Integer begin for i:=1 to 10 do begin TEdit(FindComponent('Edit' + IntToStr(i))).Text:=''; end; end; ce qui aurait pour equivalence: begin Edit1.Text:=''; Edit2.Text:=''; [...] Edit10.Text:=''; end;
Très bien ça !! Ca m'aurait servi plus d'une fois !!
t'1 !!! d'la balle ! trop cool merci :)
Après avoir (vainement) épluché la doc 'DELPHI', tu m'as donné la solution exacte à mon problème
Ca ne marche pas dans une dll
Mai avice delphi 7 ça marche pas ???
Se souvenir du profil
Mot de passe oublié ? / Activation de compteCréer un compte
1 598 458 membres 466 nouveaux aujourd'hui 15 439 membres club