Ergebnis der Suchanfrage

• Forum: Sonstige Fragen zu Delphi

  Re: Zufallszahlen von 1-26 generieren

    Delphi
    by Satty67, 29. Jul 2009
  Eine StringList ist zwar als Container nicht optimal... etwas oversized, aber wenn man schon munter am Code posten ist
  procedure ShakeStringList(aStringList : TStringList);
  var
  i, Count : Integer;
  begin
  Count := aStringList.Count;
  for i := 0 to Count -1 do
  aStringList.Move(Random(Count), Random(Count));
  end;