Einzelnen Beitrag anzeigen

Rippo

Registriert seit: 10. Feb 2015
75 Beiträge
 
Delphi 10 Seattle Professional
 
#1

Fehler beim Suchen

  Alt 17. Sep 2015, 09:08
Datenbank: Firebird • Version: 2.5 • Zugriff über: TSQL
Hallo

Ich habe mit folgendem Code eine Suche erstellt

Delphi-Quellcode:
                        //Funktion um zu Suchen
Function TfrmKundenstamm.Suchen(aSuchbegriff: string) : Boolean;
var aktSuchtext : string;
Begin
  aktSuchtext :='%'+Ansiuppercase(aSuchbegriff)+'%';

  DMMain.SDS_K.Close;
  DMMain.SDS_K.DataSet.CommandText := //Welche Felder sollen durchsucht werden
      ' Select * from KStamm where Upper(ks_Schlüsselnummer) or Upper(ks_name) or Upper(ks_email) or Upper(ks_ort) like ' + QuotedStr(aktSuchtext);

  DMMain.SDS_K.Open;
  //if (Not DMMain.SDS_K.IsEmpty) then
end;

Jetzt wenn ich suche, bekomme ich die 'Fehlermeldung' --> Token unknown - line1, column 57 or.


Was habe ich falsch gemacht?
  Mit Zitat antworten Zitat