Funktion optimieren

[x000x]

Moin moin,
die Zuweisung zu L kann doch weggelassen werden...

Delphi-Quellcode:

//..
  if Length(s) <> 32 then
  begin
    Result := False;
    Exit;
  end;
  for i := 1 to 32 do 
//..