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

بارك الله لك الاخ omran555

واسال الله ان يجعلة في موازين حسناتك

وكل عام وانتم بخير

:ty:

أشكر لكم مروركم أخوتي tarig020 و hema212006 وأتمنى أنكم أستفدتم منها

كود رائع وسهل

شكرا لك

تستاهل الشكر

اخي الفاضل عمران

السلام عليكم ورحمة الله وبركاته

لا اعتقد انك قمت بعملية البحث في المنتدى لأنه تم الإجابه على هذا السؤال هنا على هذا الرابط بتاريخ Sep 2 2007, 01:23 PM يعني له اكثر من سنه فهل بحثت في المنتدى ؟؟؟؟؟

/index.php?showtopic=137654

zahrah كتب:

اخي الفاضل ماجد

السلام عليكم ورحمة الله وبركاته

اولا راجع هذا الرابط لكي تستفيد من المعلومات التي فيه فيما يخص وحدات القياس

/index.php?showtopic=109804

بعد ان تتعرف على وحدات القياس تستطيع الآن الدخول الى الخاصية او الطريقة Move حيث انها تأخذ اربع قيم

الخاصية او الطريقة Move

expression.Move(Left, Top, Width, Height)

يمكن استخدام هذه الخاصية مع اي كائن من كائنات الأكسيس سواء كانت نماذج او مربعات نص او تسميات او اي كائن

لهذا عند استخدامها يجب ان نضع بدل التعبير expression احد هذه الكائنات مثل Form او TextBox او اي كان مطلوب تغيير موقعه او تكبيره او تصغيره .

Move : هي خاصية الحركة والإنتقال الى اين

Left يسار : هي مقدار البعد او المسافة مقدرا بالـ Twipsعن الحافة اليسرى من نافذة الأكسيس اذا كان نموذج او اذا كان مربع نص داخل نموذج وهذه القيمة مطلوبه فقد يكون مقدار المسافة صفر او 100 او اي رقم تختاره ليبتعد مسافة معينة عن الحافة اليسرى . وهو مطلوب ولا يمكن ان يترك فارغا .

Top اعلى : هي مقدار البعد او المسافة مقدرا بالـ Twipsعن الحافة العليا من نافذة الأكسيس اذا كان نموذج او اذا كان مربع نص داخل نموذج وهذه القيمة اختياريه فقد يكون مقدار المسافة صفر او 100 او اي رقم تختاره ليبتعد مسافة معينة عن الحافة العليا .

Width العرض : هو عرض الكائن المطلوب زيادة حجمه او تقليل حجمه في العرض ويكون مقدرا بالـ Twips

Height الإرتفاع : هو ارتفاع الكائن المطلوب زيادة ارتفاعه او تقليل ارتفاعه في الطول ويكون مقدرا بالـ Twips

مثال على هذه الخاصية

نريد ان يتم عرض النموذج اعتبارا من الحافة اليسرى من نافذة الأكسيس بمقدار Twips 100 وبمقدار 200 Twips من الحافة العليا لنافذة الأكسيس ويكون عرضه 4500 Twips وارتفاعه 6000 Twips اذا نستخدم الخاصية بهذا الشكل

Forms(0).Move  Left:=100, Top:=200, Width:=4500, Height:=6000

حيث Forms(0) تعني اول نموذج بصرف النظر عن اسمه في كائنات النماذج اما النموذج الثاني فيأخذ Forms(1)

اما اذا كان مربع نص فإننا نشير مباشرة الى اسم مربع النص مثال

لنفرض اننا نريد تحريك مربع النص من موقعه الحالي الى موقع آخر في النموذج مع زيادة حجمه فيكون بهذه الطريقة :

Me.TextName.Move  Left:=800, Top:=2000, Width:=1000, Height:=500

لابد ان تفرق بين Left و Top فهي خاصة بإزاحة هذا الكائن عن الحافة اما Width و Height فهي لزيادة حجم عرض وطول الكائن

التحكم في ارتفاع وعرض النموذج

/index.php?showtopic=56167

عبدالمانع كتب:

طريقة تحديد حجم النموذج من ناحية الارتفاع والعرض بواسطة الكود

يتم وضع هذا الكود في حدث (عند الفتح) الخاص بالنموذج

أو في أي حدث ترغب فيه انت

'التحكم في ارتفاع النموذج.. يتم التغيير في الرقم فقط إلى الحجم المرغوب فيه
Me.Form.InsideHeight = 4150

'التحكم في عرض النموذج.. يتم التغيير في الرقم فقط إلى الحجم المرغوب فيه
Me.Form.InsideWidth = 8070

حسنا دعنا من المنتدى فقد يكون انك لم تعرف طريقة البحث في المنتدى ولكن يوجد في تعليمات برنامج الأكسيس الشرح الكامل لهذه الدالة Move فهل بحثت في تعليمات الأكسيس ؟؟؟؟

إن اكثر ما يحزننا ان العضو عندما يكتب مشاركته انه يقوم بكتابة بعض الكلمات التي تحز في النفس مثل " لقد بحثت وسألت كل العالم وجميع الكواكب والأقمار الصناعية ولم اجد اجابه على سؤالي ولكن اتيت لكم بالحل فتفضلوا "

على اقل تقدير قم بعملية البحث في المنتدى لأن مثل هذه الأسئلة الخاصة بالمبتدأين اجاباتها موجوده وبالشرح التفصيلي وهي لا تحتاج ايضا شروحات .

عموما مشكور على وضع هذه المشاركه

أختي العزيزة زهرة

أستاذتي الفاضلة

إنك تسبحي في فضاء عالي من العلم والمعرفة وبقدرة عالية على الفهم والادراك وعندما نعرض نحن بعض الأفكار البسيطة والساذجة أحيانا ( على الأقل في نظرك ونظر من يكافيك في العلم) فإن ذلك يأتي من فرحتنا في معرفة ما نعرضه لأننا ذقنا الأمرين على بال ما توصلنا إليه وفي الحقيقة لم يخطر ببالي أن يكون أمر move هو لتغيير الـ Top & Left إنما كنت أظن أنه يتم ذلك كما في الفيجوال بيسك بالأمر Top = 234 فقط كما إنني لا أعرف كيف أبحث عن شئ لا أعلم حتى كيف أعبر عنه إلا بلغتي العربية .

على كل أنتي أستاذتنا ومعلمتنا فأرجو أن تصفحي عني لتطاولي في تكرار ما سبق أن كتب وعذري في ذلك أنني أحببت مشاركة أخوتي أعضاء المنتدى الذين لا زالوا في خطواتهم الأولى فرحتي فيما توصلت إليه بعد طول عناء.

بارك الله بك اخي الكريم عمران

على هذه الروح الطيبه وتأكد تماما اننا لا نحمل لأعضاء المنتدى إلا كل خير إن شاء الله

ولا يوجد شيء من قبلكم يدعو للإعتذار فأنت اولا واخيرا أخ لنا في المنتدى ولك منا كل الإحترام والتقدير

أشكرك أختي العزيزة وهذا من طيب أصلك وأرجو أن تكوني رحيمة بنا فكلمة ترفعنا وكلمة تنزلنا مثل الطفل الذي يتعلم المشي فعندما نشجعه يزيد في المشي ولو ضحكنا عليه ونهرناه يتلعثم ويتعثر

باركك الله ودمت