Mit tTable-Komponente _weitersuchen_

[MrSpock]

Hallo Tyler,

wenn du es ähnlich wie ein Textverarbeitungsprogramm machen willst, Filter und SQL ablehnst, gibt es wohl nur die folgende Methode:

Delphi-Quellcode:

function SucheEintrag: Boolean;
begin
  Result := False;
  while not myTable.EOF do
  begin
    if Not myTable.Feld1.AsString = Suchbedingung then
      myTable.Next
    else begin
       Result := True;
       Exit;
    end;
  end;
end;

Da SucheEintrag immer an der aktuellen Position anfängt, findest du ab der Suchposition den nächsten Satz. Nachdem du einen gefunden hast, musst du mit myTable.Next erst den nächsten satz auswählen, damit du nicht denselben Satz wieder findest.