غير فعال كردن Scroll در كمبوباكس

[YkA1363]

سلام به همه اساتيد گرامي
داخل فرم تعدادي كمبوباكس دارم كه وقتي يكيشون انتخاب شده باشه با چرخاندن Scroll موس گزينه هاي كمبوباكس تغيير مي كنه مي خوام اين حالت رو غير فعال كنم لطفا راهنمايي كنيد.ممنون

[khoshblagh]

اگر تعداد ردیفهای کامبو را به تعداد آیتم های آن تغییر دهید دیگر اسکرول نمایش داده نمیشود

[یوسف زالی]

ایشون می خواد اسکرول با ماوس تریگر نشه.
باید پیغام های رسیده شده رو به یکی از روشهایی که باهاش راحت ترید مدیریت کنید.

[ariobarzan]

سلام
کسی برای این موضوع راه حلی پیشنهاد نداره ؟
مدیریت پیامهای رسیده چطور باید انجام بشه؟

[tiphooo]

اگر میخواید برای کل کمبوباکس های فرم این اتفاق بیفته در رویداد OnMouseWheel فرمی که کمبوباکس ها روی آن قرار دارند کد زیر را بنویسید

 if (Screen.ActiveControl is TComboBox )  then

    Handled := True;

اگر هم فقط یک یا چند کمبوباکس خاص مد نظر هست کد زیر (مثلا اسم کمبوباکس شما ComboBox1 هست)

 if (Screen.ActiveControl =ComboBox1 )  then

    Handled := True;