delphi调用窗口函数的方法。

2024-11-18 23:49:53

推荐回答（4个）

回答1：

form1：
在var Form1: TForm1; 后面定义全局变量
type
TForm1 = class(TForm)
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;
sFm1Str: String;

form2:
在implementation下uses form1单元,例如:
implementation

uses
Unit1;

用的时候用 Unit1.sFm1Str调用

回答2：

贺言君老兄的正解；
在unit2里面找到implementation，并在其下添加语句uses unit1。具体如下：
implementation
uses
unit1;

如果S在unit1单元是作为全局变量则可直接调用，否则以XXX（实例名）.S的方法调用。

回答3：

将S变量设置为全局变量就可以了!

回答4：

在form2的单元文件unit2中implementation下面添加语句 uses unit1；