ClientDataSet mit zwei Filtern

[H.Bothur]

Sorry - eine Sache verstehe ich leider immer noch nicht:

Filter auf nur ein Feld - klappt !

Delphi-Quellcode:

  CTitelKundenNr := 'Nummer';
  CTitelFirma1 := 'Firma1';
  ClientDataSet_Kunden.FilterOptions := [foCaseInsensitive];
  ClientDataSet_Kunden.Filtered := True;
  ClientDataSet_Kunden.Filter := CTitelKundenNr +'=' +QuotedStr(KundenNummer);

Suche nach zwei Feldern, zweites Feld mit Anfangsbuchstaben und dann Asterix - klappt !

Delphi-Quellcode:

  FilterString := 'M';
  CTitelKundenNr := 'Nummer';
  CTitelFirma1 := 'Firma1';
  ClientDataSet_Kunden.FilterOptions := [foCaseInsensitive];
  ClientDataSet_Kunden.Filtered := True;
  ClientDataSet_Kunden.Filter := CTitelKundenNr +'=' +QuotedStr(KundenNummer) +' AND ' +CTitelFirma1 +'=' +QuotedStr(FilterString +'*');

Suche nach zwei Feldern, zweites Feld OHNE Anfangsbuchstaben und dann Asterix - klappt nicht sondern es gibt kein Ergebnis !

Delphi-Quellcode:

  FilterString := ''; { <- hier ist der Unterschied }
  CTitelKundenNr := 'Nummer';
  CTitelFirma1 := 'Firma1';
  ClientDataSet_Kunden.FilterOptions := [foCaseInsensitive];
  ClientDataSet_Kunden.Filtered := True;
  ClientDataSet_Kunden.Filter := CTitelKundenNr +'=' +QuotedStr(KundenNummer) +' AND ' +CTitelFirma1 +'=' +QuotedStr(FilterString +'*');

Meine Idee war das ich den Suchstring zeichen für Zeichen aufbaue und dann eben partiell danach suche. Nur - wenn ich noch keine Suchstring habe müsste der Filter +CTitelFirma1 +'= *') doch eigentlich alle Datensätze anzeigen, oder ?

Gruß
Hans