Mostrar información del sistema
Archivo: ...\Samples\Solution\OLE\Sysinfo.scx
Este ejemplo ilustra cómo utilizar SysInfoControl para mostrar información del sistema y cómo avisar cuando se modifique una configuración del sistema.
La mayor parte del código de este ejemplo se encuentra en el método CheckStatus. El código de este método comprueba los valores de varias propiedades SysInfoControl para ver sus valores actuales y rellena un control Treeview con esta información. Por ejemplo, el siguiente fragmento de código comprueba el valor de BatteryLifePercent:
IF ThisForm.SysInfo.BatteryLifePercent = 255
* Add a node to display the information
ENDIF
Cuando un valor del sistema cambia, se produce un evento SysInfoControl. El código asociado con cada uno de estos eventos establece el título de una etiqueta y llama al método CheckStatus para actualizar el control Treeview. Por ejemplo, el código siguiente se asocia al evento SysColorsChanged:
ThisForm.Status.Caption = SysColorsChanged_LOC
ThisForm.CheckStatus
Vea también
Agregar y quitar elementos en un control Treeview | Ejemplos de soluciones | Foundation Classes de Visual FoxPro (A-Z)