哪位朋友知道如何在form2中引用fomr1的自己编写的函数?

Question

form1中写了一个函数,form2不能用?
我已经uses了..

Answer 1

你写的form1中中的函数要放在public区

Answer 2

form1.userfunction
就行了
from1 为tform1的实例

Answer 3

uses 
unit1
unit1.function(参数1，参数2，，，)

Answer 4

多谢大家的回答,
我不是写在类里边的,我写在form1里边的,在form_create前边,
form1.userfuncion不能用,在public里边的话,他连编译都过不了.
希望能够详细点.
我写在类里边也不能用.气死了.

Answer 5

这个是form1部分
  public
    function add:string;//添加数据
  begin
  form2.Edit1.Clear;
  form2.Memo1.Clear;
  form2.ComboBox1.Clear;
  form1.ADOQuery1.Close;
  form1.ADOQuery1.SQL.Clear;
  form1.ADOQuery1.SQL.Add('select * from info ');
  form1.ADOQuery1.Open;
  while not form1.ADOQuery1.Eof do
  begin
    form2.ComboBox1.Items.Add(form1.ADOQuery1.Fields[1].asstring);
    form1.ADOQuery1.Next;
  end;
  form1.ADOQuery1.Close;
  form2.ShowModal;
end;
    { Public declarations }这个连编译都不行

Answer 6

unit1 implementation 
uses unit2 ;
--------------------------------
unit2 ...var 
  Function Name : Boolean ;//全局
 Implementation Function Name : Boolean;
begin
  Result := False ;
end;

Answer 7

uses 
  unit1
不要form1.直接写function1