Also, ich möchte ca. 30sec. nach einem Start etwas ausführen.
Code:
start:=now;
...
if round((now-start)*10000) > 3 then
Witzigerweise stimmt gedanklich alles; wenn die Routine läuft, geht es nie, obwohl die Bedingungen true sind.
Zur Überlegung:
now:TDateTime // ist Double
1.0 = 1 Tag
1/86400 = 1 Sec. = 0.000011574
mal 30 (also 30sec.) = 0.000347222
mal 10000 (um es gut runden zu können) = 3.47222...
round(dasda) = 3 oder 4, also in jedem Fall und zeitlich später sowieso: >3
Aber es geht nicht!!!
Wieso?