Forum: Object-Pascal / Delphi-Language
Delphi
by DerDan,
11. Apr 2006
Zeit1( 96,32 ms)/Zeit2 94,11% = -5,89% (SirThornberry)
Zeit2( 102,35 ms)/Zeit2 100,00% (sakura)
Zeit3( 90,74 ms)/Zeit2 88,66% = -11,34% (jbg)
Zeit4( 72,29 ms)/Zeit2 70,64% = -29,36% (DerDan)
Zeit5( 78,48 ms)/Zeit2 76,68% = -23,32% (Elvis)
Testergebins mit einem Pascal Quelltext,
wie man sieht alles stark von den Eingangsdaten abhängig
Forum: Object-Pascal / Delphi-Language
Delphi
by DerDan,
11. Apr 2006
Zeit1( 36,34 ms)/Zeit2 81,83% = -18,17% (SirThornberry)
Zeit2( 44,41 ms)/Zeit2 100,00% (sakura)
Zeit3( 34,89 ms)/Zeit2 78,57% = -21,43% (jbg)
Zeit4( 29,93 ms)/Zeit2 67,41% = -32,59% (DerDan)
Zeit5( 34,20 ms)/Zeit2 77,01% = -22,99% (Elvis)
Ich habs mit der Testsuite von sakure aus einem der 1. Beiträge getestet (#7)
Tatsächlich sollte man mal...
Forum: Object-Pascal / Delphi-Language
Delphi
by DerDan,
11. Apr 2006
Auch auf einem Intel, hab dort zwischen 1 bis 5 % bessere Geschwindigkeit
Respekt
DerDan
Forum: Object-Pascal / Delphi-Language
Delphi
by DerDan,
11. Apr 2006
Ich hab mal die Tips berücksichtigt und meine Funktion ein wenig zusammengefasst:
ich find ihn noch lesbarer wie meinen Alten.
Tatsächlich gibts wohl Abweichungen im Bereich der 20% alleine durch unterschiedliche CPU, HW und was weis ich.
Schade das niemand eine Assembler Lösung anbietet.
mfg
Forum: Object-Pascal / Delphi-Language
Delphi
by DerDan,
10. Apr 2006
Hab getested:
Zeit1( 5643,38 ms)/Zeit2 13886,51% (
Zeit2( 40,64 ms)/Zeit2 100,00% (sakura)
Zeit3( 33,04 ms)/Zeit2 81,31% (DerDan)
Zeit4( 34,33 ms)/Zeit2 84,47% (jbg)
Eigendlich gehts nicht um ein paar ms sonden um % und wie du siehst rentiert sich das!
Überleg mal die Daten w#ren größer und die angaben nicht ms sondern sec
Forum: Object-Pascal / Delphi-Language
Delphi
by DerDan,
10. Apr 2006
Ich hab mich auch mal versucht:
meine Version ist 15 bis 25% schneller als die letzte von sakura!
function RemoveDblSpaces3(InStr: string): string;
var
Src, Dst: PChar;
begin
InStr := InStr + #0;