[lmikle]

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

Код:

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

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