Moin...
Delphi-Quellcode:
while (not FQuery_Einstellungen.Eof) and (FQuery_Einstellungen.FieldByName('Einstellung').AsString<>Einstellung) do begin
// <> heißt, wenn die Einstellung nicht gefunden wird, gehe zum nächsten Datensatz...es fehlt die Abbruch Bedingung. :-)
FQuery_Einstellungen.Next; // das hast du auch programmiert :-)
end; // Am Ende steht der Datensatz auf dem Letzten
Ich könnte dir das umschreiben...aber du sollst es allein finden.
