Einzelnen Beitrag anzeigen

Benutzerbild von Union
Union

Registriert seit: 18. Mär 2004
Ort: Luxembourg
3.492 Beiträge
 
Delphi 7 Enterprise
 
#7

Re: in Datenbank nach nicht exakten Suchbegriffen suchen

  Alt 13. Mär 2008, 10:09
Dann wirst Du entweder um SQL nicht herumkommen oder Du mußt Dein gesamtes DataSet sequentiell durchsuchen, den loPartialKey sucht nur einen Teil am Anfang einer Zeichenkette, nicht in der Mitte oder am Ende:
Delphi-Quellcode:
Function FindeTeilDesKundenNamen(ATeil : string) : boolean;
begin
  ATeil := AnsiUpperCase(ATeil);
  result := False;
  tKunden.First;
  while not tKunden.Eof do
  begin
    if Pos(ATeil, AnsiUpperCase(tKunden.FieldByName('Name').AsString)) > 0 then
    begin
      result := True;
      Break;
    end;
    TKunden.Next;
  end;
end;
Ibi fas ubi proxima merces
sudo /Developer/Library/uninstall-devtools --mode=all
  Mit Zitat antworten Zitat