[T-dayne]

Код:

if CheckBox1.Checked:=false then

Ключевая ошибка. Все учителя/самоучители в первые дни изучения вбивают студентам что "=" это равенство а ":=" это ПРИСВОИТЬ. Дальше поймешь?

Код:

Label4.Caption:=('Вкл.');

А здесь нужно было так:

Код:

Label4.Caption:='Вкл.';