دستوری برای minimized کردن کل پروژه برای یک botton

[Sheerkoshan]

برای اینکه کل پروژه با کلیک یک دگمه بروی یک فرم minimized شود کدام کد لازم است ؟ ‌(بدون استفاده از کنترل باکس خود access window)

[haddadi2]

این دستور را در رخداد on click تایپ کن DoCmd.Minimize
و یا اینکه یک ماکرو درست کن و درون ماکرو این دستور را بنویس minimize سپس در رخداد onclik اسم ماکرو را بنویس

[sarami]

اگه منظورتون اینه که کل پروژه تون Minimize بشه با استفاده از این کد میتونین این کار رو بکنین
Const SW_Minimize = 6
Private Declare Function ShowWindow Lib "user32" (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long
Private Sub cmdMinimize_Click()
ShowWindow Application.hWndAccessApp, SW_Minimize
End Sub
فکر کنم به فایل ضمیمه یه نگاه بندازین متوجه می شین

[Sheerkoshan]

Saramiی عزیز بسیار متشکرم همینو می خواستم یه مشکل کوچولو فقط موقع برگشتش دارم اونم اینه که فرمی که maximized و popup بوده (روی کل اکسس رو می پوشونده) موقع برگشتش اون حالت تعریف شده رو نداره و بصورت نورمال نمایش داده می شه و بجای اون فرم پنجره اصلی اکسس PopUp می شه

[sarami]

تو event مربوط به onload فرم اصلی که popup هستش docmd.maximize رو قرار بده

[Sheerkoshan]

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

[Sheerkoshan]

دوست با صفا
هرچه به نظرم رسید انجام دادم ولی نشد هنوز اون مشکل بر جای خود باقیست

[sarami]

متاسفانه pc من مشکل پیدا کرده در اسرع وقت یه نگاهی به فایلتون میندازم

[Sheerkoshan]

سپاسگزارم
منتظر می مونم در ضمن یه تاپیک جدید دارم با دو سؤال حتماً مثل همیشه مورد لطف و عنایت قرار دهید . امیدوارم همیشه سلامت و پایدار باشید

[sarami]

برای رفع شدن مشکل اولتون قبل از این کد که در event مربوط به onclick command هستش
ShowWindow Application.hWndAccessApp, SW_Minimize
قبل از این کد کد زیر را هم قرار دهید مشکلتون حل خواهد شد
showwindows me.hwnd, sw_minimize
در مورد نام خانوادگی هم من صارمی هستم.

[Sheerkoshan]

دوست من اولا عذر خواهی میکنم بابت ناشیگری که انجام دادم

بعدهم اینکه متاسفانه Error می دهد

از اینکه وقتتون رو گرفتم شرمنده ام صارمی عزیز

[sarami]

خواهش فکر نمیکنم نیازی به عذر خواهی باشه
error هم مربوز به اضافی بودن حرف s در انتهای window هستش که متاسفانه بنده اضافی تایپ کرده بودم

[Sheerkoshan]

دوست من ، نشد یه نگاه بنداز . می خوام که فرم1 که روی اکسس رور می پوشونده وقتی restore می شه بازم فرم یک روی اکسس رو بپوشونه

[sarami]

من دلیل داشتن دو تا فرم رو ندونستم بنابراین یکی کردم و جواب داد اگه با این مشلتون حل نشد سعی میکنم راه حل دیگه ای براتون پیدا کنم

[Sheerkoshan]

فرمی که روی اکسس را می پوشاند منو اصلی است که بر روی آن فرمهای دیگری باز می شود . حال گاهی در وسط کار مجبور می شویم به محیط دیگر ویندوز وارد شویم و دوباره بازگردیم این minimize یا maximize را می خواهم روی پر استفاده ترین فرمها قرار دهم که مجبور نباشم از برنامه کاملاً خارج شوم
باتشکر از الطفات حضرتعالی