Forum: Object-Pascal / Delphi-Language
Delphi
by Hador,
29. Sep 2006
Ne da kann ich ganz beruhigt sein. Bei mir schlägt 'n AMD Athlon XP 2500+ drin. Also schon etwas betagter
Aber danke schonmal für deine Referenz :lol:
Forum: Object-Pascal / Delphi-Language
Delphi
by Hador,
29. Sep 2006
Hab ich gerade. Der Speicherverbrauch bleibt gleich, dafür wird jedoch das Programm langsamer.
Du könntest doch einfach mal mit GetTickCount die Zeit messen. Es ist zwar nicht ganz genau - Ich mene das habe ich mal in einem deiner Beiträge gelesen ^^ - aber immerhin müsstest du einen ungefähren Wrt bekommen. So könntest du kontrollieren, ob dieser Wert grob von dem durch RDTSC ermittelten...
Forum: Object-Pascal / Delphi-Language
Delphi
by Hador,
29. Sep 2006
Jo mach ich. Ich habe Amateurprofi ja schon angedroht, dass ich ihn ggf. ausfragen werde ^^
Forum: Object-Pascal / Delphi-Language
Delphi
by Hador,
29. Sep 2006
http://de.wikipedia.org/wiki/Bruteforce
Du nutzt zudem noch sehr viele sehr langsame funktionen (bspw. StrToInt oder auch sqrt)
Ferner solltest du dir echt angewöhnen, deinen Quelltext zu strukturieren. Ihn zu lesen ist grausam :wink:
EDIT: Arr der rote Kasten ist mal wieder im Urlaub
Forum: Object-Pascal / Delphi-Language
Delphi
by Hador,
29. Sep 2006
Also von 0 - 1.000.000 brauche ich ca. 65 Millisekunden.
EDIT: Bild angehängt.
EDIT2: Wie ermittelst du die denn? BruteForce?
Forum: Object-Pascal / Delphi-Language
Delphi
by Hador,
29. Sep 2006
Erstmal vielen Dank. Ich werde mal versucher durch deinen Quelltext durchzublicken bzw. ihn zu verstehen.
Irgendwo hab ich hier auch noch 'n Assembler-Tutorial rumfliegen :)
Jo daran hatte ich auch schon gedacht. Aber als ich bei mir im Quelltext Inc(j) durch Inc(j, 2) ersetzt hatte, wurde das Programm wesentlich langsamer. Aber mal gucken wies bei dir aussieht. :thumb:
Falls ich...