Форма фильтрации по диапазону

[Малой]

Сделал форму фильтрации по диапазону с помощью 2х Edit'ов, Радиогруппы и кнопки но работать она отказывается, с Delphy "знаком" всего дней 5. Завтра курсовая буду оч благодарен за совет.

procedure TForm1.Button1Click(Sender: TObject); //фильтрация по диапазону
begin
 Case RadioGroup7.ItemIndex of
0:ADOTable4.Filter:='Vozrast>='+Edit3.Text+'and Vozrast<='+Edit4.Text;
2:ADOTable4.Filter:='';
end;

[maLoy*508]

возможно просто не хватает пробела после едита...
то есть если в edit3.text у тебя '22', то получаем

ADOTable4.Filter:='Vozrast>=22and Vozrast<='+Edit4.Text

следовательно попробуй добавить пробел

0:ADOTable4.Filter:='Vozrast>='+Edit3.Text+' ' + 'and Vozrast<='+Edit4.Text;

или просто поставь пробел перед and

[Stilet]

но работать она отказывается

А что Делфи уже научилась молча отказываться, или тебе текст ошибки привести вера не позволяет?

[Малой]

Ошибку программа не выдавала

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

А что Делфи уже научилась молча отказываться, или тебе текст ошибки привести вера не позволяет?

Именно научилась, а точнее умела! Просто ни каких действий при вводе эдитов кликах на радиогруппе и на кнопке не производила!

Большое спасибо за помошь, maLoy*508 теперь всё работает.