Для времени обьявляешь переменную типа TDateTime
Код:
var Mrm,dMrm:TDateTime;//Mrm - время завтрака, dMrm-сколько осталось до завтрака
begin
Mrm:=EncodeTime(8,31,0,0);//часы, минуты, сек., мс.
dMrm:=Mrm-Now;
label1.caption:=TimeToStr(dMrm);
end;
но только если время завтрака еще впереди и в пределах 1 дня, иначе отсчет будет неверным (не обратным)
или можешь использовать ф-цию DecodeTime(Now, часы, минуты, сек., мс), и потом отнимать по-отдельности часи, минути и секунды времени завтрака от результатов этой функции(процедуры)