Nick,
Thanks for the infomation.
Mike
> ----------
> From: Nick Hammond[SMTP:[EMAIL PROTECTED]]
> Reply To: [EMAIL PROTECTED]
> Sent: Saturday, December 18, 1999 4:09 PM
> To: [EMAIL PROTECTED]
> Subject: RE: Get Battery Voltage
>
> Mike,
>
> >Does anyone know how to get the battery voltage and percent left?
> Following is what I used.
>
> Regards, Nick
>
> static Boolean GetPwrInfo()
> { // get power system info and write to form fields and display form
> char buffer[48];
> char *strpt = &buffer[0];
> UInt vbattery, vwarning, vcritical, maxticks;
> SysBatteryKind batkind;
> Byte batpercent;
> Boolean pluggedin;
> FormPtr form = FrmGetActiveForm();
> // get battery data
> vbattery = SysBatteryInfo(FALSE, &vwarning, &vcritical,
> &maxticks, &batkind, &pluggedin, &batpercent);
> // battery type
> switch (batkind)
> {
> case sysBatteryKindAlkaline:
> StrCopy(strpt,"Alkaline");
> break;
> case sysBatteryKindNiCad:
> StrCopy(strpt,"NiCad");
> break;
> case sysBatteryKindLithium:
> StrCopy(strpt,"Lithium");
> break;
> default:
> StrCopy(strpt,"Unknown");
> break;
> }
> strpt = FieldSet(form, FLD_BAT_TYPE, strpt);
> // battery voltage
> MakeVoltStr(strpt, vbattery);
> strpt = FieldSet(form, FLD_BAT_VOLTAGE, strpt);
> // battery power remaining
> MakePercentStr(strpt, batpercent);
> strpt = FieldSet(form, FLD_BAT_PERCENT, strpt);
> // warning voltage
> MakeVoltStr(strpt, vwarning);
> strpt = FieldSet(form, FLD_BAT_VWARN, strpt);
> // critical voltage
> MakeVoltStr(strpt, vcritical);
> strpt = FieldSet(form, FLD_BAT_VCRIT, strpt);
> // external power
> StrCopy(strpt, (pluggedin) ? "Yes" : "No");
> strpt = FieldSet(form, FLD_BAT_EXTERN, strpt);
> // display form
> FrmDrawForm(form);
> SayTime();
> return TRUE;
> }
>
>
>
> -----Original Message-----
> From: McCollister, Mike [mailto:[EMAIL PROTECTED]]
> Sent: Sunday, 19 December 1999 12:33
> To: '[EMAIL PROTECTED]'
> Subject: Get Battery Voltage
>
>
> Hi,
>
> Does anyone know how to get the battery voltage and percent left? I want
> to
> add a battery meter to one of my applications.
>
> Thanks,
>
> Mike McCollister
>
>
>
