Delphi - Como ejecuto esta consulta SQL

Hola a todos, tengo una consulta que en el ambiente SQL funciona muy bien, pero la quiero ejecutar desde un objeto TQuery en Delphi. Cualdo inserto este código en el code editor de este objeto no me reconoce la estructura CASE WHEN, entonces pregunto, hay alguna manera de ejecutar esto en Delphi???

SELECT ZONAL, COUNT(ZONAL) AS TOTAL,SUM(CASE WHEN cUserP = 'sconact0' THEN 1 ELSE 0 END) AS AUTOMATICO
FROM liquSQL
GROUP BY ZONAL
ORDER BY zonal

Saludos

Yo realmente no conocía la sentencia CASE WHEN en SQL, pero deberías considerar la posibilidad de que la base de datos no la soporte. Por ejemplo, hasta no hace mucho tiempo MySQL no soporta las subconsultas.
Si no ese es caso, deberías ver de hacer lo mismo usando otra sentencia..