Ich werd dann morgen sehen ob funktioniert hat
Das kann nicht funktionieren.
Man braucht nur den Code etwas umstellen und sieht den Widerspruch:
Delphi-Quellcode:
for i:=1 to 10 do begin
aktuell := now + 60/24/3600;
if aktuell = now { <= Ausdruck ist immer False} then ...