Question

delphi 不同界面之间的控件相互访问

delphi中主界面要用到子界面的Edit控件上的数据！如何传递呢？
子界面中我写了一个过程
procedure TForm2.S(s:string);
begin
s := Trim(Edit1.Text);
end;
主界面中我写了一个按钮
procedure TForm1.Button1Click(Sender: TObject);
var
st:string;
begin
Form2.S(st);
ShowMessage(st);
end;
这样为什么不行呢？

Answer 1

两个问题：
1、如编译不通过，则说明Form1所在单元还没有引用Form2所在单元，需要在uses部分加上Form2所在单元；
2、TForm2.S不是一个函数，而是一个过程，试图返回Edit1.Text，所以参数应该是var s:string

Answer 2

procedure TForm2.S(s:string);
begin
s := Trim(Edit1.Text);
end;
写成这样
procedure TForm2.S(s:string);
begin
Edit1.Text := Trim(s);
end;

Answer 3

form1要use form2
然后才可以的