MaxValue es una propiedad del componente Query1CANTIDAD que establece el valor máximo del campo. Tú mismo la has puesto antes en 999999 y por tanto la comparación >= siempre es cierta. Lo que debes usar es el valor mismo el campo y compararlo contra MaxValue:
Código Delphi
[-]
if Sender.AsInteger > Query1CANTIDAD.MaxValue then
raise Exception.Create('El Valor Maximo es de 5!!');
// Saludos