Delphi按钮之间怎么调用?
展开全部
在Button2的Click中调用Button1的Click:
Button1.Click; 或Button1Click(button1);
或者
procedure DoClick();
begin
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
DoClick();
end;
procedure TForm2.Button2Click(Sender: TObject);
begin
DoClick();
end;
Button1.Click; 或Button1Click(button1);
或者
procedure DoClick();
begin
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
DoClick();
end;
procedure TForm2.Button2Click(Sender: TObject);
begin
DoClick();
end;
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询