[jhonny]

Empezado por roman

A mi me asombran sus números. No sé cómo los obtuvo. Para 1000 números yo obtengo:

Uso esto:

.
.
.

Yo uso este record: http://docwiki.embarcadero.com/Libra...ics.TStopwatch

Así:

Código Delphi [-]
var
  sw: TStopWatch;
begin
    sw := TStopWatch.Create;
    sw.Start;
      //Proceso a medir
    sw.Stop;
    
    Label1.Caption := sw.ElapsedMilliseconds.ToString; //Lugar donde muestro el resultado de la medición...
end;