Delphi - ¿bug con dmsql.Query1Sql.Add?

Me produce una excepción msjet4 al ejecutar la instruccion

dmsql.Query1Sql.Add.Sql.Add('SELECT COUNT(*) AS TOTAL');

si introduzco dmsql.Query1Sql.Add.Sql.Add(' '); no peta,
¿cual puede ser el problema teniendo en cuenta que en modo NODEBUG funciona perfectamente?

parece ser un problema del compilador cuando funciona en modo debug, ¿os suena?
¿sabeis si tiene solucion?

Conecto via TADOConnect con base de datos MSACCESS y realizo la misma llamada
o similar desde otras funciones y sin problema en modo debug tmb.

Soy novel en debug y estoy desesperado agradeceria ayuda

[email protected] o [email protected]

Muchas gracias por anticipado

Lo que puse fue un copy paste erroneo, porque lo uso con with....
¿veis algo erroneo?
Muchas gracias por anticipado.
En modo de ejecucion nopasa. Solo en debug.

try
With dmsql.Query1 do
begin
Sql.Clear;
Sql.Add('SELECT COUNT(*) AS TOTAL');
Sql.Add('FROM TERMINAL');
Sql.Add('WHERE TERNUMEROSERIE = ' + Qs(snFound));
Open;

if fieldByName('TOTAL').AsInteger > 0 then
Result := True
else
Result := False;

dmSql.Query1.Close;
end;
finally
Screen.Cursor := crDefault;
end;