hola, quizas esto te ayude:
void __fastcall TForm1::CheckBox1Click(TObject *Sender)
{
AnsiString variable;
variable=CheckBox1->Caption;
TStringList *archivo=new TStringList;
archivo->Add(variable);
archivo->SaveToFile("loquequieras.loquedesees");
}
//---------------------------------------------------------------------------
No lo probe, pero capaz que te da una idea.
De todas maneras respondeme si lo logras o no.
Saludos.