Delphi中消息处理的有关问题

Delphi中消息处理的问题

  窗口上,有一按扭,

  同时窗口 有鼠标点击事件 按扭也有鼠标点击事件,要怎么样才能使得点按扭时,窗口也能自动的触发点击事件

------解决方案--------------------
button Click的时候
Self.onclick(Self)
------解决方案--------------------
procedure TForm1.Button1Click(Sender: TObject);
begin
DoSomeThing;
Self.Click;
end;