ich bezweifele gerade die technik mit der die geschwindigkeit gemessen wird. die weicht teilweise extrem von einem "gezählten" wert ab. ändere doch bitte mal die messtechnik auf folgendes:
Delphi-Quellcode:
var
test,test2, freq : int64;
//....
edDN.Color := clRed;
edRN.Color := clRed;
Form1.Refresh;
// t := RDTSC;
QueryPerformanceCounter(test);
for i := 1 to 5000000 do n := power(1 + sin(pi2), 3) * 2;
QueryPerformanceCounter(test2);
QueryPerformanceFrequency(freq);
edDN.Text := FloatToStr( (test2-test) / freq{ / 1000 });
// edDN.Text := FloatToStrF(Ticks(RDTSC-t), ffGeneral, 6, 8);
edRN.Text := FloatToStr(n);
edDN.Color := clWindow;
edRN.Color := clWindow;
Form1.Refresh;
//...
und natürlich die anderen dann auch in die art.
dabei kommen dann vergleichbare werte heraus. ich bezweifele stark dass deine methode stimmt. hier meine werte mit dem oben geposteten P4:
0,679946169178772sec
1,4871572293293sec
4,74221246175178sec
8,74114200770631sec
Gruß
Reli