از چه کدی برای قرار دادن عکسی در صفحه دسک تاپ( wallpaper)استفاده کنیم ؟

از چه کدی برای قرار دادن عکسی در صفحه دسک تاپ( wallpaper)استفاده کنیم ؟

كسي جواب من رو نميده؟
ظاهرا كسي بلد نيست

مثل اینکه هیچ کس بلد نیست!

از این کد من تو 98 استفاده می کردم ول یدیگه نمیدون تو Xp هم جواب میده یا نه یه تست بکنید و لطفا نتیجو رو بگید

کد:

---

Dim t As Long
Dim Wallpaper As String
Wallpaper = "c:\test.bmp"
t = SystemParametersInfo(ByVal 20, vbnostring, ByVal Wallpaper, &H1)

---

در ضمن شما به تابع Api احتیاج داری اینم تابعش

کد:

---

Public Declare Function SystemParametersInfo Lib "user32" Alias "SystemParametersInfoA" (ByVal uAction As Long, ByVal uParam As Long, ByRef lpvParam As Any, ByVal fuWinIni As Long) As Long

---

در ضمن این دستور فقط برای فایلهای bmp می باشد .
فکر کنم اگر تو رجیستری تغییر بدید میتونید Wallpaper رو عوض کنید .

ببين من خودم اين كار را براي يه سي دي آموزشي براي يه شركت انجام داده ام
مي تونم كمكت كنم
اما مي ترسم اگه کد اصلی برنامه را بهت بدم گیج بشی چون طوری نوشته ام که به راحتی نمی تونی بفهمیش
---
یه توصیه :
توی وی بی چیزی نیست که نشه من 4 ساله وی بی کار می کنم و همه جورش را هم دیده ام



- یه راهنمایی :
دستورات Api یادت نره
من در خدمتم

Tomcat من کدی میخوام که عکس با پسوند Jpeg رو پشتیبانی کنه

Blockstorm سعی کن چیزی بنویسی که مفید باشه

تابلو هستش که باید از تابع Api استفاده کرد ولی کدوم تابع Api رو نمیدونیم

آقا حمید اولاٌ لطفا کنید پستهاتون رو پشت سر هم ندید اگر میخواهید اونو اصلاح کنید (البته با عرض شرمندگی)
یه روش هست که شما میتونید داخل رجیستری تغییر بدید و فایلتو اونجا بزارید ولی باید یه دور ریست یا لوگ آف بشه ...
شاید هم روشی بهتری باشه من بلد نیستم .. ولی دنبالش می گردم .

خوب قربونت من همون روش رو ميخوام

این یه مسیر
hkey_current_user\control panel\desktop کلید Wallpaper رو عوض کن .
یه مسیر دیگه هم میتونی از
hkey_local_machine\software\microsoft\windows\curr entversion بازم کلید Wallpaper رو عوض کنی