Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  Re: Random ohne doppelte Zahlen

    Delphi
    by KLS, 3. Okt 2008
  hast schon recht, ist aber bei etlichen versuchen nicht passiert.
  Man könnte natürlich nen sicherheitszähler einbauen.
• Forum: Object-Pascal / Delphi-Language

  Re: Random ohne doppelte Zahlen

    Delphi
    by KLS, 3. Okt 2008
  Also ich hab hier nen code, bei dem man in ~17ms (meine alte 3GHz Monocoremöre ;)) ein Array mit 100.000 Zufallszahlen ohne Doppelte erstellen kann.
  
  procedure TForm1.Button1Click(Sender: TObject);
  var
  variablen : array of integer;
  i,zufall : integer;
  start,ende,frequenz,counter : int64;
  begin
  randomize;
  QueryPerformanceFrequency(frequenz);