Folge dem Video um zu sehen, wie unsere Website als Web-App auf dem Startbildschirm installiert werden kann.
Anmerkung: Diese Funktion ist in einigen Browsern möglicherweise nicht verfügbar.
Dim MeinKey As RegistryKey
' Einen Registryzweig zum Schreiben öffnen
MeinKey = Registry.CurrentUser.OpenSubKey("Control Panel\Desktop", True)
'Zentriert
If Parameter.Display(ListImages.SelectedIndex) = 0 Then
MeinKey.SetValue("WallpaperStyle", "1")
MeinKey.SetValue("TileWallpaper", "0")
End If
'Nebeneinander
If Parameter.Display(ListImages.SelectedIndex) = 1 Then
MeinKey.SetValue("WallpaperStyle", "1")
MeinKey.SetValue("TileWallpaper", "1")
End If
'Gestreckt
If Parameter.Display(ListImages.SelectedIndex) = 2 Then
MeinKey.SetValue("WallpaperStyle", "2")
MeinKey.SetValue("TileWallpaper", "0")
End If
' Den Registryzweig schließen
MeinKey.Close()