السلام عليكم
مشروع مفتوح .... تغيير الخلفية اما بلون او بصورة من صور النظام او من مجلد الصور
سنضع هنا شرحا بسيطا لاكواد تغيير الخلفية
-----------------
اولا : الكود المسؤول عن تغيير الخلفية هو
PHP Code:
Application.SetPageProperties("Page1", nil);
PHP Code:
Application.SetPageProperties("Page1", {BackgroundType= 0});
PHP Code:
Application.SetPageProperties("Page1", {BackgroundType= 1});
PHP Code:
Application.SetPageProperties("Page1", {BackgroundType= 2});
الان من اجل تغيير الخلفية بصورة من مجلد الصور الموجودة ....
اولا يجب ان نعتمد الخيار رقم 2 وهو خاص باعتماد الصور للخلفية
PHP Code:
Application.SetPageProperties("Page1", {BackgroundType= 2});
مثلا لتكون الصورة تحمل اسم 33 من توسعة jpg
PHP Code:
Application.SetPageProperties("Page1", {ImageFilename = "AutoPlay\\Images\\33.jpg"});
من اجل تغيير خلفية البرنامج الى لون معين :
اولا يجب ان نعتمد الخيار رقم 0 وهو خاص باللون الوحيد للخلفية
PHP Code:
Application.SetPageProperties("Page1", {BackgroundType= 0});
PHP Code:
Application.SetPageProperties("Page1", {BackgroundColor= (255)});
من اجل اللون الاحمر مثلا وهو FF0000
PHP Code:
Application.SetPageProperties("Page1", {BackgroundColor= Math.HexColorToNumber("FF0000")});
اذا اردنا ان يظهر للمستخدم نافذة ليختار اللون المناسب فان نلجا الى ملفات dll الخاصة بالاولوان و هي
CHCOLOR.DLL
حملها من هنا و ضعها في مجلد Docs
*
طبعا لا ننسى ان نعتمد الخيار رقم 0 وهو خاص باللون الوحيد للخلفية
PHP Code:
Application.SetPageProperties("Page1", {BackgroundType= 0});
PHP Code:
wnx = Application.GetWndHandle();
result = DLL.CallFunction("AutoPlay\\Docs\\CHCOLOR.DLL", "SelectColor", wnx..","FFFFFF","HEX","192;;192;;192","FALSE"", DLL_RETURN_TYPE_STRING, DLL_CALL_STDCALL)
result = tonumber(String.TrimLeft(String.Left(result, String.Find(result, "::", 1, false)-1), "#"),16);
Application.SetPageProperties("Page1", {BackgroundColor = (result)});
الان اذا اردنا ان تتغير الخلفية بمجرد مرور الماووس على الصورة لتصبح هي هي خلفية البرنامج
اذا نستعدي ملف الصورة و نضعه في خلفية البرنامج
هذا الكود في On enter كل الصور التي وضعتها في صفحة البرنامج
PHP Code:
Application.SetPageProperties("Page1", {BackgroundType= 2});
Application.SetPageProperties("Page1", {ImageFilename = Image.GetFilename(this)})
كيف نجعل البرنامج يخير المستخدم في مجلد صور النظام الويندوز
اين نجد صور النظام في ملف الوبندوز في مجلد الويب في مجلد الخلفيات
نجعل كود يفتح المجلد و عندما يختار المستخدم صورة تصبح هي خلفية البرنامج
ضع هذا الكود في زر
PHP Code:
img = Dialog.FileBrowse(true, "أ‡أژأٹأ‘ أ-أ¦أ‘أ‰ ", "C:\\WINDOWS\\Web\\Wallpaper", "All Files (*.*)--*.*--", "", "jpg", false, false);
if (img[1] ~= "CANCEL") and (img[1] ~= nil) then
Application.SetPageProperties("Page1", {BackgroundType= 2});
Application.SetPageProperties("Page1", {ImageFilename = img[1]})
end
للمزيد من الفهم هذا ملف مفتوح يمكنكم الاستعانة به
التحميل :
*
او من المرفقات
--------------
تحياتي