Einzelnen Beitrag anzeigen

delphimann

Registriert seit: 7. Mai 2004
6 Beiträge
 
Delphi 7 Enterprise
 
#2

Re: Suchen/Weitersuchen in ClientDataSet

  Alt 16. Mai 2004, 19:08
So einfach geht das leider nicht. Mit 'locate' bekommst du immer nur die erste übereinstimmung. Ich würde an deiner Stelle ein Autowert-Feld hinzufügen und anschließend einen Filter verwenden. Oder ganz umständlich:

For I:=x {Startposition} to Clientdataset.recordcount do
begin
Clientdataset.recno:=I;
For J:=0 to Clientdataset.fieldcount-1 do
if Pos(S {Suchbegriff},Clientdataset.fields[J].text)>0
then //Datensatz gefunden (ggf. break zum verlassen der schleife)
end;

Gr. Delphimann
  Mit Zitat antworten Zitat