درخواست راهنمایی: تشخیص Scroll ماوس در وی بی

[mojtabamalaekeh]

کسی کار با Scroll Bar تو VB 6 رو بلده؟
یادمه قبلا یه برنامه بود این کار رو می کرد ولی اون موقع وی بی کار نمی کردم و قدرش رو نمی دونستم و از دستش دادم.

[Nothing]

با سلام.
این دو تا رو خودمم درست حسابی نخوندم ولی فکر کنم به دردت بخوره.
http://support.microsoft.com/kb/837910
http://support.microsoft.com/kb/278379

[mojtabamalaekeh]

خیلی ممنونم
فکر کنم لینک دوم کارم رو راه بندازه
ویرایش شد:
کاری نتونستم بکنم. شما کمک کنید.
چرخش ScrollBar رو تشخیص میده ولی جهت چرخش رو نه!!!
راستی اگه پروژه ی فایل پیوست مشکل داشت باید فایل MouseWheel.dll رو به References پروژه اضافه کنید.

[zacaria]

آقا مجتبي توي سايت هست، قبلا ديدم، بگرد پيدا مي كني

[sepehrEZ]

سلام.
ببين اين سورس بدردت مي خوره ؟
Pass : escada.blogfa.com

http://www.geocities.com/escada.blogfa/Mouse.zip

[ajlajlajl]

ببین این بدردت میخوره؟ (همون فایلهای خودته)

[mojtabamalaekeh]

آقا مجتبي توي سايت هست، قبلا ديدم، بگرد پيدا مي كني

گفتم که قبلا دانلود کردم ولی الان هر چی میگردم نمی تونم پیدا کنم.

ببين اين سورس بدردت مي خوره ؟
Pass : escada.blogfa.com

ظاهرا فایل آرشیو خرابه

ببین این بدردت میخوره؟ (همون فایلهای خودته)

فعلا که میگه:

کد:

Run-time error '429':
ActiveX component can't create object

اما اگه شما تست کردی و جواب داده حتما درسته منم روش کار می کنم شاید خطا نداد. اما یک نکته: بجای استفاده از DLL از Class Module استفاده کردم ولی نتونستم برنامه رو خط به خط اجرا کنم.

[mojtabamalaekeh]

یه تشکر به Nothing و ajlajlajl بدهکار شدم. واقعا ممنون.
dll رو Reload کردم Error 429 حل شد. دمت گرم. میشه یه توضیح بدی مقدار پارامتر dir از کجا بدست میاد؟
راستی بجای dll از ClassModule استفاده کنیم بهتر نیست به نظر شما؟ دیگه مشکل Load کردن و از دست دادن مسیر فایل رو نداره.
جواب آخر رو میتونید دانلود کنید

[ajlajlajl]

این دیگه گردن خودت. به هر روشی که دوست داری باهاش کار کن.
در مورد پاامتر dir هم .
رفتم جایی که رویداد MouseWheel رو فراخوانی میکرد (تابع FireMouseWheel) . تابع FireMouseWheel هم دو تا پارامتر میگرفت. دوتاشو چک کردم دیدم که یکیش نسبت به جهت چرخش مثبت و منفی میشه. خب منم یه خرده رویداد MouseWheel رو تغییر دادم. همین.