//-----------------------------------
void __fastcall
TForm1::Button1Click(TObject *Sender)
{
Form2->Refresh();
}
//----------------------------------
Przedstawiona powyżej procedura powoduje odświeżenie formularza.