Hola novato_erick.
La propiedad
RecordCount no es fiable en todos los componentes, proba de este modo:
Código Delphi
[-]
with dmConecta.qConsultaFechaAgenda do
begin
Close;
Params.ParamByName('pFecha').AsDate := Now;
Params.ParamByName('pID_EMPLEADO').AsInteger := IdEmpleado;
ExecSQL(False);
Open;
if IsEmpty then
frmPrincipal.LblActividades.Caption := 'Usted No tiene Actividades'
else
frmPrincipal.LblActividades.Caption := 'Usted Actualmente tiene Actividades';
end;
Saludos.