Einzelnen Beitrag anzeigen

H.Bothur

Registriert seit: 25. Jun 2012
Ort: Seevetal & Lagos
252 Beiträge
 
Delphi 11 Alexandria
 
#1

ClientDataSet mit zwei Filtern

  Alt 19. Jun 2017, 17:06
Datenbank: keine • Version: keine • Zugriff über: Delphi
Moin,

ich habe eine ClientDataSet das ich mit folgendem Source filtere und anzeigen lasse:

Delphi-Quellcode:
function TKund.KundenSuchen(const KundenNummer: String; var KundenRec: TKundenRec): Boolean;
(* Anzeige des DBGrid aus Rückgabe des gewählten Datensatzes *)
begin
  DatenUebernahme := false;
  ClientDataSet_Kunden.Filtered := True;
  ClientDataSet_Kunden.Filter := CTitelKundenNr +'=' +KundenNummer;
  Kund.ShowModal;
  if DatenUebernahme then
  begin
    KundenRec.Firma1 := ClientDataSet_Kunden.FieldByName(CTitelFirma1).AsString;
    KundenRec.Firma2 := ClientDataSet_Kunden.FieldByName(CTitelFirma2).AsString;
  end;
  if DatenUebernahme then Result := true else Result := false;
end;
Das funktioniert auch wunderbar. Jetzt möchte ich aber nach einem zweiten Feld zusätzlichen Filtern .. also

  ClientDataSet_Kunden.Filter := CTitelKundenNr +'=' +KundenNummer +' AND ' +CTitelFirma1 +'=' +FilterString;
Wenn ich z. B. den FilterString auf den Text "RIO" setze dann bekomme ich eine Exception mit der Meldung "Das Feld 'Rio' wurde nicht gefunden." Also mache ich das irgendwie falsch - aber wie mache ich es richtig ??

Gruß
Hans
Hans-Georg Bothur
www.hermann-juergensen.de
  Mit Zitat antworten Zitat