Estado de la batería

Hace algún tiempo, algún miembro del foro comentaba que necesitaba comprobar el estado de la batería desde una aplicacion para un portátil. Esta es una actualización del componente que se publicó en el área de descargas para Xailer 2.0 y corrige varios bugs.

La documentación del componente:

CLASS TBattery FROM TComponent

PUBLIC:

DATA nACLineStatus

  • 0, el equipo funciona con la batería.
  • 1, el equipo funciona con corriente.
  • 255, no hay información sobre la batería.

DATA nLifePercent

  • Porcentaje de vida de la batería.
  • 255 si no se conoce su estado.

DATA nLifeTime

  • Número de segundos de vida de la batería.
  • -1 si no hay batería o no se tiene acceso a su estado.

DATA nFullLifeTime

  • Número de segundos de vida de la batería cuando está totalmente cargada.
  • -1 si no hay batería o no se tiene acceso a su estado.

METHOD Create( oParent ) CONSTRUCTOR

METHOD Refresh()

  • Actualiza la información del componente con los datos de la batería.

METHOD IsHigh()

  • TRUE si la carga es alta o mayor que 65%.

METHOD IsMedium()

  • TRUE si la carga está entre el 33% y el 65%.

METHOD IsLow()

  • TRUE si la carga es baja o menor que 33%.

METHOD IsCritical()

  • TRUE si la carga está en un nivel crítico o menor que 5%.

METHOD IsCharging()

  • TRUE si la batería se está recargando.

METHOD IsBattery()

  • TRUE si hay una batería instalada.

METHOD IsUnknown()

  • TRUE si no se conoce el estado de la batería.

ENDCLASS

Para usarlo simplemente hay que instanciarlo como cualquier otro:

   LOCAL oBat := TBattery():Create()

   IF oBat:IsBattery()
      MsgInfo( oBat:nLifePercent )
   ENDIF

El componente está disponible para Xailer 2.7/Harbour en el área de descargas: Battery.zip

Deja un comentario

Tu dirección de correo electrónico no será publicada. Los campos obligatorios están marcados con *