В предлагаемом примере демонстрируется использование объекта SysInfoControl - для отображения различной системной информации.

Основной программный код размещается в методе CheckStatus. Здесь проверяются и заполняются значения основных Свойств объекта SysInfoControl, которые в дальнейшем заполняются в объекте отображения системной информации - объекте типа TreeView . Например, следующий фрагмент программного кода проверяет значение системного свойства BatteryLifePercent:

	Копировать Код
IF ThisForm.SysInfo.BatteryLifePercent = 255 * Add a node to display the information ENDIF

При изменении Системных параметров происходит событие рассматриваемого объекта SysInfoControl. Программный код соответствующего событияизменяет заголовок некоторого параметра и вызывает соответствующий Метод CheckStatus - для обновления содержания элементов объекта treeview. К примеру, следующий программный фрагмент связан с событием: SysColorsChanged:

	Копировать Код
ThisForm.Status.Caption = SysColorsChanged_LOC ThisForm.CheckStatus

Задачи

Описание

Другие ссылки