Also, verwende beim Vergleich mit Now nach Möglichkeit nicht =, da die Genauigkeit des DateTime-Wertes jene eines Timers überschreitet. Verwende stattdessen >=:
Delphi-Quellcode:
if (StrToDateTime(edtDate.Text+' '+edtTime.Text)-(1/8640) >= Now) then
begin
//Dein Code
end;
Sobald der Zeitpunkt überschritten ist, wird der Code durchgeführt. Du hast außerdem den falschen Wert addiert, du willst ja die 10 Sekunden abzählen...
Achja, ein kleiner Tipp: Sieh dir Mal DateTimePicker an (Paletter
Win32).
Greetz
alcaeus