Понятно, но если вы так сделаете, то и в мемо будут выводиться тоже по всем словам данные, т.к. в обоих случаях используется один источник AdoQuery1.
Как я понял искрмыми словами является массив Dest? значит надо в условие отбора включить все значения из этого массива, т.е. вместо:
Код:
ADOQuery1.SQL.Add(Format('WHERE Name LIKE %s',[QuotedStr(Dest[i]+'%')]));
вставьте
Код:
for i := 0 to Dest.Count-1
do begin
if i = 0
then ADOQuery1.SQL.Add(Format('WHERE Name LIKE %s',[QuotedStr(Dest[i]+'%')]))
else ADOQuery1.SQL.Add(Format(' or Name LIKE %s',[QuotedStr(Dest[i]+'%')]))
end;
если ничего не наврал, то должно сформироваться условие отбора включающее все комбинации ваших слов.