Das
Delphi-Quellcode:
try
while not EOF do
begin
// memo3.Lines.Add(FieldByName('BEZAHLT').AsString + ' => gefunden!');
Next;
end;
finally
// Close;
end;
kannst Du Dir im Prinzip sparen, da Du jetzt ja nur noch mit "Next;" die gesamte Tabelle "durchläufst" ohne irgendetwas zu machen. Möchtest Du nach dem Öffnen direkt zum Ende der Tabelle springen reicht ein Aufruf von "Last;"
Grüsse
...Doc