调用事件(100分)

  • 主题发起人 主题发起人 maysally
  • 开始时间 开始时间
M

maysally

Unregistered / Unconfirmed
GUEST, unregistred user!
我想在一个事件中调用另一个事件比如TFORM1.BUTTON1CLICK(TOBJECT),
这个TOBJECT应该赋什么值呢?
 
buttonclick(TObject :Sender)
{
combobox.onchange(Sender);
}
是这样的吧
 
button1.click
 
procedure TForm1.Button1Click(Sender: TObject);
begin
ShowMessage('button1');
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
Button1.Click;
end;
 
BUTTON1CLICK(Button1)
 
button1.click
 
影子是对的
 
想调什么直接写。
 
用Sender。
 
你可以调用Button1.Click;的方法。
如果非要调用事件的话
if Assigned(Button1.OnClick) then
Button1.OnClick(Button1);
那各参数Sender用什么对象都行。除非在事件中特殊判断了Sender是什么要不然没太大区别
 
如果在同一个窗体中就直接:
button1.onclick(self);
如果不是,就在前面加窗体对象名.
 
后退
顶部