السلام عليكم
كنت اريد برمجه برنامج لتغيير خلفيه سطح المكتب مع خصيت ال slide show و تحديد مسارات من الcombo box و الي اخره.هل من مساعد ؟؟
لتغيير الخلفية
كود :
Private Declare Function SystemParametersInfo Lib "user32" Alias "SystemParametersInfoA" (ByVal uAction As Integer, ByVal uParam As Integer, ByVal lpvParam As String, ByVal fuWinIni As Integer) As Integer
Private Const SE = 20
Private Const UP = &H1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Using dlg As New OpenFileDialog
dlg.ShowDialog()
SystemParametersInfo(SE, 0, dlg.FileName, UP)
End Using
End Sub
اكيد ممكن
كود :
Private Declare Function SystemParametersInfo Lib "user32" Alias "SystemParametersInfoA" (ByVal uAction As Integer, ByVal uParam As Integer, ByVal lpvParam As String, ByVal fuWinIni As Integer) As Integer
دالة من دوال api
كود :
Private Const SE = 20
Private Const UP = &H1
ثابتان يتم استخدامهم مع الدالة
كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Using dlg As New OpenFileDialog
dlg.ShowDialog()
SystemParametersInfo(SE, 0, dlg.FileName, UP)
End Using
End Sub
هذا الكود في حدث النقر للبوتون راح يفتح عندك FileDialog تختار منه مسار الصوره موفق
تمام مشكر بس انا كنت عاوز نظام ال listview و ال combobox ويكون في timer لتغيير الشاشه اوتوماتيكي هل من مساعده؟؟
طيب اخي بس انتظر عليا غدآ بإذن الله لان حاليآ تعبان ونعسان
وراح اعملك مثال بإذن الله
السلام عليكم
مثل ما وعدتك اخي تفضل
صورة البرنامج
طبعآ الصورة الموجودف في الـــCheckBox تختلف عن يلي تظعها لان حجمها صغير لذلك وضعتها حسب مسار جهازي موفق
تحميل المشروع
مشكور علي المجهود الرائع بس انا اريد listview و اضيف الصور ليه لمي عملت listview و open file dialog و تمام لمي اجي اضيف الصور مش بتبقي صور بيبقي المسار بتعها بس ممكن حل؟؟
هو ليه الموقع بعد التجديد الاعضاء معدوش بيردوا علي طول ده معني كده ان انتوا مش عاوزين تساعدوا ولا ايه المشكله؟؟