Нашел загвоздку.
if Nol = StrToInt(Edit1.Text) then
Как я и писал в начале. Таймер не выключается и это приводит к ошибке.
Исправил на Edit9 в котором указываю нужное мне число. И все равно ошибка! Только есть написать не изменяющееся число (if Nol = 4 then), тогда правильно работает. Но мне то нужно изменять.
|