تعیین ابعاد فرم هنگام بازشدن [بایگانی]

AHMAD-AHMAD

چهارشنبه 09 اسفند 1385, 17:10 عصر

با سلام
چگونه میتوان دستوری ایجاد نمود که فرم هنگام باز شدن در ابعادی خاص باز شود و امکان تغییر ابعاد آن بوسیله اپراتور ممکن نباشد

Payam Moradi

چهارشنبه 09 اسفند 1385, 19:14 عصر

اول خاصیت Border Style فرم به Dialog تغییر بده.
بعد این کدها رو در روال Form_Load قرار بده. مقادیر برحسب پیکسل هستند که باید در 15 ضرب شده و Twip تبدیل شود:
به جای 400 رقم مورد نظر خودتون رو بگذارید.

Me.InsideWidth = 400 * 15
Me.InsideHeight = 400 * 15

موفق باشید:چشمک:

AHMAD-AHMAD

پنج شنبه 10 اسفند 1385, 08:01 صبح

اول خاصیت Border Style فرم به Dialog تغییر بده.
بعد این کدها رو در روال Form_Load قرار بده. مقادیر برحسب پیکسل هستند که باید در 15 ضرب شده و Twip تبدیل شود:
به جای 400 رقم مورد نظر خودتون رو بگذارید.

Me.InsideWidth = 400 * 15
Me.InsideHeight = 400 * 15

موفق باشید:چشمک:
دستور فوق را انجام دادم.
همیشه فرم در این ابعاد قرار نمیگیرد. مشکل اینجاست که با کلید کردن کلیدی در فرم a میخواهم فرم b با ابعاد بخصوصی باز شود . اگر ابعاد فرم a در حالت ماکزیمم باشد (باکمک دستور docmd.max) آنوقت فرم b نیز در حالت ماکزیمم باز میشود ولی در غیر اینصورت مطابق ابعاد داده شده سایز میشود . مشکل کجاست؟

Payam Moradi

پنج شنبه 10 اسفند 1385, 10:38 صبح

شما دو راه داری:
1- خصوصیت Popup فرم b رو به Yes تغییر بدی.
2- فرم رو به صورت دیالوگ باز کنی:

DoCmd.OpenForm "Form_b", acNormal, , , , acDialog

seeker

پنج شنبه 10 اسفند 1385, 14:13 عصر

البته فکر کنم جناب مرادی فراموش کردن بگن که خاصیت autoResize فرمت رو هم حتما باید No کنی