paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-10 08:16:04 +02:00
Code Issues Packages Projects Releases Wiki Activity

SynEdit: outline color fixes / issue #32852 and issue #33154 / patch by Pascal R.

Browse Source 
git-svn-id: trunk@57513 -
This commit is contained in:
martin 2018-03-16 11:39:20 +00:00
parent 1c894ad096
commit 42a3a21f82
2 changed files with 633 additions and 519 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1148
components/synedit/syneditmarkupfoldcoloring.pas
View File

File diff suppressed because it is too large Load Diff

4
components/synedit/test/testmarkupfoldcoloring.pas
View File

@ -248,7 +248,7 @@ begin
TestRowColumns('Line 14', 14, [1, 2], [2, 4]); //
TestRowColumns('Line 15', 15, [1, 2], [2, 4], [4,1], [4]); // ;
TestRowColumns('Line 16', 16, [1, 3], [2, 3]); //writeln 3
// TestRowColumns('Line 17', 17, [1], [2]); // //writeln 4
TestRowColumns('Line 17', 17, [], []); // //writeln 4
TestRowColumns('Line 18', 18, [1, 3], [2, 3]); //writeln 5
Markup.EndMarkup;
@ -260,7 +260,7 @@ begin
SetSynEditHeight(40);
ClearInvalidatedLines;
DoKeyPressAtPos(1, 13, [VK_SPACE, VK_SPACE]); // if b then
// TestInvalidate('after edit', 14, 15); // what about 13, ok it is already invalidated....
TestInvalidate('after edit', 14, 21); // what about 13, ok it is already invalidated....
PopBaseName;
PopBaseName;