Zeit vergleichen

[bundy]

Hallo Delphianer

Ich habe folgendes Problem:

Delphi-Quellcode:

procedure TDienste_buchen_form.cxScheduler1SelectionChanged(
  Sender: TObject);
var start:Ttime;
    Nachtzeit:Double;
begin
dxDateEdit1.Date:=cxScheduler1.SelStart;
dxDateEdit2.Date:=cxScheduler1.SelFinish;
start:= cxScheduler1.SelStart;
Edit2.Text:=TimeToStr(start)  ;
if start < StrToTime(' 06:00:00') then MACHWAS;  //---------> das funktioniert nicht :gruebel:

Ich muss ausrechen Nachtstunden und Tagesstunden.
Die Nachtstunden gehen bis 06:00:00.

Warum lauft meinen Procedure nicht in die IF Schleife , wenn mein start:= 04:00:00

mfg
bundy