انتقال كنترل هاي close ، mininmize و maximize فرم از سمت راست به سمت چپ

[nazanin_90]

با سلام
در نمونه ضميمه با كد هاي نوشته شده كنترل هاي close ، mininmize و maximize فرم از سمت راست به سمت چپ منتقل ميشود اما نميدانم چرا وقتي اندازه فرم بزرگتر ميشود فوكوس بر روي كنترل هاي فرم غير فعال ميشود و حتي در اندازه فعلي فرم هم فوكوس بر روي كمند باتن close غير فعال ميشود .
با تشكر

[banitaba.ommolketab]

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



موفق باشید

[abas1388]

با سلام
در نمونه ضميمه با كد هاي نوشته شده كنترل هاي close ، mininmize و maximize فرم از سمت راست به سمت چپ منتقل ميشود اما نميدانم چرا وقتي اندازه فرم بزرگتر ميشود فوكوس بر روي كنترل هاي فرم غير فعال ميشود و حتي در اندازه فعلي فرم هم فوكوس بر روي كمند باتن close غير فعال ميشود .
با تشكر
سلام
عجیبه !این تابع درمحیط وبی بدون هیچ ایرادی جواب میده

[abas1388]

با سلام
در نمونه ضميمه با كد هاي نوشته شده كنترل هاي close ، mininmize و maximize فرم از سمت راست به سمت چپ منتقل ميشود اما نميدانم چرا وقتي اندازه فرم بزرگتر ميشود فوكوس بر روي كنترل هاي فرم غير فعال ميشود و حتي در اندازه فعلي فرم هم فوكوس بر روي كمند باتن close غير فعال ميشود .
با تشكر
سلام
ظاهراً بزرگتر شدن فرم باعث عدم فوكوس نميشود بلكه راست چين شدن فرم با روش فوق باعث ميشود مختصات فرم و كليه اشياءمربوطه بر روي فرم به سمت راست منتقل شوند ولي از آنجائيكه اشياء بر روي فرم داراي هندل نيستند مختصات به سمت نقطه متناظر منتقل ميشود بدون اينكه خود شي( كنترل) به سمت نقطه متناظر منتقل شود .اگر نمونه ضميمه را مشاهده كنيد اين حالتي كه عرض كردم مشخص است . ولي راستش راهكاري كه بتوان بر روي كنترل بتوان فوكوس كرد را نميدانم و نياز به يه مقداري كد نويسي دارد كه از عهده دوستان حرفه اي بر مي آيد.
موفق باشيد

[nazanin_90]

به نام خدا
با سلام کد را بصورت ذیل تغییر بدهید
SetWindowLong Me.hwnd, GWL_EXSTYLE, GetWindowLong(Me.hwnd, GWL_EXSTYLE)
یعنی Or WS_EX_LAYOUTRTL اینجا کاربرد ندارد و باعث زحمت است
سلام
اين كد چه كاري انجام ميده؟!
بدون اين كد هم فوكوس بر روي كمند باتن انجام ميشود . مهم اين است كه با راست چين شدن فرم (انتقال كنترل هاي ذكر شده به سمت راست) فوكوس در محل واقعي كمند باتن صورت بگيرد.
با تشكر