Forum: Sonstige Fragen zu Delphi
Delphi
by glkgereon,
9. Sep 2004
ja gut, aber es geht mir ja nicht darum die zeit zu nehmen, sondern darum, wie lange now braucht, und dies verkürzt sich mit zunehmender laufzeit ins unrealistische, hier mein aktueller log:
beim letzten mal braucht er nur noch 0,000003715 Ms
danach wird windows im aufrufen dieser funktion jedes mal ein klein wenig besser...
find ich irgendwo unlogisch...
Forum: Sonstige Fragen zu Delphi
Delphi
by glkgereon,
9. Sep 2004
writeln('Es wird nun die Geschwindigkeit von "now" 1 Minute lang getestet...');
zeit:=now;
while (now<zeit+1/24/60) do inc(i);//1=tag /24=stunde /60=minute
writeln('Es wurden '+inttostr(i)+' Versuche geschafft...');
writeln('-> '+floattostr(i / 60)+' pro Sekunde...');
writeln('-> '+floattostr(60000 / i)+' Millisekunden pro Durchlauf...');
also das is mein qt...
bei...
Forum: Sonstige Fragen zu Delphi
Delphi
by glkgereon,
9. Sep 2004
ähm, was spricht gegen so eine messweise?
start:=time;
for i:=1 to 999999 do x:=now;
stop:=time;
oder gegen eine solche konsolenanwendung?
zeit:TDateTime;
i:Int64;