Registriert seit: 7. Mai 2004
6 Beiträge
Delphi 7 Enterprise
|
Re: Suchen/Weitersuchen in ClientDataSet
16. Mai 2004, 20: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
|