[fofka]

Добрый вечер. Понимаю что вопрос простой, а не получается.
Не получается условие выполнения процедуры "Alarm" сделать.

PHP код:

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 (StrToInt(Label21.Caption='Понедельник')) then Alarm
  else
 if (ST.Whour=StrToInt(Label23.Caption)) 
   and (ST.WMinute=StrToInt(Label24.Caption))
   and (CheckBox05.Checked=True) 
   and (StrToInt(Label21.Caption:='Вторник')) then Alarm
 end; 


На Label21 у меня отображается текущий день недели, вот тут у меня возникла трудность. Как мне правильно записать это условие? Ругается.
Заранее благодарю за совет.