请教如何在同一个项目的两个FORM中传递数据！ (100分)

D

dgwyp

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-11

• #1

请教：如何在同一个项目的两个FORM中传递数据
全局变量如何设啊?各位大侠我是菜鸟,请耐心指导,最好有程序配合解释!谢了！
form1打开点击一按钮form2.show，进行运算一数据后付值给全局变量（公共变量）,
然后FORM2关闭，关闭后的全局变量（公共变量）的数据还可以传给FORM1吗？

 

F

fanhongwei

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-11

• #2

设置全局变量

 

F

fanhongwei

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-11

• #3

或者在一个Form中的 Uses [另一个From]

 

Y

ysai

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-11

• #4

方法很多,最简单的是用全局变量,还有发送消息,直接引用等方法

 

T

tomol

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-11

• #5

有很多种方法呀
1.可以设置Form类的公共成员变量，不过Form要先创建
2.设置全局变量，只需要Uses该单元即可

 

Q

qianwt

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-11

• #6

用消息

 

L

lanbing1400

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-11

• #7

全局变量最简单

 

D

dgwyp

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-11

• #8

全局变量如何设啊?各位大侠我是菜鸟,请耐心指导,最好有程序配合解释!谢了！

 

T

tomol

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-11

• #9

unit Unit1;

interface

uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;

type
TForm1 = class(TForm)
private
{ Private declarations }
public
{ Public declarations }
str: String; //此即为TForm1的公共变量
end;

var
Form1: TForm1;
str: String;//此即为全局变量
implementation

{$R *.DFM}

end.

 

R

redwood

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-11

• #10

楼上正解，其他form就用TForm1的公共变量
格式：form1.str
不过要先在implementation下边 uses form1

 

D

dgwyp

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-11

• #11

form1打开点击一按钮form2.show，进行运算一数据后付值给全局变量（公共变量）,
然后FORM2关闭，关闭后的全局变量（公共变量）的数据还可以传给FORM1吗？

 

T

tomol

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-11

• #12

当然可以了，只要不是TForm的成员变量
其实只要不Free窗体，成员变量也一样使用

 

D

dgwyp

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-11

• #13

谢谢了!

 

N

ndch

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-11

• #14

最好的，也是最符合封装特性的就是利用属性（property）了。