如何捕捉滚动条事件，但又不能影响它正常工作。

[gyj_china]

我用了一个DBGrid控件显示数据，我想捕捉它的滚动条事件，但不能影响该控件正常工作，请问如何实现？附：今天是我朋友生日，但她出差了，我也希望你们也能祝她生日快乐：）我本想给200的，但这是技术区给不了，我会在非技术区给祝我女朋友生日快乐的朋友分的。

[runnerrunning]

哈哈

[jishiping]

重载DBGrid的消息处理函数就可以了。

class TForm1 : public TForm
{
__published: // IDE-managed Components
//......
TDBGrid *DBGrid1;
private: // User declarations
TWndMethod OldProc;
void __fastcall NewProc(TMessage &Message);
public: // User declarations
__fastcall TForm1(TComponent* Owner);
};

__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
OldProc = DBGrid1->WindowProc;
DBGrid1->WindowProc = NewProc;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::NewProc(TMessage &Message)
{
OldProc(Message);
if (Message.Msg==WM_VSCROLL) {
//添加你自己的处理代码
}
}

[solee]

又学到新东西了！

[hongliqiu]

JSP 果然厉害，收藏。