Программный файл: ...\Samples\Solution\OLE\Sysinfo.scx
В предлагаемом примере демонстрируется использование объекта SysInfoControl - для отображения различной системной информации.
Основной программный код размещается в методе CheckStatus. Здесь проверяются и заполняются значения основных Свойств объекта SysInfoControl, которые в дальнейшем заполняются в объекте отображения системной информации - объекте типа TreeView . Например, следующий фрагмент программного кода проверяет значение системного свойства BatteryLifePercent:
![]() | |
---|---|
IF ThisForm.SysInfo.BatteryLifePercent = 255 |
При изменении Системных параметров происходит событие рассматриваемого объекта SysInfoControl. Программный код соответствующего событияизменяет заголовок некоторого параметра и вызывает соответствующий Метод CheckStatus - для обновления содержания элементов объекта treeview. К примеру, следующий программный фрагмент связан с событием: SysColorsChanged:
![]() | |
---|---|
ThisForm.Status.Caption = SysColorsChanged_LOC |