您所在位置：主题：怎么回有乱码啊
triumph
[专家分：160] 发布于 2006-06-20 22:26:00
我在登录窗体定义全局变量
public
{ Public declarations }
userid:string;
username:string;
popedom:string;
loginok:boolean;
end;
用户名,密码输入正确后,登录到主窗体时,在状态栏显示是却出现乱码:
procedure Tfrm_main.FormShow(Sender: TObject);
begin
rzfieldstatus1.Caption:='当前用户：'[color=FF0000]+posloginform.username;[/color]
public
{ Public declarations }
userid:string;
username:string;
popedom:string;
loginok:boolean;
end;
用户名,密码输入正确后,登录到主窗体时,在状态栏显示是却出现乱码:
procedure Tfrm_main.FormShow(Sender: TObject);
begin
rzfieldstatus1.Caption:='当前用户：'[color=FF0000]+posloginform.username;[/color]
