Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  Re: Funktion optimieren

    Delphi
    by Sidorion, 4. Okt 2007
  Ich habe hier mit garnix angefangen, das war wenn schon, dann WS1976. Ich habe Alzimar im Ganzen Recht gegeben und lediglich auf die Gefahr hingewiesen, dass wenn eine einzelne Anweisung hinter einem Then folgt (also kein Begin..End Block) und man die Anweisung zeilenmäßig getrennt vom Then schreibt, irgendwer hergeht und zwischen das If und eben diese Anweisung eine Anweisung hinschreibt. Das...
• Forum: Object-Pascal / Delphi-Language

  Re: Funktion optimieren

    Delphi
    by Sidorion, 4. Okt 2007
  Richtig, alzimar. Das Einzige, was man vielleicht noch anders schreiben kann/möchte/sollte/haben/sein wäre diese Ecke:
  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.
  
  if Length(s) <> 32 then Result := False
  //...