盒子论坛 v2.1

新手提问编译 synEdit XE 错误
请问下各位高手能否给我发一份___SynEdit_DXE.bpl_____SynEdit_RXE.bpl
mingcham@hotmail.com

谢谢各位高手
----------------------------------------------
cham

作者：

sail2000 (小帆工作室)	★☆☆☆☆	-
	盒子活跃会员

2011/8/28 22:23:40

1楼：

SVN 在这里：

http://synedit.svn.sourceforge.net/viewvc/synedit/SynEdit/Packages/
----------------------------------------------
delphi 是兴趣，和工作无关，即使它倒闭。又不靠它 delphi 吃饭，怕甚？

作者：

nevergrief (孤独骑士)	★☆☆☆☆	-
	盒子活跃会员

2011/8/29 0:45:16

2楼：

是 unicode的问题，不是源代码版本的问题。

function TCustomSynEdit.IsWordBreakChar(AChar: WideChar): Boolean;
begin
  if Assigned(Highlighter) then
    Result := Highlighter.IsWordBreakChar(AChar)
  else
// FM removed non-asciii chars
    case AChar of
      #0..#32, '.', ',', ';', ':', '"', '''', '?, '`', '?, '^', '!', '?', '&',
      '$', '@', '%', '#', '~', '[', ']', '(', ')', '{', '}', '<', '>',
      '-', '=', '+', '*', '/', '\', '|':
        Result := True;
      else
        Result := False;
    end;

中有问题，无法编译，需要修改

----------
SynEdit.pas和SynEditSearch.pas中有乱码的问题，看到解决方法了：

其实，就是因为这些里面有些utf8字符，而Delphi默认的用cp936的文件格式打开，导致的错误。正确的应该是

function TSynCustomHighlighter.IsWordBreakChar(AChar: WideChar): Boolean;
begin
  case AChar of
    #0..#32, '.', ',', ';', ':', '"', '''', '′', '`', '°', '^', '!', '?', '&',
    '$', '@', '§', '%', '#', '~', '[', ']', '(', ')', '{', '}', '<', '>',
    '-', '=', '+', '*', '/', '\', '|':
      Result := True;
    else
      Result := False;
  end;
end;
用正确的代码粘贴修改后，保存，Delphi2010会提示包含utf8字符，是否保存为utf8，选择“是”即可。
----------------------------------------------
只有偏执狂才能生存！

作者：

huangjacky (TheFiend)	★☆☆☆☆	-
	普通会员

2011/8/29 9:17:07

3楼：

貌似还有回车换行的bug,不知道新的版本改没有
----------------------------------------------
我的博客:huangjacky.cnblogs.com

作者：

sail2000 (小帆工作室)	★☆☆☆☆	-
	盒子活跃会员

2011/8/30 0:10:30

4楼：

回3楼，很早就改掉了。
----------------------------------------------
delphi 是兴趣，和工作无关，即使它倒闭。又不靠它 delphi 吃饭，怕甚？

信息

登陆以后才能回复