var 
w:widestring;
s:string;
begin
  w:='margaritaville';
  s:=w;//wide转换成ansi
  s:='come monday';
  w:=s;//ansi转换成wide
end;

解决方案 »

  1.   

    WideString(Value) //强制转换即可
      

  2.   

    好象直接赋过去就可以了
    要是不行,用一下trim()
      

  3.   

    大概是我的意思说错了。
    就是这样的,
    在汉字中,每一个汉字都是Full Width的。
    每一个字母都是Half Width的,
    那么,在我们平常用键盘输入的数字就是Half Width的。然后我想用Full Width
    的数字来代替那个Half Width的。
    也就是说1个数字所占的宽度跟一个汉字一样。
    在Visual basic中就有StrConv这个函数,但是在delphi中,我就不清楚。
      

  4.   

    begin
      ShowMessage(WideString('你好')[1]); //你
      ShowMessage(WideString('你好')[2]); //好
      ShowMessage(Copy(WideString('你好!吗?'), 2, 2)); //好!
    end;