修补SynEdit CVS 中文问题

SynEdit是SourceForge.net上顶级的语法高亮度显示组件,支持众多语法和RTF、HTML输出,但中文处理有瑕疵。经调试找到问题关键,修改相关函数后解决中文乱码问题。此外,还解决了转换后默认CodePage不是中文的小毛病。

摘要生成于 C知道 ,由 DeepSeek-R1 满血版支持, 前往体验 >

 

SynEdit是SourceForge.net上顶级的语法高亮度显示组件。

Open Source,Delphi的源码。质量和效果都没得说。很多商业和非商业的软件包中都有使用。

用它你可以非常方便的实现一个自己的代码编辑器来。支持众多的语法,支持RTF和HTML输出。非常的方便。

http://community.youkuaiyun.com/Expert/TopicView.asp?id=3068979

优快云的Freicin雪客最近发布的一个小软件,估计就是基于SynEdit的.(纯粹猜测啊!)

美中不足的是中文的处理上有些瑕疵。但凡国外的东西都有这样的毛病,只好自己动手丰衣足食!

经过简短的追踪,调试。很快就找到了问题的关键所在! 

source/SynEditExport.pas 的450行左右,下面这个函数的实现有点问题。

function TSynCustomExporter.ReplaceReservedChars(AToken: string;

  var IsSpace: boolean): string;

var

  I, ISrc, IDest, SrcLen, DestLen: integer;

  Replace: string;

  c: char;                              //mh 2000-10-10

begin

  IsSpace := TRUE;

  if AToken <> '' then begin

    SrcLen := Length(AToken);

    ISrc := 1;

    DestLen := SrcLen;

    IDest := 1;

    SetLength(Result, DestLen);

    while ISrc <= SrcLen do begin

      c := AToken[ISrc];

      IsSpace := IsSpace and (c = ' ');

 

//Chinese charactor patch by cker begin. 2004-06-17

{$IFDEF SYN_MBCSSUPPORT}

      if (ByteType(AToken,ISrc)= mbLeadByte) and (ISrc <= SrcLen) and (ByteType(AToken,ISrc + 1)= mbTrailByte) then begin

        Replace := ReplaceMBCS(AToken[ISrc], AToken[ISrc + 1]);

        Inc(ISrc, 2);

      end else

{$ENDIF}

//Chinese charactor patch by cker end. 2004-06-17

 

      if fReplaceReserved[c] <> nil then begin

        Replace := StrPas(fReplaceReserved[c]);

        Inc(ISrc);

{$IFDEF SYN_MBCSSUPPORT}

//      end else if ByteType(AToken, ISrc) <> mbSingleByte then begin

      end else if (AToken[ISrc] in LeadBytes) and (AToken[ISrc + 1] <> #0) then //mh 2000-10-10

      begin

        Replace := ReplaceMBCS(AToken[ISrc], AToken[ISrc + 1]);

        Inc(ISrc, 2);

{$ENDIF}

      end else begin

        if IDest > DestLen then begin

          Inc(DestLen, 32);

          SetLength(Result, DestLen);

        end;

        Result[IDest] := c;

        Inc(ISrc);

        Inc(IDest);

        continue;

      end;

      if IDest + Length(Replace) - 1 > DestLen then begin

        Inc(DestLen, Max(32, IDest + Length(Replace) - DestLen));

        SetLength(Result, DestLen);

      end;

      for I := 1 to Length(Replace) do begin

        Result[IDest] := Replace[I];

        Inc(IDest);

      end;

    end;

    SetLength(Result, IDest - 1);

  end else

    Result := '';

end;

 

其实原本作者已经意识到了多字节文本的处理,但可能毕竟不是CJK语系的,对此没有太大的兴趣,所以,还是需要自己动手。不管怎样现在我们的SynEdit可以工作了,HTML输出中文的时候再没有乱码了!

如果就此结束的话,还有一个小毛病,就是转换出来默认的CodePage不是中文而是ISO8859-1,这样你需要先手动选择才可以正确的显示中文。

修改也很简单.

SynEditExportHTML.pas 330行左右:

这里修改很方便,就不说了。

function TSynExporterHTML.GetHeader: string;

const

  DescriptionSize = 105;

  HeaderSize = 47;

  FooterSize1 = 58;

  FooterSize2 = 24;

  NativeHeader = 'Version:0.9'#13#10 +

                 'StartHTML:%.10d'#13#10 +

                 'EndHTML:%.10d'#13#10 +

                 'StartFragment:%.10d'#13#10 +

                 'EndFragment:%.10d'#13#10;

HTMLAsTextHeader = '<?xml version="1.0" encoding="iso-8859-1"?>'#13#10 +

                     '<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">'#13#10 +

                     '<html xmlns="http://www.w3.org/1999/xhtml">'#13#10 +

                     '<head>'#13#10 +

                     '<title>%s</title>'#13#10 +

                     '<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />'#13#10 +

                     '<meta name="generator" content="SynEdit HTML exporter" />'#13#10 +

                     '<style type="text/css">'#13#10 +

                     '<!--'#13#10 +

                     'body { color: %s; background-color: %s; }'#13#10 +

                     '%s' +

                     '-->'#13#10 +

                     '</style>'#13#10 +

                     '</head>'#13#10 +

                     '<body>'#13#10;

评论 1
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值