>>380
TCheckBox *box = (TCheckBox *)Sender;
にしたらできました。どうもです。