Zitat von
orion3000:
aber wie setze ich das in Delphi mit Tdate oder Ähnliches um?
Now() = Jetzt
Now() + 1 = morgen um die gleiche Zeit.
Mit GetTickCount bekommst du die aktuelle Zeit in Millisekunden(?).
Mit einem Zweiten GetTickCout kannst du die Differenz zwischen dem 2. GetTickCount und dem 1. GetTickCount ermitteln in Millisekunden.
Und wieviele Tage 1 Millisekunde sind, kriegst du sicherlich auch noch raus.
1 Tag * 24 Stunden * 60 Minuten * 60 Sekunden * 1000 Millisekunden = 86.400.000 Millisekunden.
Wenn du für 1 MB schreiben, 5 Sekunden benötigst:
5 Sekunden / 60 Minuten / 24 Stunden = 0,00347222 Tage
Also: Now() + 0,00347222 = Jetzt + 5 Sekunden.
Ich hoffe, ich hab richtig gerechnet.
