13-01-14, 01:10 AM
الأمر ليس بالصعب أخي ..
لكن سيتطلب منك الكثير من العمل ..
عليك أولا باقتناص الاجراء WndProc الخاص بالنافذة من أجل اقتناص رسائل النظام
ثم عليك أن تقوم باتقناص الرسالة WM_NCCALCSIZE : و تقوم بتصحيح قيم الطول و العرض الخاصة بال Border ,و ال Caption Bar
ثم الخطوة الموالية و هي اقتناص الحدث WM_NCPAINT لرسم ال Caption Bar , Border , و الأزرار Buttons ..
ثم اقتناص الحدث WM_NCHITTEST ..
ثم أحداث الماوس WM_NCLBUTTONDOWN ,WM_NCLBUTTONUP , ...
----------------------------------------------------------------------
لقد قمت منذ فترة بعمل SkinEngine لنوافذ و مكونات وينداوز :
المشروع مفتوح المصدر .. لكنه مبرمج بالكامل بدلفي ..
يمكنك الاستفادة من الأكواد ان أردت :
![[صورة مرفقة: themedsyscontrol-v1-5.png]](http://delphinews.files.wordpress.com/2013/11/themedsyscontrol-v1-5.png)
لكن سيتطلب منك الكثير من العمل ..
عليك أولا باقتناص الاجراء WndProc الخاص بالنافذة من أجل اقتناص رسائل النظام
ثم عليك أن تقوم باتقناص الرسالة WM_NCCALCSIZE : و تقوم بتصحيح قيم الطول و العرض الخاصة بال Border ,و ال Caption Bar
ثم الخطوة الموالية و هي اقتناص الحدث WM_NCPAINT لرسم ال Caption Bar , Border , و الأزرار Buttons ..
ثم اقتناص الحدث WM_NCHITTEST ..
ثم أحداث الماوس WM_NCLBUTTONDOWN ,WM_NCLBUTTONUP , ...
----------------------------------------------------------------------
لقد قمت منذ فترة بعمل SkinEngine لنوافذ و مكونات وينداوز :
المشروع مفتوح المصدر .. لكنه مبرمج بالكامل بدلفي ..
يمكنك الاستفادة من الأكواد ان أردت :
كود :
https://code.google.com/p/vcl-styles-utils/