Wenns nicht allzu genau sein muss, hier eine sehr simple Lösung:
Globale Variable Oldtime:tdatetime
In Onidle:
Delphi-Quellcode:
if now >= Oldtime+1/(24*60*60) then // 1 Sekunde
begin
Oldtime:=now;
dosomthing;
end;
Oldtime noch irgendwo initialisieren bei Programmstart