1。你将字体调整为另外一种如 Arial
2.你换一种输入法试试……

解决方案 »

  1.   

    可能是你的delphi或window的问题。
      

  2.   

    你的lines是load进去的吧,用下面的函数转换一下。
    procedure tform1.transfer;
    var
      buf:string;
      pos:word;
    begin
      with richedit1 do
      begin
        buf:=Text;
        pos:=1;
        while pos<length(buf) do
        begin
          if ord(buf[pos])>=127 then
          begin
            SelStart:=pos-1;
            SelLength:=2;
            selattributes.charset:=GB2312_CHARSET;
          pos:=pos+2;
        end
        else
          pos:=pos+1;
        end;
      end;
    end;