Bonsoir,

Ce code fonctionne avec la VCL et sert à modifier plusieurs composants.

Existe t-il un code analogue avec FireMonkey ?

Merci d'avance.

Cordialement.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
 
void __fastcall TForm1::Button1Click(TObject *Sender)
{
    for ( int x=0 ; x<ControlCount ; x++)
         if ((AnsiString)Controls[x]->ClassName() == "TEdit" )
                  ((TEdit*)Controls[x])->Text = "Ok";
}