انیمیشنی کردن پنجره ها توسط api

[mehran_337]

تابع animatewindow در user32.dll دیدم که باعث می شود هم فرم و اشیاداخل آن با افکتهای جالبی به نمایش درآیند. نمونه کدهای فراوانی هم به زبانهای مختلف بغیر از فاکس وجود دارد .
از دوستان کسی می تواند این کدها را به فاکس تبدیل کند ؟

نمونه کد 1 :
http://vblog.persianblog.ir/post/78/%D8%AA%D8%A7%D8%A8%D8%B9_AnimateWindow%E2%80%8C_(% D8%A7%D9%81%D9%83%D8%AA_%D8%B1%D9%88%D9%8A_%D9%BE% D9%86%D8%AC%D8%B1%D9%87_%D9%87%D8%A7)


نمونه کد 2 :
http://forum.iranled.com/showthread.php?tid=9469

[binyaz2003]

سلام چند سال پيش يک مثال کامل با حدود فکر کنم 20 حالت رو داشتم هرچه گشتم پيداش نکردم خودم تبديلش کردم.
2تا نکته داره
1-مقادير هگز رو ميتونيد در جايي مثل http://www.easycalculation.com/hex-converter.php به دسيمال تبديل ککنيد و استفاده کنيد.
2-اين تابع بايد در متد load فرم صدا زده بشه.
کد:

#Define AW_HOR_NEGATIVE 1
Declare AnimateWindow In user32 Long , Long , Long
AnimateWindow(ThisForm.HWnd,500,AW_HOR_NEGATIVE)

[mehran_337]

جناب حسین زاده با تشکر

1 - در مورد مقادیر دیگر هم راهنمایی بفرمایید مثلا مقداری را 0AW_HOR_NEGATIV
برابر با h8& نوشته . آیا منظور این است که این مقدار را در فاکس باید تبدیل 8 در مبنای 16 به مبنای ده انجام دهیم؟
2 - در جایی دیدم که بجای هندل فرم می توانید از هندل آبجکت های داخل فرم نیز استفاده کنیم در این زمینه نیز راهنمایی فرمائید.

3 - چنانچه دوستان دیگر در زمینه افکت گذاری روی فرم و یا اشیا تجربیاتی دارند بفرمایند تا استفاده کنیم.
مثلا آیا ممکن است هنگام فراخوانی فرم دیگر امکان ورق خوردن فرم وجود داشته باشد و امثالهم ..

[kia1349]

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

[binyaz2003]

کلا ثابتهايي که در ويژوال بيسيک با h& شروع ميشوند بصورت هگز هستند که شما بايد معادل دسيمال انها را در فاکس بنويسيد که در لينک بالا مبدلش هست
فکر نکنم اشيا فاکس داراي هندل باشند اما اشيا ActiveX مثل Tree داراي هندل هستند ميتونيد اون رو پاس بديد
راه ديگه اي نديدم تنها يک fade in و fade out هست که ميتونيد خودتون بنويسيد افکتهايي مثل کامپوننتهاي دلفي مخصوصا نيست براي فاکس