Ustawienie aktywnego komponentu
Aby po kliknięciu przycisku Button1 aktywnym komponentem formularza został Button2 wywołujemy funkcję SetFocus():
void __fastcall TForm1::Button1Click(TObject *Sender) { Button2->SetFocus(); }