Jump to content
MSFN is made available via donations, subscriptions and advertising revenue. The use of ad-blocking software hurts the site. Please disable ad-blocking software or set an exception for MSFN. ×

Wallchanger 3.0 Final released.


damian666
 Share

Recommended Posts

Wallchanger Final version released

Description

This little program switches your wallpaper on windows startup.

I made this for myself, there are progs like this around, but they are shareware... :twisted:

Thats why i made one myself.

Development done for this one, it works great :D

Wallchanger.PNG

Any feedback is appriciated.

Released on 20-10-2008

What's New in Wallchanger 3.0 final.

=====================================================

New GUI!!!

Faster execution.

Minor optimisations to the sourcecode.

Updated to the latest beta version of autoit.

=====================================================

:downloadlink: Wallchanger 3.0

Edited by damian666
Link to comment
Share on other sites


This version will not support os's under xp, I broke something.

But i have asked help on the autoit forum, and i think i have the solution.

So its fixed in the next version.

damian666

P.S. those that have downloaded this this week, please do it again, the link was old and f***ed up.

this is the good one

Link to comment
Share on other sites

wallchanger updated to 1.5.

it would not hurt if i could get some feedback people...

just let me know what you think or what is missing and stuff.

you may even ??critisice?? me, but only with good intensions!!:)

damian666

Link to comment
Share on other sites

  • 2 weeks later...

Hello damian!

Want you a mirror for this project (on site of the other thread)?

You may know how you can do upload :P Mail me when done - then i place the link!

Chris

Edited by ChrisKuhli
Link to comment
Share on other sites

  • 2 weeks later...

Hello, damian666.

I installed your program and I think it's a great work.

I have some notes that I would like to share:

1- The installer says it's installing version 1.4, but the download link says version 1.5.

Does the installer need an update or is it really version 1.4?

You could add an "about" in the program, so we know the exact version;

2- The installer does not allow to choose the destination folder of the program.

Could this be changed?

3- Like BLeU suggested, I would like to use the program without having it copying the images to the \wallchanger\wallpaper folder.

I have a folder with 2.000 images, categorized in subfolders, and it is not necessary to make a copy of them all to that \wallpaper folder, duplicating them.

So, if the program accepted a pointed folder and read all the subfolders with images it would be great.

4- Is it possible to make an installer without any packs?

That way, the installer would be much smaller.

I have been using freeware Wallpaper Cycler Lite for ages, and it does what I want very well: change the wallpaper at startup and exit.

But if a fellow member creates a good and smaller program I will switch without problems.

Sorry if this is too much and keep the good work,

JS.

Edited by JohnS
Link to comment
Share on other sites

hi guys, first of all, thanx for the reply.

Now to answer the questions, i make this in autoit, and trust me i am no genius with that.

thats why the wallchanger has to copy the wallpapers to a workmap AND rename them to digits.

because thats the way it can switch them, 1, 2, 3...

until i find a way to apply the wallpapers by name, i have to copy them, sorry for that.

lets say i am working on it, and i am certainly looking for this things after your feedback.

i will fix the installer, and well, do you really think its neccessary to take out the wallpack

in the installer?

thats there to be ready to go after install...

destination folder should be doable, i will look and fix if possible.

thanx again and keep your eyes peeled.

damian666

Link to comment
Share on other sites

maybe this would help..

#NoTrayIcon
Dim $cCounter = 0
Dim $FindFile = FileFindFirstFile(@WindowsDir & '\Web\Wallpaper\*.jpg')
While 1
FileFindNextFile($FindFile)
If @error Then ExitLoop
$cCounter = $cCounter + 1
WEnd
FileClose($FindFile)

$FindFile = FileFindFirstFile(@WindowsDir & '\Web\Wallpaper\*.jpg')

$i = 0
while $i < 5
$RandomNum = Random(1, $cCounter, 1)
$i = $i + 1
WEnd

Dim $curFile
For $i = 1 To $RandomNum
$curFile = FileFindNextFile($FindFile)
If $RandomNum = $i Then
RegWrite("HKCU\Control Panel\Desktop", "Wallpaper", "REG_EXPAND_SZ", "%SystemRoot%\Web\Wallpaper\" & $curFile)
ExitLoop
EndIf
Next

FileClose($FindFile)

Exit

it randomly picks up a picture file in a folder then apply it as wallpaper..

Link to comment
Share on other sites

hi blue. well that should fix it, if i had no Gui...

that makes it a lot more difficult you see.

but i have something for you and johnS.

http://hostfile.org/WallchangerV2.zip

please note that this is only the Gui that works, no startup options inplemented.

i just want to know if it works on YOUR system.

so call it pre-beta, if you like.

but it is save man.

it will only create two files, one ini in the wallchanger dir and one in the wallpaper dir , which is a listing really...

so guys, please let me know, and i told you i was working on it huh?

feedback please, and thanx man

damian666

p.s.

Dim $curFile

For $i = 1 To $RandomNum

$curFile = FileFindNextFile($FindFile)

If $RandomNum = $i Then

RegWrite("HKCU\Control Panel\Desktop", "Wallpaper", "REG_EXPAND_SZ", "%SystemRoot%\Web\Wallpaper\" & $curFile)

ExitLoop

this is not the way to apply a wallpaper man :)

Edited by damian666
Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    No registered users viewing this page.


×
×
  • Create New...