Einzelnen Beitrag anzeigen

AlexII

Registriert seit: 28. Apr 2008
1.717 Beiträge
 
FreePascal / Lazarus
 
#31

AW: Eingabe mischen

  Alt 17. Feb 2014, 16:42
Wenn kein var dann sollten die Parameter nicht beschrieben werden. Und bei einem string -Parameter dann ein const verwenden (Performance).
Delphi-Quellcode:
function Shuffle(const AStr : String ): String;
var
  i, j: integer;
  temp : Char;
begin
  Result := AStr;
  for i := length(Result) downto 1 do
  begin
    j := Random(i)+1;
    temp := Result[i];
    Result[i] := Result[j];
    Result[j] := temp;
  end;
end;
Wieso darf man sie nicht beschreiben?
Bin Hobbyprogrammierer! Meine Fragen beziehen sich meistens auf Lazarus!
  Mit Zitat antworten Zitat