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