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

[hunter03]

Здравствуйте, помогите пожалуйста, никак не получается сделать фильтр...
есть 2 связанные таблицы....в первой таблице(гланой) порядковый номер человека(автоинкремент) фамилия, имя и т.д.
Во второй таблице тоже счетчик( автоинкрм), порядковый номер записи чедовека, номер телефона и т.д.

мне необходимо по номеру телефона во 2 таблице показать данные про этого человека в 1 таблице...
Пробовал так, но работает не так как нада....
procedure TForm1.Edit4Change(Sender: TObject);
begin
with Table2 do begin
Filtered := False;
Filter := '';

if Length(Edit4.Text)<>0 then begin
if Length(Filter)<>0 then Filter := Filter + ' and Number=' + #39 + Edit4.Text + #39 else
Filter := Filter + 'Number=' + #39 + Edit4.Text + #39;
end;
Filtered := True; Table1.Filtered:=True;
end;

end;

[evg_m]

Код оформляется с помощью кнопочки #

Filtered := True; Table1.Filtered:=True;

И чему же равно условие фильтрации для ПЕРВОЙ таблицы.

[hunter03]

буду знать...
эм...я просто не могу понять какое условие создать...можете обьяснить?

[evg_m]

есть 2 связанные таблицы....в первой таблице(гланой) порядковый номер человека(автоинкремент) фамилия, имя и т.д.
=
Во второй таблице тоже счетчик( автоинкрм), порядковый номер записи чедовека, номер

Tabl1.Filter:='пор номер =' + Table2.fieldbyname('пор номер').Asstring;

[hunter03]

Спасибо большое!!!