delphi 2009 下与 delphi2006下加密的问题？

Question

var
a : widechar;
ss:string;
begin
   a:= #196;
  ss:= Base64Encode(a);
   memo1.Lines.Add(ss);
end;delphi 2009下 = AA==
delphi 2006下 = Pw==因为代码为2006下开发的，以2006的值为准，2009下怎样改代码？

Answer 1

var 
a : ansichar; 
ss:string; 
begin 
  a:= #196; 
  ss:= Base64Encode(a); 
  memo1.Lines.Add(ss); 
end; delphi 2009下 = AA== 
delphi 2006下 = xA==