超级怪的问题?

Question

我想在主界面中显示登陆用户的名称?代码如下:
  StatusBar1.Panels[0].Text := '用户名：'+string(form1.edit1.text);
为什么在主界面中的StatusBar1显示却是乱码啊?是不是代码有错误啊 ?

Answer 1

没有问题
应该是这样：StatusBar1.Panels[0].Text := '用户名：'+form1.edit1.text;干吗要string

Answer 2

完全复制你的代码
在delphi6下面通过了啊！
什么原因呢?
你在Edit里面输入了什么?
-----------------------------------------------
procedure TForm1.Button1Click(Sender: TObject);
begin
  StatusBar1.Panels[0].Text := '用户名：'+string(form1.edit1.text);
end;

Answer 3

大概是在EDIT里输入了乱码吧,哈哈

Answer 4

楼主的Form1是登陆窗体吧？？
估计楼主是在登陆窗体Free后再去获取Form1.Edit1.Text的值.建议楼主在Publish定义一个string类型变量，给变量赋值为Edit1.text, 然后传递给主窗体;

Answer 5

没有取到Edit1.text中值?? 还是照样是乱码?

Answer 6

楼主，可能把这一句 StatusBar1.Panels[0].Text := '用户名：'+string(form1.edit1.text);
加到循环内，然后再来个copy方法，它当然也就显示的是乱码