Ошибка в запросе

[ЛисЁНЫШ]

Здравствуйте!!!
Вопрос такой, мне нужно сделать запрос по нескольким полям, чтоб отфильтровывались только те записи в которых в поле POL будет равен "М" в поле MESTO_SM='Вне дома', поле GRUP_DIAGN должно быть равно или 'Некоторые инфекционные' или 'В том числе туберкулез'.У меня вышел вот такой запрос:

form1.ADOQuery1.Filtered:=false;
filtr:='';
filtr:= 'POL LIKE '+  #39 + 'М' + '%' + #39+
' and '+'MESTO_SM LIKE '+  #39 + 'Вне дома' + '%' + #39 +
' and '+'GRUP_DIAGN LIKE '+  #39 + 'Некоторые инфекционные' + '%' + #39+
' or '+'GRUP_DIAGN LIKE '+  #39 + 'В том числе туберкулез' + '%' + #39;
if length(filtr) > 0 then
begin
form1.ADOQuery1.Filter:= filtr;
form1.ADOQuery1.Filtered:=true;
Ap.Range['F15']:=IntToStr(form1.ADOQuery1.RecordCount);
end;

Но при выполнении его выдает ошибку.Подскажите где тут неправильно.

[rdama]

А что за ошибка то?
И по моему та часть запроса в которой находится OR должна быть в скобках.

POL LIKE 'М%' and MESTO_SM LIKE 'Вне дома%'
and (GRUP_DIAGN LIKE 'Некоторые инфекционные%' OR GRUP_DIAGN LIKE 'В том числе туберкулез%')

[Stilet]

Попробуй:

Filte:='(pol like '+QuotedStr('M%')+
') and (mesto_sm like '+QuotedStr('Вне Дома%')+
') and (GRUP_DIAGN like '+QuotedStr('Некоторые инфекционные%')+
') or (GRUP_DIAGN LIKE '+QuotedStr('В том числе туберкулез%')+')';

А вообще текст ошибки приводить нужно. Не все тут телепаты.

[ЛисЁНЫШ]

Спасибо всем у меня получилось))))