Nejsem úplně kovaný v Delphi.
Zkusil bych, teda něco takového:
begin
time1 := time;
time2 := StrToTime('09:45:00');
Label1.Caption:= TimeToStr(time1);
Label2.Caption:= TimeToStr(time2);
If Label1.Caption = Label2.Caption Then ShowMessage('shoda')
end;
Protože mám trochu pocit, že interně je time1 instance objektu time,zatímco time2 je string. Ale možná se pletu.