تويت
بسم الله الرحمن الرحيم
ما الطريقة للتحكم في تغير صورة سطح المكتب ؟
ما الطريقة للتحكم في تغير صورة سطح المكتب ؟
-
-
السلام عليكم ورحمة الله وبركاته
من سطح المكتب اضغط بالزر الايمن للفأرة وأختر proprietes
من النافذة التي تظهر اختر bureau ثم اختر الصورة التي تعجبك ثم ok
هنا انا اتحدث عن سطح المكتب الخاص بالحاسب بدون الاوتوبلاي وبما انك وضعت استفسارك في القسم الخاص بالاوتوبلاي فأظن ان الاجابة قد تكون مختلفة
فالرجاء توضيح السؤال وشكرا -
للتوضيح القيام بتغيير الصورة برمجيا
في انتظار الرد
مشكورتعليق
-
تعليق
-
كود:img = Dialog.FileBrowse(true, "Select Image", _DesktopFolder, "Pictures (.png, .jpg, .tif, .bmp)|*.png;*.jpg;*.tif;*.bmp|", "", "dat", false, false); if (img[1] ~= "CANCEL") then SetWallpaper(0,2,img[1]) endتعليق
-
شكرا الأخ المتعملق لم أستطيع التحميل
الأخ فرح SetWallpaper ينقص كود الارجاع للمعادلة
فالرجاء توضيح الجواب وشكراتعليق
-
فى المرفقات ملف مفتوح لذلك
تعليق
-
السلام عليكم ورحمة الله وبركاته
الارجاع للمعادلة يقع بتفس الكود السابق الذي تضعه في زر في الحدث on clic
تضغط على الزر وتختار الصورة ثم تضغط عليه مرة اخرى وتختار الصورة السابقة
بالتوفيقتعليق
-
أحسنت الأخ عبود عبود
جزاك الله خيراتعليق
-
لا يقع بنفس الكودالمشاركة الأصلية بواسطة فرح صالحي مشاهدة المشاركة
أخى فرح
أشكر لك تحركك السريع لمساعدة إخوانك
تأمل معى
هل SetWallpaper من دوال الأوتوبلاى ؟؟كود PHP:SetWallpaper(0,2,img[1])
لا طبعا
هل SetWallpaper من دوال اللوا ؟؟
لا أيضا
أين تقع SetWallpaper
ج - تقع فى الملف المفتوح و تحديدا بالجلوبال فنكشن
تعليق
-
السلام عليكم ورحمة الله وبركاتهالمشاركة الأصلية بواسطة النصل القاطع مشاهدة المشاركةلا يقع بنفس الكود
أخى فرح
أشكر لك تحركك السريع لمساعدة إخوانك
تأمل معى
هل SetWallpaper من دوال الأوتوبلاى ؟؟كود PHP:SetWallpaper(0,2,img[1])
لا طبعا
هل SetWallpaper من دوال اللوا ؟؟
لا أيضا
أين تقع SetWallpaper
ج - تقع فى الملف المفتوح و تحديدا بالجلوبال فنكشن
جازاك الله كل الخير اخي النصل القاطع على التوضيح
نحن نتعلم منكم ، فلا تحرمونا من ملاحظاتكم حتى وان ظننتم انها من البديهيات
موفق بإذن الله ... لك مني أجمل تحية .
تعليق
-
تفعيل الاضافة WinApi
الكود التالي قد يفيد كذلك
مع مراعاة اسم و مسار الصورةكود PHP:Registry.SetValue(HKEY_CURRENT_USER, "Control Panel\\Desktop", "WallpaperStyle", "0", REG_SZ);
Registry.SetValue(HKEY_CURRENT_USER, "Control Panel\\Desktop", "TileWallpaper", "0", REG_SZ);
Application.Sleep(500);
DLL.CallFunction(_SystemFolder .. "\\User32.dll", "SystemParametersInfoA", "20,0,\"" .. _SourceFolder .. "\\اسم الصورة.bmp\",1", DLL_RETURN_TYPE_INTEGER, DLL_CALL_STDCALL);
تعليق
-
شـكــ وبارك الله فيك ـــرا لك ... لك مني أجمل تحية .تعليق
-
شـكــ وبارك الله فيك ـــرا لك ... لك مني أجمل تحية .تعليق
-
مشكووووووووووووورتعليق
تعليق