Hola.
Si vas a usar el evento
OnExit sobre
TEdit y
TCustomEdit, debes realizar el moldeo de este modo:
Código PHP:
void __fastcall TfRecMod::FechaExit(TObject *Sender)
{
TEdit *Edit = static_cast<TEdit*>(Sender); // <--
Caption = (Edit->ReadOnly) ? "ReadOnly" : "Normal";
[...]
}
Saludos