Richtig, alzimar. Das Einzige, was man
vielleicht noch anders schreiben kann/möchte/sollte/haben/sein wäre diese Ecke:
Delphi-Quellcode:
if Length(s) <> 32 then
Result := False
Ich würde entweder die Anweisung hinten ans Then anhängen, oder das Then vor die Anweisung runterziehen, damit in 5 Jahren keiner auf die Idee kommt, da noch was hinzufrickeln.
Delphi-Quellcode:
if Length(s) <> 32 then Result := False
// oder
if Length(s) <> 32
then Result := False
@ws1976: nich böse sein, aber bei Deiner Schreibweise würde ich
nie wissen, ob jetzt genügend ends da sind und wenn ja, ob sie an der richtigen Stelle sitzen.
Manchmal sehen Dinge, die wie Dinge aussehen wollen mehr wie Dinge aus, als Dinge
<Esmerelda Wetterwachs>