Wallpaper Cycler

Sign in to queue

The Discussion

  • User profile image
    Hi Sam! Photos i send on e-mail.  Green,Green

    Hi Sam! Photos i send on e-mail.

    Green,Hi Sam! Photos i send on e-mail.

    Green

  • User profile image
    Matt McCormick

    I am having trouble with this, I can't seem to get the wallpaper to stay. I can set a wallpaper, and sometimes it will stay the wallapaper until I log out, and sometimes it wont stay at all. By stay, I mean the wallpaper I set appears, then later its just a blue background (or whatever the default background color is). Any help is appreciated... mbmccormick@gmail.com.

  • User profile image
    dshome

    SystemParametersInfo does not work in Windows Vista

  • User profile image
    tristan corner

    this is very useful infomation because a made a good progran from it.

    [system error]

  • User profile image
    kirupaBlog - If it isn’t broken, take it apart and fix it! » Blog Archive » Interesting Links #3: Write Better Code, AK-47, Webcams…
  • User profile image
    MSDN Blog Postings » MultiWall - Wallpaper Tool for Multiple Monitors
  • User profile image
    Noticias externas

    Are you more productive with more monitors? Would you be even more productive with better wallpaper management

  • User profile image
    Clint

    Are you more productive with more monitors? Would you be even more productive with better wallpaper management?

  • User profile image
    Jack

    Cool! I had the same idea, and I'd like to make it in Python!

    My problem is how to say to Windows XP which image to load... (API). Some suggestion?

    Thanks

  • User profile image
    Slumber​Machine

    I had some issues with errors on vista and vb 2008. I made the following change and it worked:

           Dim filteredFiles As New List(Of String)()

           For Each file As String In files

               If file.LastIndexOf(".") > 0 Then

                   Dim ext As String = file.Substring(file.LastIndexOf("."))

                   If ".jpg .bmp .gif".IndexOf(ext) > -1 AndAlso _

                      file.EndsWith("coding4fun-desktop.bmp") = False AndAlso _

                     Not file = My.Settings.LastImageShown Then

                       filteredFiles.Add(file)

                   End If

               End If

           Next

Add Your 2 Cents