BD2.Filter:=Format('([Пол сотрудника]=''%s'' and [Вид работы] LIKE %s%'')',[Edit2.Text, Edit3.Text]); BD2.Filtered:=true;