在 Codegear C++ Builder 中,我尝试扩展 TMemo VCL 类以在 OnKeyDown 事件期间执行某些功能。我已经设置了该控件并能够将其添加到表单等中。问题是我无法捕获 OnKeyDown 事件(或任何其他事件)。
这是我的课:
class PACKAGE TREMemoFind : public TMemo
{
private:
TFindDialog *FindDialog;
protected:
void __fastcall MemoKeyDown(TObject *Sender, WORD &Key, TShiftState Shift);
public:
__fastcall TREMemoFind(TComponent* Owner);
__published:
};
__fastcall TREMemoFind::TREMemoFind(TComponent* Owner) : TMemo(Owner)
{
ScrollBars = ssVertical;
OnKeyDown = MemoKeyDown;
}
void __fastcall TREMemoFind::MemoKeyDown(TObject *Sender, WORD &Key, TShiftState Shift)
{
ShowMessage("It worked!");
}
所以,我想我的问题是:如何设置从 VCL 类派生的类,以便在某个事件触发时执行自定义功能?
组件将处理程序分配给自己的事件并不是一个好主意。这可以防止外部代码使用相同的事件,或者更糟糕的是用自己的事件覆盖您的分配,这样您的自定义代码就不再运行。相反,您应该做的是重写虚拟 KeyDown() 方法,即:
class PACKAGE TREMemoFind : public TMemo
{
protected:
virtual void __fastcall KeyDown(WORD &Key, TShiftState Shift);
public:
__fastcall TREMemoFind(TComponent* Owner);
};
__fastcall TREMemoFind::TREMemoFind(TComponent* Owner) : TMemo(Owner)
{
ScrollBars = ssVertical;
}
void __fastcall TREMemoFind::KeyDown(WORD &Key, TShiftState Shift)
{
ShowMessage("It worked!");
TMemo::KeyDown(Key, Shift); // fire public OnKeyDown event
}
您在为事件分配函数的地址时犯了错误。
__fastcall TREMemoFind::TREMemoFind(TComponent* Owner) : TMemo(Owner)
{
ScrollBars = ssVertical;
OnKeyDown = &MemoKeyDown;
}