B
backup
Unregistered / Unconfirmed
GUEST, unregistred user!
[
] 大侠看看这个程序的问题！
procedure TForm1.FormClick(Sender: TObject);
var
aa,bb:string;
begin
SetLength(aa,1);
SetLength(bb,1);
aa[1]:='z';
bb:=aa;
showmessage('bb is '+strUpper(Pchar(bb))+
' aa is '+aa);
// question occured, 我想的是'bb is Z aa is z'
// 但是实际上输出的是 'bb is Z aa iss Z'，我蒙了，这delphi是不是变态了！[]
// 这问题如何解决？？ 请有兴趣的大侠用你的delphi编译一下试试！改如何解决呢？
end;
] 大侠看看这个程序的问题！procedure TForm1.FormClick(Sender: TObject);
var
aa,bb:string;
begin
SetLength(aa,1);
SetLength(bb,1);
aa[1]:='z';
bb:=aa;
showmessage('bb is '+strUpper(Pchar(bb))+
' aa is '+aa);
// question occured, 我想的是'bb is Z aa is z'
// 但是实际上输出的是 'bb is Z aa iss Z'，我蒙了，这delphi是不是变态了！[
]// 这问题如何解决？？ 请有兴趣的大侠用你的delphi编译一下试试！改如何解决呢？
end;
]），