Freigeben über


Anzeigen von Systeminformationen

Datei: ...\Samples\Solution\OLE\Sysinfo.scx

Dieses Beispiel illustriert die Verwendung eines SysInfoControl-Steuerelements zur Anzeige von Systeminformationen und zur Benachrichtigung für den Fall, dass sich eine Systemeinstellung ändert.

Der Hauptteil des Codes befindet sich in diesem Beispiel in der CheckStatus-Methode. Der Code in dieser Methode überprüft die Einstellungen diverser SysInfoControl-Eigenschaften, um deren aktuelle Einstellung zu bestimmen und ein Struktur-Steuerelement (TreeView) mit diesen Informationen zu füllen. So überprüft folgender Codeteil beispielsweise die Einstellung von BatteryLifePercent:

IF ThisForm.SysInfo.BatteryLifePercent = 255
   * Add a node to display the information
ENDIF

Wenn sich eine Systemeinstellung ändert, so tritt ein Ereignis des SysInfo-Steuerelements auf. Jeder der mit diesen Ereignissen assoziierte Code ändert die Beschriftung eines Bezeichnungs-Steuerlements (Label) und ruft die CheckStatus-Methode auf, um das Struktur-Steuerelement zu aktualisieren. So ist beispielsweise nachstehender Code mit dem SysColorsChanged-Ereignis assoziiert:

ThisForm.Status.Caption = SysColorsChanged_LOC
ThisForm.CheckStatus

Siehe auch

Hinzufügen und Entfernen von Einträgen in einem Struktur-Steuerelement (TreeView) | Lösungsbeispiele | Visual FoxPro Foundation Classes A-Z