AnsiString nameString("TButton");
TButton * button;
for(int i=0; i < ComponentCount; i++)
{
//Check to see if the component is a TButton
if (Components[i]->ClassNameIs(nameString))
{
//cast the component to a TButton *
button = (TButton *)Components[i];
button->Font->Name = "Courier";
......
}