[ecfisa]

Hola.

Una manera que desligará cualquier problema con la consulta de tu query (ZQUERY1) es hacerte una función y dentro de ella crear una consulta al vuelo.
No conozco los componentes Zeos de modo que te hago un ejemplo con IBX. Quizá debas reemplazar el nombre de alguna propiedad, pero creo que en líneas generales da la idea:

Código Delphi [-]
function SumarCheques: Double;
begin
  with TIBQuery.Create(nil) do // aca iría TZQuery.Create(nil)
  try
    Database:= DataModule1.IBDatabase; // aca iría  tu componente database 
    SQL.Text:= 'SELECT SUM(CMONTO) AS MONTOTOTAL FROM TCHEQUES';
    Open;
    Result:= FieldByName('MONTOTOTAL').AsFloat;
  finally
    Free;
  end;
end;

Ejemplo de llamada:

Código Delphi [-]
   ShowMessage(FloatToStr(SumarCheques));

Un saludo.