Question

Delphi:如何在同一窗体的某个控件事件中调用另一个控件的事件？

比如：窗体上有两个面板，如何在面板2的onmousedown事件中调用面板1的onmousedown事件呢？我这样写报错。该如何改呢？
procedure TMainForm.Panel2MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
tag:=panel2.Tag;
Panel1MouseDown(Sender);//这一句报错的
end;
procedure TMainForm.Panel1MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
//
end;

Answer 1

先捕获好第一个要捕获的控件的事件，再在DELPHI中的Object Inspector窗口的Events选页中，在那有对像的所有事件，你可以在想要的事件中有个下拉框的，把它指向那个捕获好的控件的相同事件就可以了，在所有事件里有个Sender: TObject的属性的，用它可以区分当前激活事件的是那个控件。如 if Sender = edit1 then beep;

Answer 2

同上

要是两个完全一模一样的代码话， 

直接在定义的时候就可以修改

Answer 3

Panel1MouseDown(sender,button,shift,x,y);