Vale marcos la variable la declaro previamente, pero la consulta para contar las fichas distintas, estaria bien asi?
TOTALFICHAS:integer;
Código SQL
[-]
dm.QHorario.SQL.Clear;
dm.QHorario.SQL.Add('SELECT COUNT(DISTINCT NUM_FICHA) AS TOTALFICHAS FROM HORARIO,FICHA ');
dm.QHorario.SQL.Add('WHERE HORARIO.NUM_FICHA=FICHA.NUM_FICHA');
dm.QHorario.SQL.Add(' AND HORARIO.F_INI_HORARIO<=:e');
Me dice que no reconoce el campo Num_ficha a que puede ser debido.
Y es la clave primaria en la tabla Ficha y forma parte de la clave
primaria en Horario. Saludos.