Prüfen ob Wörter in einem String vorkommen, Reihenfolge egal

[lume96]

Sollte klappen, z.B. so :

Delphi-Quellcode:

   querystr := 'select * from datenbank2'; // querystr ist eine string var die das SQL-Statement enthält

   if SList.Count > 0 then
   querystr := querystr + #10 + #13 + 'where titel like ''%'+SList[0]+'%''';

   i := 1; // i ist eine locale integer variable
   while i <= SList.Count-1 do
   begin
      querystr := querystr + #10 + #13 + 'and titel like ''%'+SList[i]+'%''';
      inc(i);
   end;

   Query1.SQL.Add(querystr);

Tschüss,
Lutz