Datenzugriff in While not … eof Schleifen unter Delphi beschleunigen

Viele Anwender gehen sicherlich wie folgt vor, wenn man einen Code hat, der durch einzelne Datensätze einer Tabelle oder Query läuft:

while not table.eof do
begin
:= table.fieldbyname(‘ErstesFeld’).AsString;
:= table.fieldbyname(‘ZweitesFeld’).AsString;
table.next;
end;

Wesentlich effizienter im Hinblick auf eine schnellere Ausführung ist dabei aber folgendes Vorgehen:

Var
feld1, feld2 : TField;

begin
feld1 := table.fieldbyname(‘ErstesFeld’);
feld2 := table.fieldbyname(‘ErstesFeld2’);
while not table.eof do
begin
:= feld1.AsString;
:= feld2.AsString;
table.next;
end;

Nachteil ist natürlich: mehr Code, Vorteil ist aber eine schnellere Ausführungsgeschwindigkeit, wobei dies natürlich nur zum Tragen kommt, wenn man sehr viele Daten verarbeiten muss. Bei nur 2-3 Spalten und 10 Datensätzen lohnt es natürlich.

Diese Vorgehensweise führt dazu, dass Fieldbyname nur einmal ausgeführt werden muss und Delphi nicht jedes mal das Feld finden muss, was bei vielen Daten dann eben zeitsparend ist.

Kleiner Tipp: tippt man eof und dann die [Space] Taste so fügt Delphi den Codeblock

while not table.eof do
begin
table.next;
end;

automatisch ein. Gleichzeitig wird der Sync-Bearbeitungsmodus gestartet mit Focus auf das Wort „table“, die erlaubt dann das Ändern dieses Begriffs zum wirklichen Tabellennamen, was natürlich an allen Stellen dann synchron geändert wird.

Aktuelle Top Aktionen bei Acer, HP, Lenovo, Bitdefender & Co

Notebook & PC Angebote:
» HP Extra Aktion: 100 Euro Extra sparen bei HP Notebooks ab 999 Euro. Gutscheincode und alle Infos hier im HP Store
» Top bei Otto: Sehr gute HP Notebook Angebote mit Extras wie 4 Jahre Garantie und mehr
» Aktion im Lenovo Store: Bis zu 15% auf ausgewählte und recht gute Artikel (IdeaPad und Yoga Notebooks, Tablet PCs, Gaming Notebooks und PCs)
» Große Rabattaktion bei Acer: bis 21.05.2018 gibt es 15% Rabatt auf ultraschlanke Notebooks der Acer Swift Serie
» Notebooksbilliger.de WM Special:Jede Woche 11 neue Top Angebote>
» Mehr Aktionen in der Übersicht: Aktuelle HP Angebote und mehr auf einem Blick

Aktuelle Bitdefender Aktionen:
» Neue Aktion: Bitdefender 39 Euro Flat mit 5 Geräten
» Bitdefender +1 Jahr dazu-Aktion
» Die neue Bitdefender 40% und mehr Rabatt Aktion
» Top für neue PCs! Bitdefender Internet Security 2018 PC Lebenslang Edition: 5 Jahre Schutz für nur für nur 89,95

Weitere aktuelle Bitdefender Angebote » Alle Bitdefender Angebote auf einem Blick

www.unitymedia.de

Verwandte Themen:


Sorry! Unser Kommentarfunktion ist vorübergehend geschlossen.