Minimize و Maximize

[aleas2]

سلام خسته نباشید دوستان چطور با vb6 میشه یه برنامه دگه
Minimize و Maximize
کرد همینطور برنامه بالاتر از همه فرم ها قرار داد که زیر برنامه های دیگر نره؟

[meys34]

سوال اولتون اگر هندل اون پنجره رو داشته باشیم:


برای بستن تمامی پنجره ها من فکر میکنم راه حل آقای mpsoft بهترین راه حل و در توابع API که منظور شماست من چنین تابعی ندیده ام. اما یه تابع API فنی تر به نام ShowWindow وجود دارد که فرم را ماکزیمایز، مینیمایز و ری استور می کند.
برای این منظور عبارت زیر را در یک ماژول کپی کنید:


Public Declare Function ShowWindow Lib "User32" Alias "ShowWindow" (ByVal hwnd AS Long, ByVal
nCmdshow As Long) As Long


سپس کد زیر را در یک ‍Command بنویسید:



Dim rVal As Long
rVal=ShowWindow(Form1.hwnd,Ncmd)


لازم به ذکر است که به جای Ncmd باید یکی از اعداد 1(Restor) یا 2(Minimize) یا 3(Maximize) را قرار دهید.


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

اینجا خودتون یه کدی قرار دادید:
فرم بالاتر از همه فرم ها (http://barnamenevis.org/showthread.php?452852-%D9%81%D8%B1%D9%85-%D8%A8%D8%A7%D9%84%D8%A7%D8%AA%D8%B1-%D8%A7%D8%B2-%D9%87%D9%85%D9%87-%D9%81%D8%B1%D9%85-%D9%87%D8%A7)

که اگر هندل پنجره مورد نظر رو بذارید اون پنجره بالا تر ار همه پنجره ها میمونه...