[crash94]

Здравствуйте формучане..
Имеется 60 чисел от 0 до 6000000. Пытаюсь сделать, чтобы когда пользователь вводит число в edit, то программа искала среднее между 2 числами.К примеру

Введено в edit число 8765
Ведется поиск. Если число вошло в диапозон edit > '8000' и edit < '10000' то выполнялось любое действие...

Пытался сделать так:

if ( Edit1.Text >= '0' ) and ( Edit1.Text < '700' ) then
begin
//code
end
else
if ( Edit1.Text >= '700' ) and ( Edit1.Text < '1400' ) then
begin
//code
end;

но если ввести число 800 к примеру, софт не срабатывает