View Full Version : Set Desk Wall Paper?
Jazator
04-20-2004, 02:19 PM
Hi all!
I using vb 5.0 - wrote:
------------------------------------------
Declare Function SystemParametersInfo Lib "user32" Alias "SystemParametersInfoA" (ByVal uAction As Long, ByVal uParam As Long, lpvParam As Any, ByVal fuWinIni As Long) As Long
Public Const SPI_SETDESKWALLPAPER = 20
Public Sub SetWallpaper(File As String)
SystemParametersInfo SPI_SETDESKWALLPAPER, 0, ByVal File, True
End Sub
--------------------------------------------
But what do this on AMS 5.0 ?
I Beg pardon for my bad english, hope that understood...
Jazator.
Try something like this:
strFile="C:\\Windows\\Soap Bubbles.bmp"
result = DLL.CallFunction(_SystemFolder .. "\\User32.dll", "SystemParametersInfoA", "20,0,\"" .. strFile .. "\",-1", DLL_RETURN_TYPE_LONG, DLL_CALL_STDCALL)
Hi all!
I using vb 5.0 - wrote:
------------------------------------------
Declare Function SystemParametersInfo Lib "user32" Alias "SystemParametersInfoA" (ByVal uAction As Long, ByVal uParam As Long, lpvParam As Any, ByVal fuWinIni As Long) As Long
Public Const SPI_SETDESKWALLPAPER = 20
Public Sub SetWallpaper(File As String)
SystemParametersInfo SPI_SETDESKWALLPAPER, 0, ByVal File, True
End Sub
--------------------------------------------
But what do this on AMS 5.0 ?
I Beg pardon for my bad english, hope that understood...
Jazator.
TJ_Tigger
04-20-2004, 03:17 PM
There is a posted application that shows how to do this too. It might be in AMS4 however. But it is out there.
rhosk
04-20-2004, 03:42 PM
How soon we forget :) TJ_Tigger is being very modest, but I believe that this app shows you what you're looking for. I've applied this to a few of my apps so far. Scroll down to Tigg's first post.
http://www.indigorose.com/forums/showthread.php?t=5533&highlight=picture+viewer
Enjoy!
TJ_Tigger
04-20-2004, 03:54 PM
Wasn't trying to be modest, just lazy. Didn't have time to search, but I think that Worm had a project demonstrating the same thing without all my convoluted code.
How soon we forget :) TJ_Tigger is being very modest, but I believe that this app shows you what you're looking for. I've applied this to a few of my apps so far. Scroll down to Tigg's first post.
http://www.indigorose.com/forums/showthread.php?t=5533&highlight=picture+viewer
Enjoy!
rhosk
04-20-2004, 04:03 PM
TJ, these are great learning tools for all. What some need to realize is - without getting the exact code they may be trying to gain; if you take some of these apps apart, you can usually end up with what you're looking for. Am I making sense? I've learned a **** of a lot from many members here and not just from code give-aways (even though [you] do that often :)). I have referred to that Picture Viewer a few times in building some of my apps and have learned much in the process. Hope they take it for what it's worth ($$$).
TJ_Tigger
04-20-2004, 04:11 PM
I am glad to hear (read) that. I believe in the share and share a like, not that I can post full projects, but I can post things that I have created to help me learn.
TJ, these are great learning tools for all. What some need to realize is - without getting the exact code they may be trying to gain; if you take some of these apps apart, you can usually end up with what you're looking for. Am I making sense? I've learned a **** of a lot from many members here and not just from code give-aways (even though [you] do that often :)). I have referred to that Picture Viewer a few times in building some of my apps and have learned much in the process. Hope they take it for what it's worth ($$$).
Jazator
04-20-2004, 04:13 PM
Thank you, much you is thanked. I often it is difficult to search for, I bad know english and very costly traffic of the access in internet: 1 hour > $1
vBulletin® v3.8.4, Copyright ©2000-2009, Jelsoft Enterprises Ltd.