[fofka]

Благодарю за ответ. Регистр не важен, можно без проверки обойтись. Вот в таком варианте работает прекрасно. Еще раз спасибо.

procedure TForm1.Timer3Timer(Sender: TObject);
begin
getlocaltime(ST);
if (ST.Whour=StrToInt(Label23.Caption))
and (ST.WMinute=StrToInt(Label24.Caption))
and (CheckBox04.Checked=True)
and (Label21.Caption='Понедельник') then Alarm
else
if (ST.Whour=StrToInt(Label23.Caption))
and (ST.WMinute=StrToInt(Label24.Caption))
and (CheckBox05.Checked=True)
and (Label21.Caption:='Вторник') then Alarm
end;