请问delphi中如何在一个form里调用另一个form的procedure

Question

比如说我在form1中定义了procedure a，怎么在form2中调用它？

Answer 1

首要要保证form1中定义的procedure a 申明在public中，然后在Form2中USES form1窗体所属的单元名称，默认应该是
unit1

Answer 2

首先public form1中的proceduer,然后在form2中引用form1所在单元

Answer 3

user Form1.pasa must in Form1 Public...Form1.a;
...

Answer 4

uses Form1a作为Form1的Public方法直接调用Form1.a

Answer 5

把procedures a 定义成全局的，只要把Form1的单元包含到Form2单元中就可以直接调用。
a ；unit unit1 ;
type 
  Form1 = class(TForm) ;
   private 
   public;
  end; 
 procedure a ;implements
 procedure a ;
 begin
 ....
 end;
unit unit2 ;uses 
  unit1 ;
 procedure Form2.OnShow();
 begin
    a ;
 end; 
    

Answer 6

把procedures a 定义成全局的，只要把Form1的单元包含到Form2单元中就可以直接调用。 
a ； unit unit1 ; 
type 
  TForm1 = class(TForm) ; 
  private 
  public; 
  end; 
public....
procedure a ; implements 
procedure a ; 
begin 
.... 
end; 
unit unit2 ; uses 
  unit1 ; 
procedure Form2.事件;
begin 
    form1.a ; 
end; 这么写

Answer 7

可以通过Alt+F11 选择form1窗体！~ 跟前面提到的用手写uses 方式一样！~~