Simplificando, no es necesario realizar tanto cast y se puede escribir así:
Código PHP:
void __fastcall TForm1::tres1Click(TObject *Sender)
{
TMenuItem *I = static_cast<TMenuItem*>(Sender);
while(I->Parent->Parent)
I = I->Parent;
Caption = I->Caption;
}
Saludos.