DataSet Filtern

[WizoHulk]

Hi Leute,
wie kann ich ein DbGrid Filtern, das er mir nur noch das anzeigt was ich in ein Editfeld schreibe.
ich hab eine Datenbank worüber ich die Anweisung gebe

Delphi-Quellcode:

TForm1.Button1Click(Sender: TObject);
var
  LSql : String;
begin
  LSql := 'SELECT id, Beschreibung FROM technik WHERE beschreibung LIKE';
  LSql := LSql + #39 +'%' + Edit1.Text + '%' + #39;
  ibdTechnik.SelectSQL.Text := LSql;
  ibdTechnik.Open;

habe ich da jetzt noch was Vergessen?
ich habe das DBGrid mit dem DataSource verknüpft und den DataSource mit dem DataSet so wie DataBase und Transaction.
ich Hatte es auch mit dem...

Delphi-Quellcode:

ibdTechnik.Filtered := true;
  ibdTechnik.Active := true;
  ibdTechnik.Locate('Beschreibung','test',[loPartialKey,loCaseInsensitive]);
  ibdTechnik.Filtered := true;

...versucht.
aber da schleuderte der Compiler mir Error meldungen um die Ohren, das bei leere Datenmenge nicht abgefragt werden kann.

Ich hoffe ich hab nicht umsonst ein neuen Thread geöffnet.

schon mal Danke für eure Hilfe.

[Sir Rufo]

Wieso Filtered auf true und dann auf true?

[WizoHulk]

jaaaaaa, hab ich wohl über sehen, eigendtlich soll da false hin.

[Bummi]

kann es sein daß Du #34 statt #39 nehmen mußt?

[Sir Rufo]

Schau mal ob es bei der Query Komponente einen OnFilter Event gibt

Dort kannst du dann entscheiden, was und wie gefiltert werden soll

Wenn die Abfragemenge sehr groß ist, dann kann man es auch so programmieren, dass erst ab 3 Zeichen im Edit die Abfrage ausgeführt wird und danach arbeitet man mit dem Filter weiter.

Dadurch reduziert sich die übertragene Datenmenge und auch die Anzahl der Abfragen

[DeddyH]

Und verwende SQL-Parameter, dann muss man sich auch um den Zeichencode (#34, #39 oder wie?) keine Gedanken mehr machen.

[Sir Rufo]

Code:

Select id, bezeichnung from MeineTab where Bezeichnung like :BezLike

Delphi-Quellcode:

Qry.ParamByName[ 'BezLike' ] := '%' + Edit1.Text + '%';

Für das OnFilter Event brauchst du noch eine Like Funktion http://www.latiumsoftware.com/en/delphi/00018.php

Ersetze in der Funktion * mit % und ? mit _ dann wird es SQL Like

[nachti1505]

Außerdem fehlt in deinem InitalSQL glaube ich ein Leerzeichen hinter dem "LIKE"!

[WizoHulk]

Vielen vielen dank für die schnellen Antworten.

gibt es da noch andere Möglichkeiten, bin in sql und db noch nicht so bewandert.
Ich dachte wenn schon der sql code in IbExpert geht dann wird er ja in Delphi auch gehen.
denn dort spuckt er mir ja haarklein in halbtextsuche alles aus.

[nachti1505]

Was hast du denn bis jetzt probiert?

[shmia]

Zitat:

Zitat von WizoHulk (Beitrag 1055089)

Ich dachte wenn schon der sql code in IbExpert geht dann wird er ja in Delphi auch gehen.

Das funktioniert aber nur, wenn du die SQL-Anweisung richtig kopierst.
Wenn du nur den kleinsten Fehler machst (siehe Beitrag #8), dann kann das nicht klappen.

[WizoHulk]

ich hab als erstes den DBGrid inhalt gelöscht.
dann habe ich wie du meintest, das hinter like noch ein Leerzeichen gesetzt.
Hat aber auch nichts geholfen.

Hab ein dataset genommen, ist das nicht genau das gleiche wie eine Querry?
Da in vielen beiträgen Querrys genommen werden.
Kann ich auch befehle an die Db schicken ohne einen String aus SQL anweisungen?

muss hinter...

Delphi-Quellcode:

....;
....;
dataSet1.SelectSQL.Text := LSql;
dataSet1.Open;

...noch was erfolgen?

Habe auch das...

Delphi-Quellcode:

DataSet1.FilterOption := foCaseInsensitive,foNoPartialCompare];

... gesetzt.

mit der function OnfilterEvent komm ich net klar.
Im Dataset gibt es nur onFilterRecord, hat das die gleiche Funktion?

[mkinzler]

Um was für ein DataSet handelt es sich?

[nachti1505]

Ich habe irgendwie das Gefühl, das du ganz doll doppelt filterst... es existieren zwei Möglichkeiten der Filterung für dein Problem.

a) Über die DB -> SQLText verändern -> DataSet neu anfordern -> es werden gefilterte Daten übertragen
b) Über das Dataset -> DS öffnen -> es werden alle Daten übertragen -> du setzt lokal einen Filter und nicht passende Entries werden nur ausgeblendet

Imho verwendest du momentan eine Mischung aus beiden.

Persönlich denke ich übrigens, ist bis auf Ausnahmen, grundsätzlich Variante a zu bevorzugen!

[WizoHulk]

Es ist ein TIBDataSet

[Sir Rufo]

Es ist das OnFilterRecord was ich meinte

Die Kombination macht Sinn wenn in einer sehr großen Datenmenge gefiltert werden soll

Aber immer Step by Step
Erst mal die Abfrage richtig zum Laufen bringen und erst dann mit dem Filter des DataSet weiterarbeiten

[WizoHulk]

ich hab jetzt nur mal zum Test mir alles datensätze ausgeben Lassen die in ID und Beschreibung vorhanden sind.
Das macht er aber auch net, ich da liegt irgendwo andwers das Problem.

Delphi-Quellcode:

  LSql := 'SELECT id, beschreibung FROM technik';
  ibdTechnik.SelectSQL.Text := LSql;
  ibdTechnik.Open;

[mkinzler]

Zeigt er was Falsches oder Garnichts an?

[WizoHulk]

er zeigt gar nichts an, Ein feld mit nichts drin.

[mkinzler]

Ist das DataSet richtig verknüpft?

[WizoHulk]

ich habs war mal wieder DAU!
Habe vergessen mein datasource mit meinem dataset noch mal zur laufzeit zu verknüpfen

Delphi-Quellcode:

 LSql := 'SELECT id, beschreibung FROM technik WHERE beschreibung LIKE';
  LSql := LSql + #39 +'%' + eSuch.Text + '%' + #39;
  ibdTechnik.SelectSQL.Text := LSql;
  ibdTechnik.Open;
  dsTechnik.DataSet := ibdTechnik;  // muss neu hinzugefügt werden

danke für eure Hilfe

[DeddyH]

Trotzdem solltest Du SQL-Parameter verwenden ;)

[WizoHulk]

aha. jaaa wäre wohl besser mit dem. werd mich ma umschaun