Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.10.02;
Скачать: 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 вся ветка

Текущий архив: 2005.10.02;
Скачать: CL | DM;

Наверх




Память: 0.49 MB
Время: 0.038 c
1-1126008318
Квэнди
2005-09-06 16:05
2005.10.02
Расчет угла поляризации


1-1126423471
vasyaaaaaaa
2005-09-11 11:24
2005.10.02
Memo1.Lines.Add() - every line Color


14-1126267812
vrem
2005-09-09 16:10
2005.10.02
Что это такое?


1-1126000453
Dennis S
2005-09-06 13:54
2005.10.02
Как читать из любого ЕХЕ файла данные...


1-1126172544
Makcim
2005-09-08 13:42
2005.10.02
атрибуты файла