Скачать: CL | DM;

Источник бесперебойного питания   Найти похожие ветки 

← →
Serg1981 ©   (2005-08-04 20:54) [0]

Привет всем ! Как узнать, что компьютер перешёл на питание от батареи ИБП ? И соответственно как отловить момент перехода на питание от сети ? Заранее спасибо.

---

← →
Eraser ©   (2005-08-04 22:00) [1]

Serg1981 ©   (04.08.05 20:54)

Никак.

---

← →
isasa ©   (2005-08-05 00:46) [2]

А что на ИБП индикаторов нет?
Кроме этого - утилиты. Пдключение через USB(COM) порт.

---

← →
Serg1981 ©   (2005-08-05 09:06) [3]

Я хочу узнать это из под Делфи, чтобы выдать сообщение в программе, что питания от сети нет.

---

← →
Leonid Troyanovsky ©   (2005-08-05 10:19) [4]

> Serg1981 ©   (05.08.05 09:06) [3]
> Я хочу узнать это из под Делфи, чтобы выдать сообщение в
> программе, что питания от сети нет.


http://groups-beta.google.com/group/borland.public.delphi.vcl.components.using.win32/msg/deb7feecc426a10d

--
Regards, LVT.

---

← →
DC-AC   (2005-08-05 12:31) [5]

ИБП какой ? Если не важно какой - тогда задача решается не так легко. Если конкретного производителя - или через события "егойной" утилиты или напрямую, наприме через COM-порт, в сети есть протоколы на некоторые UPS.

---

← →
y-soft ©   (2005-08-05 22:29) [6]

В принципе можно использовать WMI (класс Win32_UninterruptiblePowerSupply), но срабатывает не для всех моделей ИБП. У меня дома, например, Ippon в упор не видит...

---

← →
Anatoly Podgoretsky ©   (2005-08-05 22:40) [7]

WM_POWERBROADCAST

---

← →
Serg1981 ©   (2005-08-05 22:52) [8]

У меня APC Back CS 650EI, подключен по USB. На ПК стоит WinXP и APC Power Chute

---

← →
Anatoly Podgoretsky ©   (2005-08-05 22:53) [9]

На ХР можно обойтись и без APC Power Chute, Виндоус поддерживает его напрямую.

---

← →
Antonn ©   (2005-08-07 13:24) [10]

не проверял:

var
  SysPowerStatus: TSystemPowerStatus;
begin
GetSystemPowerStatus(SysPowerStatus);
if Boolean(SysPowerStatus.ACLineStatus) then begin
    //розетка
  end
  else begin
    //батарейки
    //Format("Battery power left: %d percent.", [SysPowerStatus.BatteryLifePercent]) - сколько в граммах
  end;
end;

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.026 c