[Aristarh Dark]

Сообщение от lmikle

И в чем проблема?

Код:

Timer1.Interval := StrToInt(Edit1.Text);

можно в OnKeyPress, кстати, там же можно заблокировать нецифровые символы, что бы ошибка конвертации не вылезала (только еще не забудь проверять на пустую строку).

Я бы так сделал:

Код:

Timer.Interval:=StrToIntDef(Edit.Text, 1000);
Edit.Text:=IntToStr(Timer.Interval);

Если ввели не числовое значение, то запишет секунду и выведет это значение в Edit