菜鸟的问题"开发数据应该程序时,如何设置全局变量"

Question

我现在要开发一个数据应用程序,首先是要显示登录界面,在这里需要将正常登录后的用户名保存下来,这个数据将在应该程序运行时的其它界面里显示.我该如何作了.用了一些方法都不好使.
还有如果我要在from2中的edit1里显示form1中的内容.用from2.edit1.text:=form1.edit1.text;为什么不行呢.我也在单位文件的USER部分引用了.相当菜的问题.希望大家能给予解答.

Answer 1

在form2的implementation下面引用 uses form1

Answer 2

问题1：
你新建立一个空白文件，文件中的内容是你自己定义的一个类，类里有个共有的字段，useName,然后实例化。你在要用到这个共有字段的时候，在窗体引用这个自定义的类的实例，就可以了。问题2。
from2.edit1.text:=form1.edit1.text;
代码本身没有问题，说说为什么不行，报了什么错

Answer 3

给你个例子：
新建一个文件，空白的，里面输入代码:
unit UseInfo;interface  uses Graphics,registry,SysUtils,Windows;type
   TuseInfo= class
      private       public
        usename : string;
        constructor Create;
        destructor Destroy;
   end;var
  useinfo : TUseInfo;implementationconstructor TUseInfo.Create;begin
  inherited;
  usename := '';
end;destructor TUseInfo.Destroy;
begin
  inherited;
end;initialization
begin
   useinfo:= TUseInfo.Create;
end;finalization
begin
   useinfo.Destroy;
end;这个类里边当然你还可以包含根多的公共信息。
你在form1以及form2里都use这个文件，
就可以在form1中设置  useinfo.usename := edit1.text;
在form2中，可以edit1.text := useinfo.usenameend.