تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
::: Disable a windows themes for controls ::: شئ عجيب
#1
كاتب الموضوع : BADRMEDIA



عندما تصمم برنامج على ويندوز 98 وتأخذ الأدوات شكل أدوات ويندوز 98 ربنا يستر

لو شغلنا هذا البرنامج على ويندوز فيستا ستأخذ الأدوات شكل ويندوز فيستا شئ جميل

لكن ماذا لو هذا الجمال لا يعجبك وكنت تريد ارجاع شكل الأداة للشكل

هل ممكن تحتاج ذلك

نعم ربما تحتاج ذلك لو أردت تغيير شكل الأداة لشكل خاص بك وتقوم بعملية override لها


ببساطة أضف فضاء الاسم
Name Space


كود :
[color=#000000][COLOR=#0000bb]Imports System[/color][color=#007700].[/color][color=#0000bb]Runtime[/color][color=#007700].[/color][COLOR=#0000bb]InteropServices  
[/COLOR][/COLOR]


وضع هذه الدالة في مشروعك

vb.net


كود :
[color=#000000][COLOR=#0000bb][/color][color=#007700]<[/color][color=#0000bb]DllImport[/color][color=#007700]([/color][color=#dd0000]"uxtheme.dll"[/color][color=#007700], [/color][color=#0000bb]CharSet[/color][color=#007700]:=[/color][color=#0000bb]CharSet[/color][color=#007700].[/color][color=#0000bb]Unicode[/color][color=#007700], [/color][color=#0000bb]ExactSpelling[/color][color=#007700]:=[/color][color=#0000bb]True[/color][color=#007700])> Private [/color][color=#0000bb]Shared [/color][color=#007700]Function [/color][color=#0000bb]SetWindowTheme[/color][color=#007700]([/color][color=#0000bb]ByVal hWnd [/color][color=#007700]As [/color][color=#0000bb]IntPtr[/color][color=#007700], [/color][color=#0000bb]ByVal appName [/color][color=#007700]As [/color][color=#0000bb]String[/color][color=#007700], [/color][color=#0000bb]ByVal partList [/color][color=#007700]As [/color][color=#0000bb]String[/color][color=#007700]) As [/color][COLOR=#0000bb]Integer

    End [/COLOR][COLOR=#007700]Function  
[/COLOR][color=#0000bb][/color][/COLOR]
C#

كود :
[color=#000000][COLOR=#0000bb] [/color][color=#007700][[/color][color=#0000bb]DllImport[/color][color=#007700]([/color][color=#dd0000]"uxtheme.dll"[/color][color=#007700], [/color][color=#0000bb]CharSet [/color][color=#007700]= [/color][color=#0000bb]CharSet[/color][color=#007700].[/color][color=#0000bb]Unicode[/color][color=#007700], [/color][color=#0000bb]ExactSpelling [/color][color=#007700]= [/color][color=#0000bb]true[/color][COLOR=#007700])]

        private static [/COLOR][color=#0000bb]extern int SetWindowTheme[/color][color=#007700]([/color][color=#0000bb]IntPtr hWnd[/color][color=#007700], [/color][color=#0000bb]string appName[/color][color=#007700], [/color][color=#0000bb]string partList[/color][COLOR=#007700]);  
[/COLOR][color=#0000bb][/color][/COLOR]


ومرر لها أي أداة تريد عقابها بسحب الجمال عنها

مثال أداة MonthCalendar

vb.net

كود :
[color=#000000][COLOR=#0000bb]  SetWindowTheme[/color][color=#007700]([/color][color=#0000bb]MonthCalendar1[/color][color=#007700].[/color][color=#0000bb]Handle[/color][color=#007700], [/color][color=#0000bb]String[/color][color=#007700].Empty, [/color][color=#0000bb]String[/color][COLOR=#007700].Empty)  
[/COLOR][color=#0000bb][/color][/COLOR]

c#


كود :
[color=#000000][COLOR=#0000bb]SetWindowTheme[/color][color=#007700]([/color][color=#0000bb]monthCalendar1[/color][color=#007700].[/color][color=#0000bb]Handle[/color][color=#007700], [/color][color=#0000bb]string[/color][color=#007700].Empty, [/color][color=#0000bb]string[/color][COLOR=#007700].Empty);  
[/COLOR][color=#0000bb][/color][/COLOR]


والله ولي التوفيق




}}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  معلومة :: الحصول على الـForms الموجودة في المشروع في هيئة System.Windows.Forms.Form Aly El-Haddad 2 978 12-11-12, 02:22 PM
آخر رد: samielkholy
  مكتبة أكواد التطوير على منصات ال Windows Mobile RaggiTech 0 365 17-10-12, 06:49 PM
آخر رد: RaggiTech
  ادارة خدمات الويندوز Windows Services المثبة RaggiTech 0 308 17-10-12, 05:53 PM
آخر رد: RaggiTech
  Windows Authentication RaggiTech 0 369 17-10-12, 05:50 PM
آخر رد: RaggiTech
  النسخ و اللصق من النص الي Windows Clipboard RaggiTech 0 260 17-10-12, 05:03 PM
آخر رد: RaggiTech
  التعامل مع ال Windows Services RaggiTech 0 327 17-10-12, 05:00 PM
آخر رد: RaggiTech

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم