Fehler bei Suche!

[thomasvonmuenster1]

Nach ein paar Abfragen zeigt er ein falsches Ergebnis an!
Dann gibt er kein Treffer wo einer sein müste.
Könntet ihr mir helfen den fehler zu finden?

Delphi-Quellcode:

begin
timer3.Enabled:=false;
IBQuery5.SQL.Text:='select suchbegriffe from tabelle1 where UPPER(suchbegriffe) like ''%'+UpperCase(ComboBox1.Text)+'%''order by suchbegriffe';
IBQuery5.Open;
ComboBox1.items.clear;
while IBQuery5.Eof=false
do begin
  ComboBox1.Items.Add(IBQuery5.FieldByName('suchbegriffe').AsString);
  IBQuery5.Next;
end;
label2.caption:= 'Treffer '+IntToStr(IBQuery5.recordcount);
end;