السلام عليكم ورحمه الله وبركاته
اخواني هذا مثال جميل لتعديل مقاسات مربعات النص و التسميات و الازرار ....الخ حسب مقاس شاشه الجهاز
في المثال يوجد
وحدات نمطية للفئة
عدد 5 يتم استيرادها لاي مشروع لديك
ثم في النماذج الرئيسية لديك تكتب التعليمات التاليه في حدث عند الفتح
فقط النماذج الرئيسيه يعني لا تضع الكود في نموذج فرعي موجود في رئيسي
كود:
Set frmResize = New FormResize
Set frmResize.Form = Meو تجرب فتح المشروع على اي جهاز يختلف حجم الشاشه فيه عن الاخر
وهذه بعض الصور
اما الملف الثاني فقط وحده نمطيه مع كودين في النموذج واحد على مستوي النموذج عباره عن متغيرات و الثاني في زر الامر الخاص بالتكبير
الامثلة المعروضة بالمرفقات