L leadyli Unregistered / Unconfirmed GUEST, unregistred user! 2005-07-04 #5 這樣吧,放一個TApplicationEvents用來攔截消息: procedure TForm1.ApplicationEvents1Message(var Msg: tagMSG; var Handled: Boolean); begin if ActiveControl is TComboBox then if Msg.message = WM_MOUSEWHEEL then Handled := True; end;
這樣吧,放一個TApplicationEvents用來攔截消息: procedure TForm1.ApplicationEvents1Message(var Msg: tagMSG; var Handled: Boolean); begin if ActiveControl is TComboBox then if Msg.message = WM_MOUSEWHEEL then Handled := True; end;