Suche in Datenbank (TTable) mit Joker am Anfang

[joachimd]

Zitat von delphin:

Suche ich aber mit Joker am Anfang der Art '*mann'

Delphi-Quellcode:

//Suche mit Joker am Anfang via
Table1.Filtered:=false;
Table1.Filter:='Name=''*mann''';
Table1.Filter:='';

bleibt die DBGrid-Liste leer.

probiere mal den $-Operator stattdessen: (Text $ Feld)

Delphi-Quellcode:

//Suche mit Joker am Anfang via
Table1.Filtered:=false;
Table1.Filter:='''mann'' $ Name';
Table1.Filter:='';

mit SQL musst Du wahrscheinlich beide Seiten betrachten:

Delphi-Quellcode:

//Suche mit Joker am Anfang via
with Query1 do
begin Close;
      SQL.Text := 'SELECT * FROM BESTAND WHERE (Name like :suche)';
      ParamByName('suche').asString := '%mann%';
      Open;
end;

[delphin]

Hallo mkinzler,

was meinst Du mit:

Zitat von mkinzler:

Was steht in im Parameter suche?

Ich dachte, das "suche"..

Delphi-Quellcode:

//Suche mit Joker am Anfang via
with Query1 do
begin Close;
      SQL.Text := 'SELECT * FROM BESTAND WHERE (Name like :suche)';
      ParamByName('suche').asString := '%mann';
      Open;
end;

..die Übergabevariable für den Suchstring ist?

Um alle Klarheit zu beseitigen:
================================
--> "BESTAND.DB" ist meine Paradoxdatenbank
--> "Name" ist mein Spaltenbezeichner
--> "%mann" ist der Suchbegriff, der aus der Spalte alle Namen mit "*mann" auflisten soll.

Was ist eigentlich mit den Fragezeichen bei der TQuery-Definition ?
Und wie verknüpft man TQuery mit einer TTable1 ? (Falls das ja überhaupt geht)

Gruß Gerd

[delphin]

Hallo joachimd,

Zitat von joachimd:

Zitat von delphin:

Suche ich aber mit Joker am Anfang der Art '*mann'

Delphi-Quellcode:

//Suche mit Joker am Anfang via
Table1.Filtered:=false;
Table1.Filter:='Name=''*mann''';
Table1.Filter:='';

bleibt die DBGrid-Liste leer.

probiere mal den $-Operator stattdessen: (Text $ Feld)

Delphi-Quellcode:

//Suche mit Joker am Anfang via
Table1.Filtered:=false;
Table1.Filter:='''mann'' $ Name';
Table1.Filter:='';

Ist jetzt der Spaltenname und der Suchbegriff nicht vertauscht?

Meine Tabellenspalte heißt ja name und gesucht werden alle Namen mit '*mann*' an irgeneiner Stelle.
So bekomme ich jedenfalls einen Laufzeitfehler:

Und mit der Sucher der Art:

Delphi-Quellcode:

Filtered:=false;
Table1.Filter:='Name=''$mann''';
Filtered:=true;

bleibt mein DBGrid auch leer.

Zitat:

mit SQL musst Du wahrscheinlich beide Seiten betrachten:

Delphi-Quellcode:

//Suche mit Joker am Anfang via
with Query1 do
begin Close;
      SQL.Text := 'SELECT * FROM BESTAND WHERE (Name like :suche)';
      ParamByName('suche').asString := '%mann%';
      Open;
end;

Bei der Suche mit TQuery tritt genau wie mit der Suche '*mann' keinerlei Filterwirkung auf dem DBGrid ein. Ich bekomme alle Einträge der Liste angezeigt.

Ich denke, der Fehler steckt irgendwo in meiner Verknüpfung von TQuery mit TTable bzw. DBGrid.

Trotzdem vielen Dank
Gruß Gerd

[joachimd]

Zitat von delphin:

Ist jetzt der Spaltenname und der Suchbegriff nicht vertauscht?

nein. $ ist kein Joker, sondern ein Operator.

[ConnorMcLeod]

Es gibt hier viel zu sagen, was (zumindest auf den ersten Blick) hier falsch verstanden wird, aber die Antwort zu einer schnellen Lösung ist: das TTable-Objekt hat ein Event OnFilterRecord , in dem Du bestimmen kannst, ob ein Datensatz angezeigt werden soll. Da kannst Du mit ganz normalem Delphi-Code herausfinden, ob der DS Deinen Kriterien entspricht. Ist vllt nicht super performant, aber ich schätze, hier genügt es.