我想在onclick事件中调用其它事件，怎么调

Question

procedure TForm1.Button1Click(Sender: TObject);
begin
    button2.Click
end;

Answer 1

Delphi中控件的任何事件,不过是一个属性,他指向你定义的函数,或方法,
项调用任何事件,只要传递正确的参数,即可随时随地调用
比如
procedure TForm1.Button1Click(Sender: TObject);
begin
    button2.Onclik(button2);//等同于鼠标点极了button2
    Edit1.OnKeyPress(Button2,#13);//等同于在Edit1中暗下了回车
    
end; 

Answer 2

songdan2002(宋)的方法我没有试过,看代码可以实现.给他分吧.

Answer 3

同意songdan2002(宋)　(2001-8-9 20:56:12)

Answer 4

onclick是这样就可以了，不过在其它事件中有的参数很多我就不知道该怎么使用了

Answer 5

如果你想让onClick事件直接调用其它控件的事件，只需在onClick事件的下拉列表中选择要调用事件就行了。
如果要在onClick的写好的事件中调用，就用
控件名.事件名(self);
调用

Answer 6

还可以用PostMessage()或者SendMessage().

Answer 7

如果是本窗体的事件则: 
 procedure TForm1.Button1Click(Sender: TObject);
  begin
    button2.Click(sender);
end; 
如果是另外一个窗体的时间则:
procedure TForm1.Button1Click(Sender: TObject);
  begin
    Tform2.button2.Click(sender);
end; 

Answer 8

如果是本窗体的事件则: 
procedure TForm1.Button1Click(Sender: TObject);
  begin
    button2.Click(button2);
end; 
如果是另外一个窗体的时间则:
procedure TForm1.Button1Click(Sender: TObject);
  begin
    Tform2.button2.Click(button2);
end;