Si puoi fare così:

codice:
   TCheckBox(FindComponent('MyCheckBox')).Checked
   then ...