Automatischen E-Mail Versand Sinnvoll und Resourcensparend

[Jens Hartmann]

Ich bin zur Zeit dabei dieses Aufgabe zu lösen. Ich werde jetzt versuchen das ganz über einen Thread zu lösen. Allerdings mal einen Hinweis zu der Berechnung auf 24 Stunden...

Delphi-Quellcode:

  EMailTimerGruppe1Interval := 3600*24; 
//müsste eigendlich so sein
EMailTimerGruppe1Interval := 3600000*24;

Da...

Code:

1 sek = 1000ms
Timer.Interval := 1000

1 Min = 1000ms * 60 Sek
Timer.Interval := 60000

1 Std = 1000ms * 60 Sek * 60 Min
Timer.Interval := 3600000

Zitat von jfheins:

Delphi-Quellcode:

global/private im form/sonstdawas 
Timer1Interval: Cardinal; 

// Beim setzen: 
Timer1Interval := 3600*24 // 24h 
Timer1.Interval := millisecondsbetween(now, 22:00)

PS: Sollte keine Kritik sein, sondern lediglich für Nachfolgende Sucher eine Erleichterung.

Gruß Jens