如何在窗体间传递变量(50分)

  • 主题发起人 主题发起人 eit67915
  • 开始时间 开始时间
E

eit67915

Unregistered / Unconfirmed
GUEST, unregistred user!
我是一名初学者,请问如何在窗体间传递变量。
 
设一个公共变量就行了
 
同一个程序可以在全局定义的时候定义,最常用的是定义在
var
Form1: TForm1;
St: String;

然后在另一窗体单元中调用本单元
var
Form2: TForm2;

implementation

uses Unit1;
就可以了
不同程序可以利用消息
 
uses Unit1; // 這是引入單元Form1

{$R *.dfm}

procedure TForm2.Button1Click(Sender: TObject);
begin
Edit1.Text:=Form1.Edit1.Text;
end;

QQ:136293586
 
直接传址啊
 
在A窗体和B窗体间传递变量:
新建窗体C,
在A窗体中对C窗体的public变量赋值,
在B窗体中调用C窗体的相应变量即可,
这样,A use C, B 也 use C。
 
建一个新的公共类
 
多人接受答案了。
 
后退
顶部