if (Edit1->Text=="включить")

{
CanClose=true;
}
else
{
CanClose=false;
}