итак опытным путём установленно что баг появился только в версии 2,0,3, в 2,0,2б его нет.
баг в модуле SynEdit.pas в процедуре procedure PaintLines;
версия 2,0,2б
| Код |
if fHighlighter.GetEol then
begin
if (attr = nil) or (attr <> fHighlighter.CommentAttribute) then
attr := fHighlighter.WhitespaceAttribute;
AddHighlightToken( SynLineBreakGlyph, nTokenPos + nTokenLen, 1,
attr.Foreground, attr.Background, []);
end;
end;
|
версия 2,0,3
| Код |
if fHighlighter.GetEol then
begin
if (attr = nil) or (attr <> fHighlighter.CommentAttribute) then
attr := fHighlighter.WhitespaceAttribute;
// Draw text that couldn't be parsed by the highlighter, if any.
if fHighlighter.GetTokenPos < Length(sLine) then
begin
sToken := Copy(sLine, vFirstChar, vLastChar - vFirstChar);
if fHighlighter.GetTokenPos +1 >= vFirstChar then
begin
Delete(sToken, 1, fHighlighter.GetTokenPos +1 - vFirstChar);
Dec(nTokenPos, vFirstChar - FirstCol);
Inc(nTokenPos, nTokenLen);
end;
nTokenLen := Length(sToken);
AddHighlightToken(sToken, nTokenPos, nTokenLen, attr.Foreground,
attr.Background, []);
end;
// Draw LineBreak glyph.
if fShowSpecChar and (vLastChar >= Length(sLine)) then
begin
AddHighlightToken( SynLineBreakGlyph, nTokenPos + nTokenLen, 1,
attr.Foreground, attr.Background, []);
end;
end;
|
перенёс все изменения в этом файле кроме этого и выложил здесь http://www.Ormada.nm.ru/SynEdit.rar
если есть люди хорошо понимающие внутренности SynEdit просьба подправить до конца файл и навера залить от имени всех хайлатеровцев разработчикам |
