Ein Suchbegriff in mehreren Feldern finden

[Memo]

Also machen wir noch einen Versuch:

Delphi-Quellcode:

var x,y : Integer;
begin
  if Table.Locate('feld1', 'Suchstring', [loPartialKey]) then 
     x := Table.RecNo;
  if Table.Locate('feld2', 'Suchstring', [loPartialKey]))then
     y := Table.Recno;
  if (x=0) and (y = 0) then ShowMessage('nix gefunden') else
  begin
    if (y < x) and (y<>0) then
      Table.RecNo := y else
    if (x < y) and (x <> 0) then
      Table.RecNo := x;
  end;