liujianjun
/
tslediter
3
0
Fork 1
Code Issues Pull Requests Projects Releases Wiki Activity

编辑器 

统一ini语法
This commit is contained in:
JianjunLiu 2023-04-11 15:39:52 +08:00
parent d8b6e56c3c
commit 0b14a264cc
1 changed files with 24 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

27
designer/utslsynmemo.tsf
View File

@ -1417,29 +1417,48 @@ type TINISynHigLighter = class(TSynHighLighter)
begin begin
if r[0].FValue="[" then if r[0].FValue="[" then
begin begin
if hightercolor then c := hightercolor.sysfunccolor();
else c := 0xE22B8A;
for i,v in r do for i,v in r do
begin begin
v.FFColor := 0xE22B8A; v.FFColor := c;
end end
end else end else
if r[0].FValue in array(";","!","#") then if r[0].FValue in array(";","!","#") then
begin begin
if hightercolor then c := hightercolor.commentcolor();
else c := 0x80CD43;
for i,v in r do for i,v in r do
begin begin
v.FFColor := 0x80CD43; //#43CD80 v.FFColor := c; //#43CD80
end end
end else end else
if r[0].FValue = "@" then if r[0].FValue = "@" then
begin begin
r[0].FFColor := 0x0000FF; if hightercolor then c := hightercolor.keycolor();
else c := 0x0000FF;
r[0].FFColor := c;
end else end else
begin begin
if hightercolor then
begin
c1 := hightercolor.strcolor();
c2 := hightercolor.keycolor();
end
else
begin
c1 := 0x0000F0;
c2 := 0xf0f0f0;
end
for i,v in r do for i,v in r do
begin begin
if v.FValue="=" then if v.FValue="=" then
begin begin
v.FFColor := 0x0000F0; v.FFColor := c1;
break; break;
end else
begin
v.FFColor := c2;
end end
end end
end end