J
jinj123
Unregistered / Unconfirmed
GUEST, unregistred user!
打算在修改密码窗体中显示登陆的用户名:
procedure TForm3.FormCreate(Sender: TObject);
begin
StaticText1.Caption:=log.conuser;
end;
其中:
conuser为全局变量;在log 窗体中已经定义,用全局变量取登陆的用户名
procedure TForm1.Button1Click(Sender: TObject);
begin
conuser:=self.Edit1.Text;
end;
log为登陆窗体,在修改密码窗体中已经引用,如下
var
Form3: TForm3;
implementation
uses
log;
为什么在窗体加载的时候StaticText1.Caption不显示用户名呢???
procedure TForm3.FormCreate(Sender: TObject);
begin
StaticText1.Caption:=log.conuser;
end;
其中:
conuser为全局变量;在log 窗体中已经定义,用全局变量取登陆的用户名
procedure TForm1.Button1Click(Sender: TObject);
begin
conuser:=self.Edit1.Text;
end;
log为登陆窗体,在修改密码窗体中已经引用,如下
var
Form3: TForm3;
implementation
uses
log;
为什么在窗体加载的时候StaticText1.Caption不显示用户名呢???