Kleiner Optimierungstest

[Stefan Hueg]

Ich habe mir mal ein paar Gedanken über die Optimierung des Sourcecodes gemacht und dabei einige Tests angestellt. Hier die Resultate:

Test1:

Delphi-Quellcode:

if String = '' then
...

gegen

Delphi-Quellcode:

if Length(String) > 0 then
...

Resultat: Ersteres rund 1/3 schneller


Test2:

Delphi-Quellcode:

if Control.Checked = True then
...

gegen

Delphi-Quellcode:

if Control.Checked then
...

Resultat: Letzeres rund 1.3% schneller


Test3:
IntegerValue := Ord(True); gegen
IntegerValue := 1; Resultat: Ersteres rund 7.3% schneller


Test4:
BoolValue := Boolean(1); gegen
BoolValue := True; Resultat: Ersteres rund 5.79% schneller


Test5:
BoolValue := Not False; gegen
BoolValue := True; Resultat: Ersteres rund 7% schneller


Test6:
B := Not B; gegen

Delphi-Quellcode:

if B = True then
  B := False
else
  B := True;

Resultat: Ersteres rund 14.1% schneller


Nun, das finde ich ziemlich beeindruckend, testet es mal selbst. Solch ein Ergebnis hätte ich nicht gedacht. Vielleicht sind meine Messungen auch falsch. Ansonsten: Kennt ihr noch irgendwelche Optimierungsmethoden?

EDIT: Getestet habe ich indem ich die zu testende Operation 5 sek. durchgeführ, das ganze 5 Mal wiederholt und dann den Durchschnitt gebildet habe.

Gruß,

Stefan