بسم الله الرحمن الرحيم

 Fix120DPI

لمحة عن المكتبة :
بعد تعديل حجم نصوص نظام ويندوز إلى 120 نقطة نلاحظ أحيانا تغيير في شكل البرامج من أحجام صناديق النصوص و نافذة البرنامج و غيرها . تعيد المكتبة المرفقة شكل النوافذ و الأزرار و الصناديق إلى ما كانت عليه قبل تعديل حجم النصوص إلى 120 نقطة في الإنش إي لحالة 96 نقطة في الإنش

- طريقة الاستخدام :

للمكتبة دالتي إدخال
1 - fixone تعديل عنصر واحد
2 - fixall تعديل عدة عناصر في نموذج

بعد إضافة المكتبة إلى references
يتم استغلالها على الشكل التالي

Dim fit As New Fix120DPi.loader
'تعديل حجم عنصر معين
 (اسم العنصر) fit.fixone
' تعديل جميع العناصر الموجودة في نموذج
 (اسم النموذج) fit.fixall
Set fit = Nothing

المكتبة مجانية و التحميل من هنا