Benutzereinstellungen speichern VB-Version:  VB5, VB6
	Views:  637

Nehmen wir mal an, Ihr Programm bietet dem Benutzer die Möglichkeit verschiedene Einstellungen selbst vorzunehmen. Leider gehen diese Einstellungen beim Beenden des Programms verloren. Wenn das Programm wieder gestartet wird, sind die benutzerdefinierten Einstellungen weg und der Anwender muss diese erneut vornehmen.

Dies können Sie vermeiden, wenn die Einstellungen beim Beenden des Programms in der Registry gespeichert werden. Hierfür wird die SaveSetting-Anweisung verwendet, die folgende Syntax hat:

SaveSetting Anwendungsname, Abschnitt, Schlüssel, Wert

Der Code im Form_Unload-Ereignis könnte z. B. so aussehen:

Private Sub Form_Unload(Cancel As Integer)
  SaveSetting "myProgram", "Optionen", _
    "frmInfo.BackColor", frmInfo.BackColor
End Sub

Um die gespeicherten Einstellungen beim Programmstart zur Verfügung zu stellen, benötigen Sie die GetSetting-Funktion, die folgende Syntax hat:

GetSetting(Anwendungsname, Abschnitt, Schlüssel[, Standard])

Der Code im Form_Load-Ereignis sieht dann - bezogen auf das obige Beispiel - so aus:

Private Sub Form_Load()
  frmInfo.BackColor = GetSetting("myProgram", "Optionen", _
    "frmInfo.BackColor", frmInfo.BackColor)
End Sub

Der optionale Parameter Standard kann verwendet werden, um den von Visual Basic ausgegebenen Wert einzustellen, wenn in der Registrierung kein Wert für den angegebenen Schlüssel eingetragen ist.