Skip to content
  • Categories
  • Recent
  • Tags
  • Popular
  • World
  • Users
  • Groups
Skins
  • Light
  • Cerulean
  • Cosmo
  • Flatly
  • Journal
  • Litera
  • Lumen
  • Lux
  • Materia
  • Minty
  • Morph
  • Pulse
  • Sandstone
  • Simplex
  • Sketchy
  • Spacelab
  • United
  • Yeti
  • Zephyr
  • Dark
  • Cyborg
  • Darkly
  • Quartz
  • Slate
  • Solar
  • Superhero
  • Vapor

  • Default (No Skin)
  • No Skin
Collapse
Code Project
CODE PROJECT For Those Who Code
  • Home
  • Articles
  • FAQ
Community
  1. Home
  2. Mobile Development
  3. Mobile
  4. Change Wallpaper in Pocket PC

Change Wallpaper in Pocket PC

Scheduled Pinned Locked Moved Mobile
csharp
3 Posts 2 Posters 0 Views 1 Watching
  • Oldest to Newest
  • Newest to Oldest
  • Most Votes
Reply
  • Reply as topic
Log in to reply
This topic has been deleted. Only users with topic management privileges can see it.
  • N Offline
    N Offline
    Nirmit Kavaiya
    wrote on last edited by
    #1

    Hi Is there any one having a VB .Net code to change pocket PC wallpaper in WM 6.0 Please reply Thanks in advance

    E 1 Reply Last reply
    0
    • N Nirmit Kavaiya

      Hi Is there any one having a VB .Net code to change pocket PC wallpaper in WM 6.0 Please reply Thanks in advance

      E Offline
      E Offline
      energywave
      wrote on last edited by
      #2

      I'm doing so in Windows CE and it's working nice:

      Private Const HWND_BROADCAST As Integer = &HFFFF
      Private Const WM_SETTINGCHANGE As Integer = 26
      Private Const SPI_SETDESKWALLPAPER As UInt32 = 20

      Public Sub SetWallpaper(ByVal ImageFileName As String)
      Microsoft.Win32.Registry.SetValue("HKEY_CURRENT_USER\ControlPanel\Desktop", "Wallpaper", ImageFileName)
      PostMessage(New IntPtr(HWND_BROADCAST), WM_SETTINGCHANGE, SPI_SETDESKWALLPAPER, 0)
      End Sub

      Hope this helps :)

      Henrik Sozzi Poliware S.r.l.

      N 1 Reply Last reply
      0
      • E energywave

        I'm doing so in Windows CE and it's working nice:

        Private Const HWND_BROADCAST As Integer = &HFFFF
        Private Const WM_SETTINGCHANGE As Integer = 26
        Private Const SPI_SETDESKWALLPAPER As UInt32 = 20

        Public Sub SetWallpaper(ByVal ImageFileName As String)
        Microsoft.Win32.Registry.SetValue("HKEY_CURRENT_USER\ControlPanel\Desktop", "Wallpaper", ImageFileName)
        PostMessage(New IntPtr(HWND_BROADCAST), WM_SETTINGCHANGE, SPI_SETDESKWALLPAPER, 0)
        End Sub

        Hope this helps :)

        Henrik Sozzi Poliware S.r.l.

        N Offline
        N Offline
        Nirmit Kavaiya
        wrote on last edited by
        #3

        Thanks for reply But the postmessage is not working please help

        1 Reply Last reply
        0
        Reply
        • Reply as topic
        Log in to reply
        • Oldest to Newest
        • Newest to Oldest
        • Most Votes


        • Login

        • Don't have an account? Register

        • Login or register to search.
        • First post
          Last post
        0
        • Categories
        • Recent
        • Tags
        • Popular
        • World
        • Users
        • Groups