Números impares desde 1 hasta 1000

[jhonny]

Empezado por roman

Tus resultados son en milisegundos y los míos en microsegundos. En realidad, lo hice en microsegundos porque ecfisa así lo hizo, o al menos es lo que indica la unidad µs que puso. Quizá sean milisegunods pero aún así, es demasiado tiempo para el beginupdate/endupdate. Aunque, ciertamente, es más lento este último método.

LineComment Saludos

Ciertamente, así es. El error mío no ha sido el tema de la conversión entre milisegundos y microsegundos, pues soy consciente que los resultados de ecfisa y los tuyos son en microsegundos... el error mío ha sido que he comparado los ejercicios incorrectos... debo comparar es el de String vs Begin/Update. Que ciertamente concatenar el String ha resultado mucho más rápido.

De todas maneras (Por si sirve de algo), para hacer el calculo con dicho record con todo el valor, se puede hacer así:

Código Delphi [-]
var
  sw: TStopWatch;
begin
    sw := TStopWatch.Create;
    sw.Start;
      //Proceso a medir
    sw.Stop;
    
    Label1.Caption := sw.Elapsed.ToString; //Que para el BeginUpdate/EndUpdate me devuelve 00:00:00.2985187 y concatenando 00:00:00.0021155
end;