怎样截获VCL组件的子组件的事件

Rayman 2000-03-20 09:36:00
求教各位高手:我写了一个VCL组件,是从TScrollBox派生的,在其中用new方法创建了一个TImage组件,可发现我无法获得TImage组件的鼠标事件!在放置这个组件的Form上我可以知道TScrollBox的事件,可当鼠标在TImage上时却什么也得不到!BCB的开发资料太少了,我试着在VCL组件的消息循环中,在Form表单的消息循环中,在Form的WndProc函数中写代码,却都截获不了这个消息.请各位不吝赐教.
...全文
145 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
Rayman 2000-03-21
  • 打赏
  • 举报
回复
我解决这个问题了,多谢!
ahao 2000-03-21
  • 打赏
  • 举报
回复
private:
void __fastcall ImageClick(TObject *Sender);
//--------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
Image = new TImage(this);
// Image->AutoSize = true;
Image->Left = 0;
Image->Top = 0;
Image->Parent = this;
Image->Show();
Image->OnClick=ImageClick;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::ImageClick(TObject *Sender)
{
ShowMessage("You Click.");
}
Rayman 2000-03-20
  • 打赏
  • 举报
回复
这是我的源码
__fastcall TImageEx::TImageEx(TComponent* Owner)
: TScrollBox(Owner)
{
Image = new TImage(this);
Image->AutoSize = true;
Image->Left = 0;
Image->Top = 0;
Image->Parent = this;
Image->Show();
}
事实上我就是不知道怎样指定Image的事件,请原谅我没有说出问题的关键,Thanks
ahao 2000-03-20
  • 打赏
  • 举报
回复
你指定了TImage的OnMouseMove事件吗?
或者你把源码贴出来看看?

602

社区成员

发帖
与我相关
我的任务
社区描述
C++ Builder VCL组件使用和开发
社区管理员
  • VCL组件使用和开发社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧