Jeg vil gerne lave et program som skal gøre noget når computerens ur bliver 12 om natten f.eks. eller også så den tæller f.eks. 7 timer ned og så gør et eller andet. Nogen der kan hjælpe?
Mvh.
Rune Jensen
Du kaster en TTimer på en form, og angiver et interval, f.eks. 60000. Så aktiveres denne timer ca. en gang i minuttet. I timerens OnTimer event sammenligner du så klokken med det ønskede tidspunkt, og når de er ens, har du din hændelse.
Eks:
Uses DateUtils;
procedure Timer1OnTime(Sender : TObject)
begin
// Checker for om det er midnat - 00:00
if (HourOf(Now) = 0) and (MinuteOf(Now) = 0) then
begin
// Foretag dig et eller andet.
end;
end;
Der er adskillige funktioner i DateUtils som du kan bruge til f.eks. sammenligning af datoer og tider.
---
Thomas Due
Software developer
udvikleren.dk - ASP redaktør
tdue@mail.dk