محل قرار گیری فرم در صفحه مانیتور

[G.hemati]

با سلام خدمت تمامی اساتید و دوستان گرامی

از کد زیر برای محل قرار گیری فرم در صفحه مانیتور استفاده میکنم . به صورتی که طول و عرض و ارتفاع فرم رو از گوشه بالای سمت چپ مانیتور محاسبه میکنه


DoCmd.MoveSize 170, 910, 12660, 9550

حالا سئوال : آیا میشه این مختصات رو به جای گوشه مانیتور از گوشه فرم اصلی برنامه محاسبه کنه .

یعنی ما اگه فرمی بنام FrmMain داریم برای باز شدن فرمهای دیگر مختصات رو از گوشه FrmMain محاسبه کنه

ممنون

[G.hemati]

دوستان گرامی
آیا راهی وجود داره؟؟؟؟

[RESMAILY]

به نام خدا
با سلام. منظور از فرم اصلی برنامه چیست؟
این مختصات به نسبت صفحه اصلی یا MDI خود آکسس است. برای قرارداد فرم در هرنقطه کافی است مختصات آن نقطه را بدانید(طبعا!) پس اگر بدانید فرم مورد نظر در چه مختصاتی (Top - Left) قرار دارد. مشکل حل میشود. که این مختصات را برنامه میداند و شما باید به آن ارجاع بدهید. یعنی بجای عدد Top آدرس آن را بدهید
strFormName.WindowTop و غیره.

[G.hemati]

با سلام و ممنون از راهنمایی که فرمودین

من در فایل پیوست توضیح دادم ممنون میشم ملاحضه بفرمایین

[alirezabahrami]

با سلام و ممنون از راهنمایی که فرمودین

من در فایل پیوست توضیح دادم ممنون میشم ملاحضه بفرمایین

سلام

ازکد زیر استفاده کن!
یا علی


DoCmd.OpenForm "Form1"
Form_Form1.Move Me.WindowLeft, Me.WindowTop, Me.WindowWidth, Me.WindowHeight

[G.hemati]

ممنون از راهنماییتون استاد بهرامی عزیز
اگه بخوایم از هر طرف به اندازه 1 سانت کوچکتر از فرم اصلی باشه ، چه کدی رو باید استفاده کرد

[alirezabahrami]

ممنون از راهنماییتون استاد بهرامی عزیز
اگه بخوایم از هر طرف به اندازه 1 سانت کوچکتر از فرم اصلی باشه ، چه کدی رو باید استفاده کرد
سلام

در کد فوق مثلاً 500 به Me.WindowLeft و Me.WindowTop اضافه کن و دوبرابر این مقدار را از Me.WindowWidth و Me.WindowHeight کم کن !

اینمقدار را می توانید کم و زیاد کنید تا به اندازه دلخواه خود برسید .


Form_Form1.Move Me.WindowLeft + 500, Me.WindowTop + 500, Me.WindowWidth - 1000, Me.WindowHeight - 1000




یا علی

[G.hemati]

ممنونم استاد خدا خیرتون بده

مثل همیشه مختصر و مفید