在delphi的一个窗体中能引用另外一个窗体中的变量吗?如何实现?谢谢

2024-11-26 18:09:58
推荐回答(5个)
回答(1):

可以你把另一个窗体中的变量定义成全局的就可以了
你和
var
from1:tform;
你的变量:t你的变量
代码中有定义窗体的地方定义到这的调用的时候可以直接调用
也可以定义到窗体的public中
调用的时候得
form1.你的变量
这样调用

回答(2):

能的!如在LoginForm即登陆窗体中定义全局变量,在代码中public定义,如下所示:
public
{ Public declarations }
uname,upassword:string; //定义全局变量
end;

登陆窗体中用户输入:
procedure TLoginForm.FormCreate(Sender: TObject);
begin
uname := ComboBox1.text;//用户名
pass := Edit1.Text; //密码
end;

在MainForm的状态栏显示登陆的用户名:(其中加Timer和tatusBar控件)
procedure TBalanceForm.Timer1Timer(Sender: TObject);
begin
StatusBar1.Panels[1].Text := '当前用户:'+LoginForm.uname; //调用LoginForm的uname变量
end;

回答(3):

把你要引用的变量设为全局变量,现引用全局变量所在的那个单元格就行了
1、在窗口1的单元接口部分的uses一词后加上Unit2;
2、在implementation下面加上语句uses Unit2;
3、在File-->Use Unit...中点选Unit2,OK;它的作用和第2种方法效果一样。
4、最快捷的alt+f11 ,
再写代码就行了:
eg:
Edit1.Text:=From2.Label1.Caption;

回答(4):

如果是 窗体类中的变量,只能在public,或者published里面的property字段的也可以.
如果是 窗体的pas的全局变量,直接引用就可以了.

最关键的是你要在你的单元里面 uses 这个窗体的pas文件.

回答(5):

在var下定义后,在要使用的单元中uses该单元.