Me da exactamente el mismo error...lo estoy colocando justo como me dices pero me salta el error que comente arriba...
Código Delphi
[-]Result:= ADate - Dias[DayOfTheWeek(ADate)];
ERROR: [DCC Error] PaseHoras.pas(105): E2066 Missing operator or semicolon
justo en esa linea, pense que me faltaba algun parentesis o cerrar con ; pero lo copie tal cual como lo pasaste para ver! es decir esa linea pues