المطلوب عند فتح ملف الآكسس يقوم الكود بضبط مقاسات الشاشة حسب حجم النموذج ، مثلا عندى لابتوب شاشة كبيرة ولكن عندما يفتح على شاشة أصغر لا يظهر باقي النوذج وبعض
ضبط حجم الشاشة حسب حجم النموذج
يا اخوان فكرة الفلسكرين هذه موروثة من ايام الدوز قبل ان يظهر نظام النوافذ ، ومبرمجي الفوكس برو المخضرمين معتادين عليها ، وحتى عندما يعملون على الاكسس يحاولون جعله ملء الشاشة ، برأيي هذه الفكرة سقيمة ، اعطوا مدخل البيانات الحرية واجعلوها نافذة عادية بمقاسات مقبولة ضمن الشاشة مع خيار minimize .
abubasilalraqi كتب:يا اخوان فكرة الفلسكرين هذه موروثة من ايام الدوز قبل ان يظهر نظام النوافذ ، ومبرمجي الفوكس برو المخضرمين معتادين عليها ، وحتى عندما يعملون على الاكسس يحاولون جعله ملء الشاشة ، برأيي هذه الفكرة سقيمة ، اعطوا مدخل البيانات الحرية واجعلوها نافذة عادية بمقاسات مقبولة ضمن الشاشة مع خيار minimize .
أخي الفاضل أنا حالياً أعمل علي شاشة 17 مربعة وقمت بتصميم برنامج عليها ثم نقلت البرنامج علي جهاز آخر شاشتة 17 مستطيلة . وجدت أن بيانات النموذج معظمها لا يظهر وشكل النموذج غير مرغوب به . فما الحل
هناك فكرة :
شوف كل أبعاد الشاشة المتاحة على جهازك واختر منها ما هو منتشر في الأجهزة الأخرى
مثلا : 1024*768 أو 1280*800 أو خلافه
وصمم نماذج برنامجك على هذه الأبعاد بحيث يملأ الشاشة
ثم ضع كود في بداية تشغيل البرنامج يقوم بتخزين اعدادات الشاشة الحالية
ثم يقوم بتغييرها إلى الاعدادات التي صممت عليها البرنامج
وعند الغلق يقوم باستعادة الابعاد الأصلية لنظام التشغيل.
هذه الفكرة قريبة لفكرة قامت بتصميمها استاذتنا زهرة
وللتوضيح اكثر تقوم باستيراد الوحدات النمطية الى برنامجك ثم تقوم بكتابة الكود التي في حدث عند الفتح للنموذج
Set frmResize = New FormResize
Set frmResize.Form = Me
وسوف تتغير حجم النموذج حسب مقاس الشاشة اي كان نوعها او حجمها تقبل خالص تحياتي
واعتقد يجب ان يكون عنوان السؤال ضبط حجم النموذج حسب قياس او حجم الشاشة وليس العكس . والله الموفق
تفضل هذا المثال الرائع جدا
ما من كاتبٍ إلا سيفنى ... ويبقي الدهر ما كتبت يداه
فلا تكتب بخطك غير شيءٍ ... يسرك في القيامة أن تراه
مواضيع مفيدة