Código Delphi [-]if FormatDateTime('hh:mm AM/PM',now) = '05:08 PM' then ShowMessage('blablaba');
if FormatDateTime('hh:mm AM/PM',now) = '05:08 PM' then ShowMessage('blablaba');