比较菜的问题:如何捕捉鼠标滚轮动作?? 在程序中捕捉鼠标滚轮向前向后的动作,请教大家了?? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 procedure TForm1.MessageEvent (var Msg: TMsg; var Handled: Boolean);begin if Msg.message = WM_MOUSEWHEEL then begin //在这里添加你的代码 Handled:=True; end;end;procedure TForm1.FormCreate(Sender: TObject);begin application.OnMessage:=MessageEvent;end; OnMouseWheelOnMouseWheelUpOnMouseWheelDown 请问如何将100拆成几个数? 《娘,大哥他回来了!》 新手提问 求一图形控件,有那位知道请告诉小弟,不胜感激!(在线等待!!!) 去哪里能下载到《Delphi网络高级编程》电子书 请问一下!!!! 在delhpi中有没有像Object inpector一样的控件 Borland中国 调查贴 FastReport怎样画折线(对角线)? delphi中ComponentCount是什么属性? delphi基础发问... 安装的teechart怎么不全啊
begin
if Msg.message = WM_MOUSEWHEEL then
begin
//在这里添加你的代码
Handled:=True;
end;
end;procedure TForm1.FormCreate(Sender: TObject);
begin
application.OnMessage:=MessageEvent;
end;
OnMouseWheelUp
OnMouseWheelDown