If Abfrage oder Algorithmus?

[Matze]

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var Time: TTime;
begin
  Time:=StrToTime(Label1.Caption);
  if TimeToStr(Time) = '15:00:00' then ShowMessage('Hallo');
end;

Ich hoffe, das meinst du, es geht natürlich auch mit "now"!