[MarinaB]

Здравствуйте, вот такой вопрос. Нужно отфильтровать таблицу по одной или нескольким значениям. Что-то вроде такого:

Код:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25

if CheckBox14.Checked then   begin     d1 := DateTimePicker1.DateTime;     d2 := DateTimePicker2.DateTime;     str1 := 'AND DateGaran>=' + quotedstr(DateToStr(d1)) + ' AND DateGaran<=' + quotedstr(DateToStr(d2));   end   else str1 := '';   if CheckBox15.Checked then   begin     str2 := 'AND Client_Service=' + quotedstr(IntToStr(ClientID));   end   else str2 := ''; if CheckBox16.Checked then   begin     str3 := 'AND specialist=' + quotedstr(IntToStr(SpecialistID));   end   else str3 := '';   if CheckBox17.Checked then   begin     str4 := 'AND VidObName=' + quotedstr(IntToStr(VidObID));   end   else str4 := '';     DataModule1.ServiceADOTable.Filter := '' + str1 + str2 + str3 + str4;   DataModule1.ServiceADOTable.Filtered := true;

Понятно, что синтаксис неправильный. Подскажите, пожалуйста, как правильно написать?