TDateTimePicker

[Ratte]

Hi,

Ich habe zwei DateTimePicker, im ersten wählt man ein Datum aus und im zweiten eine Uhrzeit. Wie kann ich am so ausgewählten Zeitpunkt eine procedure aufrufen?

THX im vorraus,

Ratte

[Phantom1]

Du brauchst dazu einen normalen Timer (intervall auf 1000ms):

Code:

procedure TForm1.Timer1Timer(Sender: TObject);
begin
  If Trunc(DateTimePicker1.Date)+Frac(DateTimePicker2.Time)<=Now Then Begin
    // damit das ereignis nur einmal auftritt den timer deaktiveren
    Timer1.Enabled:=False;
    // tue etwas ... oder rufe eine andere procedure auf ...
  End;
end;

[Ratte]

@Phantom1 THX

Ratte