Уже голову сломал незнаю в чем ошибка:
Код:
if (Edit4.text<>'') then t4:=StrToInt(Edit4.text)+1 else t4:=0;
Edit1.text:=inttostr(t4);
Edit4 пустое, без пробелов!, но переменная t4 все равно принимает значение "1"
Следовательно условие
Код:
t4:=StrToInt(Edit4.text)+1
выполняется
Где я ошибся?