From c12c24dc34c7058e2386c1eda8f7411fb5841552 Mon Sep 17 00:00:00 2001 From: martin Date: Tue, 30 Apr 2019 22:54:27 +0000 Subject: [PATCH] IDE, EditorOptions: add colors for Overview-Gutter git-svn-id: trunk@61095 - --- ide/ColorDefault.xml | 1 + ide/ColorDelphi.xml | 1 + ide/ColorOcean.xml | 1 + ide/ColorPascalClassic.xml | 1 + ide/ColorTwilight.xml | 1 + ide/editoroptions.pp | 38 ++++++++++++++++++++++++++-- ide/editoroptions.res | Bin 66296 -> 65332 bytes ide/frames/editor_color_options.pas | 15 ++++++++++- ide/lazarusidestrconsts.pas | 4 +++ ide/sourcemarks.pas | 2 +- ide/syncolorattribeditor.pas | 23 ++++++++++------- 11 files changed, 74 insertions(+), 13 deletions(-) diff --git a/ide/ColorDefault.xml b/ide/ColorDefault.xml index 152c705cf9..0592e14f16 100644 --- a/ide/ColorDefault.xml +++ b/ide/ColorDefault.xml @@ -43,6 +43,7 @@ + diff --git a/ide/ColorDelphi.xml b/ide/ColorDelphi.xml index 59e1c062c5..895c907930 100644 --- a/ide/ColorDelphi.xml +++ b/ide/ColorDelphi.xml @@ -43,6 +43,7 @@ + diff --git a/ide/ColorOcean.xml b/ide/ColorOcean.xml index 8f4b8de591..5bab6fa751 100644 --- a/ide/ColorOcean.xml +++ b/ide/ColorOcean.xml @@ -43,6 +43,7 @@ + diff --git a/ide/ColorPascalClassic.xml b/ide/ColorPascalClassic.xml index dc232d3c6c..803f7c5cee 100644 --- a/ide/ColorPascalClassic.xml +++ b/ide/ColorPascalClassic.xml @@ -39,6 +39,7 @@ + diff --git a/ide/ColorTwilight.xml b/ide/ColorTwilight.xml index 67e8d36460..0ec99055ef 100644 --- a/ide/ColorTwilight.xml +++ b/ide/ColorTwilight.xml @@ -43,6 +43,7 @@ + diff --git a/ide/editoroptions.pp b/ide/editoroptions.pp index 26a41c853e..f11efcacd3 100644 --- a/ide/editoroptions.pp +++ b/ide/editoroptions.pp @@ -62,7 +62,7 @@ uses SynHighlighterPython, SynHighlighterUNIXShellScript, SynHighlighterXML, SynHighlighterJScript, SynHighlighterDiff, SynHighlighterBat, SynHighlighterIni, SynHighlighterPo, SynHighlighterPike, SynPluginMultiCaret, - SynEditMarkupFoldColoring, SynEditMarkup, + SynEditMarkupFoldColoring, SynEditMarkup, SynGutterLineOverview, // codetools LinkScanner, CodeToolManager, // IDEIntf @@ -123,7 +123,7 @@ const '', // ahaRightMargin '', // ahaSpecialVisibleChars '', // ahaTopInfoHint - '', // ahaCaretColor + '', '', // ahaCaretColor, ahaOverviewGutter '', '', '', // ahaIfDefBlockInactive, ahaIfDefBlockActive, ahaIfDefBlockTmpActive '', '', '', // ahaIfDefNodeInactive, ahaIfDefNodeActive, ahaIfDefNodeTmpActive '', '', '', '', // ahaIdentComplWindow, ahaIdentComplWindowBorder, ahaIdentComplWindowSelection, ahaIdentComplWindowHighlight @@ -165,6 +165,7 @@ const { ahaSpecialVisibleChars } agnText, { ahaTopInfoHint } agnLine, { ahaCaretColor } agnText, + { ahaOverviewGutter } agnGutter, { ahaIfDefBlockInactive } agnIfDef, { ahaIfDefBlockActive } agnIfDef, { ahaIfDefBlockTmpActive } agnIfDef, @@ -223,6 +224,7 @@ const { ahaSpecialVisibleChars }[hafBackColor, hafForeColor, hafFrameColor, hafAlpha, hafPrior, hafFrameStyle, hafFrameEdges, hafStyle, hafStyleMask], { ahaTopInfoHint } [hafBackColor, hafForeColor, hafFrameColor, hafAlpha, hafPrior, hafFrameStyle, hafFrameEdges, hafStyle, hafStyleMask], { ahaCaretColor } [hafBackColor, hafForeColor], + { ahaOverviewGutter } [hafBackColor, hafForeColor, hafFrameColor], { ahaIfDefBlockInactive } [hafBackColor, hafForeColor, hafFrameColor, hafAlpha, hafPrior, hafFrameStyle, hafFrameEdges, hafStyle, hafStyleMask], { ahaIfDefBlockActive } [hafBackColor, hafForeColor, hafFrameColor, hafAlpha, hafPrior, hafFrameStyle, hafFrameEdges, hafStyle, hafStyleMask], { ahaIfDefBlockTmpActive }[hafBackColor, hafForeColor, hafFrameColor, hafAlpha, hafPrior, hafFrameStyle, hafFrameEdges, hafStyle, hafStyleMask], @@ -2568,6 +2570,7 @@ begin AdditionalHighlightAttributes[ahaSpecialVisibleChars] := dlgAddHiSpecialVisibleChars; AdditionalHighlightAttributes[ahaTopInfoHint] := dlgTopInfoHint; AdditionalHighlightAttributes[ahaCaretColor] := dlgCaretColor; + AdditionalHighlightAttributes[ahaOverviewGutter] := dlgOverviewGutterColor; AdditionalHighlightAttributes[ahaIfDefBlockInactive] := dlgIfDefBlockInactive; AdditionalHighlightAttributes[ahaIfDefBlockActive] := dlgIfDefBlockActive; AdditionalHighlightAttributes[ahaIfDefBlockTmpActive] := dlgIfDefBlockTmpActive; @@ -6704,6 +6707,8 @@ var IDESynEdit: TIDESynEditor; aha: TAdditionalHilightAttribute; col: TColor; + OGutter: TSynGutterLineOverview; + OGutterProv: TSynGutterLineOverviewProvider; begin ASynEdit.BeginUpdate; try @@ -6781,6 +6786,35 @@ begin SetGutterColorByClass(ahaCodeFoldingTree, TSynGutterCodeFolding); SetGutterColorByClass(ahaGutterSeparator, TSynGutterSeparator); + OGutter := TSynGutterLineOverview(ASynEdit.RightGutter.Parts.ByClass[TSynGutterLineOverview, 0]); + if OGutter <> nil then begin + for i := 0 to OGutter.Providers.Count - 1 do begin + OGutterProv := OGutter.Providers[i]; + if OGutterProv is TSynGutterLOvProviderModifiedLines then begin + Attri := GetUsedAttr(ahaModifiedLine); + if Attri <> nil then begin + OGutterProv.Color := Attri.Foreground; + TSynGutterLOvProviderModifiedLines(OGutterProv).ColorSaved := Attri.FrameColor; + end; + end + else + if OGutterProv is TSynGutterLOvProviderCurrentPage then begin + Attri := GetUsedAttr(ahaOverviewGutter); + if Attri <> nil then begin + OGutterProv.Color := Attri.FrameColor; + end; + end + else + if OGutterProv is TIDESynGutterLOvProviderPascal then begin + Attri := GetUsedAttr(ahaOverviewGutter); + if Attri <> nil then begin + OGutterProv.Color := Attri.Foreground; + TIDESynGutterLOvProviderPascal(OGutterProv).Color2 := Attri.Background; + end; + end; + end; + end; + if ASynEdit is TIDESynEditor then begin IDESynEdit := TIDESynEditor(ASynEdit); diff --git a/ide/editoroptions.res b/ide/editoroptions.res index d3b6c859722ed6279cbab315d1cffa3de79f225e..56f915469c32d12202dc1972f9ad09f943e23389 100644 GIT binary patch literal 65332 zcmeHQTXWk;cIHE>Qp2a@DX%D%t46HM+9X9%)Qq*e5+zyM=oV9+*^O(81%XWwD-d7+ zP_}mLf0pO`t;y+bT>3^_2#}H-OqIt{n|(X?KK-3$tyZgP@aOm6=^yx!`|sCgt#$-0 zzyDsZ4Qf}lbNKVVHiVx~Ysa+<_;Un*PHG3W5Abg{QQzjjeD_b`FK_?!d1h%3$n{Le z-rs7yZf^bQkM*~MtILzKcYmyF+S_yeAG*8n@Xzquz_A>6XiU)zdD_omx84^0XZXOS zj{jxgENmZ!i`wB|&U`d$X+P`M0_|@dp^3h*{H-@p$2X*B^y@pzxz#P@955DLK`=Or%1s2lfpF05p{zhzjzOidqcX(x`0;>JS@J`*n@9O3vgG8R5i9G zg6^lpH5{2<@*>{32-$02#+m(~Tjp|7Tv_IW#9U@+Jf&A<$Orr0c0Sop%8+B%b=-5) zMx0c3+x<>+ue)|W;E7MoyQu|#e62(|`^9lVtDMDLBbq_X4A$C6#$yidG-aKlZGuvf zMoFsDw+O@f8?r3t zleqJO^WC7?+|qq?JU0Eo!WD>p@ZSqvoUo_ZAZ-&iNE)RLvJ(y;Z9|yxWMND_bDfi3 z`BNnB^FntWC$P}5P!-%M-ks~H3A<#QZ3S&sH+TRJU(k;W$3~Aze^!vJH|Vo}XgS8cFyW>Cuq?vC5mYQly9&0_Hi50AQDWEET0F~e5%9wqZfoku@LPwyHZ3>+k{n+Mv0v9Dh}ux z1WDLaNCIt>hF5Vb9{y%FU*8OupajcCFHRmjI>#f1`k=$&d1#NciR8hJYU<6A&yWQ={OFA1v2s>~fqWi_P$IhoHnB?c`@5)`T z7QO}NmUHxgtQMJw>q8G2@{X8ZZMoMDi0xkTTsv~FcDvu~w%W=4I�(PN&`K_WH>k zyNZsz-JSkUM?p}QDm_KVoo=t!>Tol@eWT2~ynPcSYr;ef@}e3H60{(Q&xJ2G8ZpzKFTFqzcxaxuG=Rz?CQ zeuDSN1EoOY(IBe58UKME6DgFH<{P8r5`u9={p-c~XzUmZBA$w5X|f9VAQZO?AB}KgRN#3K zk1=eAu@0ghB*`jtp%HzO6b_CKZVpC6tQ5d`Uh#qiTh#pw(g~))${j3VRpuXE4Q~E+ zeY|99L6em;A6q2FkwB_M={mN3$kvYDqX}}6ZHUwsRzPw^Jn2d9dJevH6f;4=HbGT^ zWU7uT?xh-~Yu7Q5=Ybg+o!Or6E>v738{t=;#iYPG@i|ctiQu3RiG)a&L_@@?2B$Np zH-(hOn+q`xn^_8D55rRB{a2OVWAJcuG}32txDL_nu|TGCa|UOurBnjilF$Z+oo?dC za=4QWZUW{F(%IBK@#>x`ZnBKFdXN_BWDFRvFXA}O$-rPV%I$bI5iw+SLf0;uQ+0%p zohNL%DapZRY;c6}X>csq<&8N-U>wKDYvksS{Z`e(?A+1sW_nqw_7pq--Thg2O?)x8 zd>e`87c++A)L--mJ-5!S%BiCuCejswM!JGz^*uUM_RsD`T--WC|wzFx=3GB4h1h);^3;r*FTe+cwv=t zfIocn0QWMQENl{xdn1StM-PGZ_Et6DL>zeuJ-x0>0!GegiE4g*dd-n-_@Cz+BioVg z>m&bhp5U}$^#OWm1cAl94mT>xMFc*4{MkTr;zgqahVp!T5{O^oU|H2OyWVl19F4Be zM?mjU;v(<|uC0YPG9ayoPgBvx#PcO=e`A3ytcnwx!Ejir*zlJ50_om@f;L7UAQ2}R zneq(n5LuAzfkR4eBFo+tvm?W~Gf_K%tQ?tf801yqPDm3V@v;m&K2XQh3OkTQ{E<1C zj805AE96ZNRk?W51Fo^{JLsdhL{o}Q&}m`clP)6y9`%ITf}V+z z$_xYv()*Nr3iIhp^of~Tm^rxkOHvVLs4LfmTQl8SK3-~Wg^Y%mM3}~+wG1okVxnaz z#>lpS_h{ze%L@e;*AXF=u43rP|Mrg8kl((gngbAxnCI3+1Vj1c0+yX}yI5g7tvDeVd0 zb!iGXLtn@?K9~Tbf>Q;+d13>po}FIgFtaD}Mq&eH(%U!W!Z@e{z-@2eM0Eo2k3sbS z6dC;U>ssy4@ON^J!g=i)Y8K9dqJ-yBp8yCVGnR$7E0rhUF+#B>LJ5$sgxUfCaP@jS zeT)m{ZoNZD76-gjps7fcfOAn|sg4sX3m}uI zh83XD8BiI4`t0^4cyYn9hlsAE8iB)HVQf+P6DHRkgjcYfr31Jo0AxE7X0u=&K(zI$ z?tn#Z7evUj#SSt?-moIbFz2-jP8x&c<${hdC?g^j+vL(_eDb;jtTQ2Adky=O$_`q+ zPG_$x8{M^(9JHGKPOH=26@w0?lX;Ov2Wt zNlfLB(lu#VD#cl} z!BWee#Fkac1Ipw}68<@p{AXqCOVN|U^#EmZXG6rzh}m9(tC5jrNdjL2`oByH7nc8* zRRSQM5y5_~R05FO>Sh$N&Eox8L8758tv=yG9Kf;X4P`grCkvX>EbK_q;{4!#mexg6 z1TPZauTZ^WOyqh$734ojNJJ=qjGC?#Dn_eO!xPhnGd>YeH!sCV#|ltRpUhnvnS=Wy zgc?jSBtAlN0q@_7S4;xg!GcI zm!6K8OT8phs3ZkPtPq=>mprVo6AqQDOpRQC1}R|D@u`ui)MLV|eTSGC+~nYR>^jeq|utj_-6=fsvCTLV+e^ zUi!v8H5~jgD0l#eF$ut^WE?sRGz-xP+%u^$`m6{5HyMS#8OU)81U-UIaCm&;a50t3 zp+g$}yn5XJDIT{kkH1d@H0R?>0TsJ8G`V51@9@S7QgFg#GOU}hAaR8&Nm0A;&T=ne|<-K3e zM|hFJWuWBC%mWVWyU*1jINuYTysbet}-`g+9*#9-hHxsGb89Jppiab1-s_T~r8GN0D=b ztt}SF;bsy+;jKPLuLIW3ZG%QAC8656krSg9gly&u9%XLA@gNn{4xh2=A#6o)s3Jei!&? zVCnEZwaj-1uL6qa#|rNW2^-drj;F^y{-n=fePYmSg^s7sRu-YdO6d6D!9x!1Rb&z5 zyWYq*p|DsI{*mJtXsCR%w#fAS!{}J>%8{`Onf|!HRUy;wV`-x3c!G@*8X5Ek_&PAM zEM{ANjXSoH@i+zH%e~mT z2^On*%lt*ZWnKz0{h8st#kbG-Bi?fY%8S_Y=sRu%*FwTDDRdKib5^a@?6jNh-JWa* zSrB#wO%Ia|ELCzs)74pwf*5u6pk%d$!RksCSO!;Deps31R9=;Fmv(|!(w+k2 zc@1GgPfbvo*((*TuAYc+PMuL#QaCMNo1FtsLeWwo>fr+?QZ~X}DZ$SHQDo9}fyn67p>&weR!z=k% z0vKLtwbvkWn*_kC1u8J-kN(uLL+A-9QBQl7T|Hc0`FueZB1<%r_to}ti1;G0@k-Ur z>w~$^KR+J?U9To3729Gk``Tx~*&ik1>~Ctn0IL2R{=BQ5)@}lH{d0I{{^pZunRin^ zzO-KjRUeKL9%=~Tm*VLe$h(Mr=5J}$1!6n6NtQ|(}%8Z z+#~-&_l>C*MQNn&Q-JyvgxE*mCS0$;VU>1T-F~yz5nuBRvfAaYqI!ZJ(BT!(pRc|t z4F@k1HVkP6DK2fs3g}NU-_;ZJ(R0YL#oxt_RkHXejx|POjFJ`bc#*;79#xK7xv-&n zf}W|~tDc}|h(Rg>B%zDz2ySNc^_3D-PtY%^<0u8_{~VF^^gtoW+Y{9!^!GZu{Z3yt zx`|-@oi3bL+U@jShY&g=mowYD&7Hk|x0T*Eiodz;!FQuc^kebxRh2-PLSdjJs%Uxs3ciuwIln`JMbSDAtqbT)uI1OB)~(n zTT6%{m0@6J$CShIBw+p(l2kBG*bv%W6q;my=EnUi*|;9w6axHbP`M{!2n%uMuQ(WW zP3BsD*ncs$CBgj_ijqSEzeSxYi1{zZs?E{97!F%BQ><3-er-AMU!)X`RtiJ@#bNWE zi*oA9%L4j`7f6hy0>+hq^v__fOP9AzqW(phqN2LO%lG0y`GoVOT89*OnDhPnVl;e_ zFn_h;7W2Mb@8^g57d=d}46TUvFD6RgraBe^`zr}r!Tc+j|9W8lqPS7NTo%Az9Gy7p z5)gST?=DdNJ(@WWXfV}X`a9d{ z*d90PudZR(*>?D%#HBt%jUVZxADgdV2mg$3+-bbg_*HWzTF`v+I7f}2>R;+~xrTbV zhGTnv)&)xoB>VsPYEG8fY`~J}kF8)O^f$5+ZC~5|0_*u`=pOQ5G5BxI^K~E1knLwA znY02jN-!%XJrJO-X+LUTejRO zmZbqdeJ|_EvWhqPjt3&!AR}br?LdUj>?s1=C7=lLavF{L+%+FSVCwbx;?^<^LTybW zGVCr4-*L486bbkUGk=Uc&@$3^gnx7%f6_qRT-O}KzXOl3EaGvoB9kBZ{o2lxZ@(Wt^I(!fo$%;%I7uzxTOWOuvAU!5Z_L+En!|wmi;U%CueB@D4QiQ=o77 zBjaXQWpOlC;4z5R*$#fu8sJ=mp9AN~EfN%QiaujCJVl=Y*|I&*-LYxw)^_8EJ}^CK zz4qM?XSNT{4qEFU%?TC~b0WzIG)2s{p;`iVt6RX(DY7Z=%n4>4e5`cNB~8t3S>lU1 z!A=YM<7En4qJDHes*to|;&Q>KVOpbrWMp~RuV<8$RAEnA07tTV98J`fo_`+N79eE& zGbh|}b08tu9uZmn5-NHFLMd)ukWOcUeRL30Kp=>JL-u0kWh8ind8mI!AuN=3*2w2LsIvqw$D)}3=2yMD1G80 z1OYn@N`DxmiN3HPc!%9fx&UJs!t#RnEpW$ptkRr8us-krG*pVcz|F-YiH}J8>o5RX zy2D_EA8<*}eyi~suQH5>K21%Fs1W&~e8WSB4YqRbIP-xMm_FjNIDwYvO*&&^N=Jzd z4UjlxTx=me;y?*o2NE!qZc@pp!Nw?-GsBMXa>$*z7qY!qJmF*t4Hub_ia@GFU9Y*+W!Hf+DQWd literal 66296 zcmeHQ>u%dfme!B`(*^=8_6Z2XK-<{fM6zW??ulo{mhITHzGx$-GqXWMpsA9@F-2-g z%894bzxP%4G4`GI0eVkec&Q61-Xvd|0US$ZvFg;h)u~h8DK#36h6X>s{YHP_CHL?D znvKR0wEXtlTBFyvYMjH*hsFS2pEiyg7w~fgKPQcY#z*+ub@*)apTGO3;LW=~eVtm` zJ#szMvG>;KT*xkui>+n!@N?!cI!De|(Hgw59!|TXVF(euT#Q-167oM3259&qnXxTh5JcsmFot zC>gAu@F@-cz0)T;Yu65ShV^M;`ebm9WH__l~2AsM!QW1-QZi}bsh zf|3ttBvL_VR3#Bdrk75|dlw;l`E;Dw_qt^!GvmrK?)WpPv( z*58n2IbX!NmmTmLO=p(wqvMh3_vWs^?}PuE>*9zV#T03qFh$ZRPcc5?;K4S8Ay4MU z#50#V>Xko1;!H1e*KwG)jx?+6T=D!|N6p)WiEb;{OWOqYl17=m(U1z}D%?eNQJ1+@vpgO&8anoV@rope}~6e-ePb61MgX`4U>X_Ofn zk#RtY5VT=Wp$)W6>R&0asQ>HfY>7i$f+-|*Ujc`3_ne$!5&&Bk_ey)DP2>=6OppNX zKZQYx5s2Ky5pbhC!i6(3$0iz)$eZ6u2A()(9=i}vsd~ZA2D=^8zP*O6li+2Q`&6dF zGDYv_zK`4in(40YJ8qV~$lf)nC!vEw-#*a|q+rDd9QuR#-b19Ev>o}e?d@)J zx3#_C!M6NhYp1>4+U;}~Jh`iQvh#MQyVLG0c(S8-a%Z>GX|?$=-@Q?%P~N>^nU^rB z0%;)o_Uh*E$ng8RXXutP_miHJIq*C*g@p`aQ7-#JZAOq9C@62D6m9y~H# zAX0Y!Bo<74@^U`Ck%%MFjxfXr2QR`rfuS^Rsk6n7R$e*hjdP5=Kd;Kn!q@oyMMhnAC4SjPV`lk z5?x>xKIq8J+($#4{S-8SMOJYofZh(mM@TMJc!mb(scP9fI=DU<4zQts8t~@G5@_M` zXOJf_4Neb%gu;q&bk)25TmLv=aKXUUV;@^2eUZYibX7aHeMrg2*mX@@7KJ63-tk$n+Q1#lliMVxg3-h)pt>O=h7#d;7wI;YIcF z^6am}!30iDh6BSjXZ|YXwiL!!x_ye<2k(yib9ZL(`HgflkvPo@qW|DeR=d9{X*DO7 zqsze_q<@9j@f3a4N061CLI!|mp(@h6bnKxUY?klP1KBV0k7d}bWLB&z1GXv|$jW2+ zRVyGI=J@(oa&RwDs@N~9?!GD~ul7C0KuMho)S=vGm?v7!gh7ge4>2Us%qB8L52%;v^sTu!G$5ylcWL45r0pv(VU-awP{wOfZ!oA>i{dH` zv%5gLH>c>2;YY{<3O=YxZ#+O2d{Y=OT#!*LAd)u9prR>f5% zosALKcy1n<{7UghaAHPIjVuK4~vopk0vx)U}<(hE%rd!D!E>7o=?l4hA zcyTzGVPz&KBt+3kMiM@tse=zz6v9-5M_dLgWS3&eO4nvGc}z2}%ol^<(bZshgMooV z3zTdQD`)}5E_U*v3a8auYQbkKrVqX|%nR_*w`^AFtWxrXXWQB3*>GIU1*qpI>YsXo z!C6MA2GZJ|KC^&qeljyBlsuVK42s_6knQSoR07~$DE|{nzZLz@HPS6{@1=}P0$5$# zd4s$IR)*|gTvNIl;n~ETbe4x9=Xq}ea0|96fF6qcr+R#P))XHS3Kh za=8Pb$2y&zE=DMGXZHadj065DkX)omK-Z{oT*s-!4sgoQ+3s%dET4`A^$tmdL?s~+ zqNx-=7S%g2_sEMSh90VjjP!bkByKE0J(ML6vC4qxtgm_|;IJfuE5*YkjNtDA@KQuI zmJ^dqA49Ye{LKo;Nf5Jhm(VRJxiDjBb6=*xc^1je{KvSqB2}xm^jYN>I!(3z!9Ep zaeQ}vUZq0mpIIS9wnK}$76N%f6@?5eXSu!bBtzv43fDrEt8w7$o%)ox3Gl|jq1_8u zNA(pB*_8CLiX8ZbD#MDv9S8GIFFt;j^=?5ygF^P4gn8j-sAu3hThdP>?8*_OjVE}wV&w?DHe~V3 zSrrb>YgSr%z$q1tj%i&C9~uFaK7Ta4l0~(wzs)3=RO2pEX27w%bQ0p(78s9TCy#Ji>t8JwSU}VNiQ*$1Je`l{ilwF z-(0aPg5n;7c9DATKM5>_B}s|_LvA?R2Y&l@|giG#YwJ(t^EDOu7`sR%a@AT*6zR>x`uv#Q5d?+$z8HTl!;K7hKYhFKg#lr}~n9J;apPm-Mgll78Nv9_v1SvYC~) ztxLO%pA~`1BZ_zVb9eA|p(3`^UUad3jXB53HS(`4=A6%ml!l!1-C+t75$B{#Lr{;T z6exUUqVUNic)8-r7bS`#sHYUV<&Nuwgbj^1`0bzYxDqt2P8lh0rXoYc`wTLIJYQ)- zF#gpFVMePs6rCS}h%UQ07Up^L2w|mMtQe%O;Nr`|s4GmdzMcP(5$V}{3HahN&~;w3 zsSBzExz2aY){M%p=2v}p(bIsbXIWQN*BDBR1qgVRcy?ZHR3Xa1+4=sK7(3)yi&D|+ zvM($fKa|5uFDue0fNEC=GkY|VPeA2R>{+bu@uUJK9U>Q!BhR!bu?XJ1l_N0AmaIMbMBw=8qKo|otH8Tw z@!(5PywyVEdF`S~TL>A?ca&32pR=z>T_kf~&0mU*&lVt`V8tbuW$y9SVdTp!JZZ{Q z7)@VFr(UXQmc-dBcv{2kow+^QuVMB}yfvOzJGxv~hqC8;Cu?}633&BReK|OLelC<# zmBH-!&QpUOgzVV&ZWcw^!-gcYBTidGDgopxX1`EPYCL{;lm@b7czm9bR7Wd-<2U{X z@c8}Id*%Cp#UB7B|DbUW|DTh01Gr=U01@+^edXE!}^XtQ$iNVq9Je&2IcwNQNp2Y*>S4`3@b zu^KE-?v<^<^6;g8k?*32ec>xMNMjs>LLF}WN^}{}9l6V>_bM-8$6#{dcJd$>A>cf# z994BkdE6CLH`f|0-`?Gkz8s>gEF-Q;cfaErb2y6yt z4@9ZZlmhs3@yd37>?ek=7t!wFSN5pD#R@eUA=`&^+|2r9+9T%+=Y?9$_I7joZAZb@ z_%-A;S{`pQ$-lB_`GllIY1n*1znJC<@bhYuNJ7x7KdsDas!!0k<2*slX&fTxd0D)- zf{Y+@m%vz>!mAiSpD-2?qB^6lX7$1xZ4OyH7Hca;)u*xcCBf^}3Q=GA{@7Q(D*^Tj zw*&6F48%S`&8fGl1Z$r#0$XS*2i>dn`DwuJ)k~2IXs;IZDxvlXVxx*t26La#@lpei z9LrY<`d+PC`D2fjVY?MtlqpIn0KQL?YMw|Wm!!(U@YUA%n8E>Ho&$QHz;bG#MKJgY z9p;WE(~!k#8_FT|7iey!!T41PZmD7@iHBDBvbeeM8JQF)egdzk)l`7VPw0OIM)d3e z`f8C@fzMaF_N8dxYBBi<+QoeSgFkWX5Vu0=@)urPpU`7&eSK!WBU2od|6cp5xcO}1 z`f8iby=Zd}JV|`MVxpOJsxVZ)D%E<4hFTJ_pT^o6x?e;0hab??St4{lLI3EgULA%% zVHmR17drt608zr}ih9Gp958>vq$uwyL-i+&k`g6lyF_2fzt(Itj#6>|*Nsnr@;`^4_l?uWHADM9nY;L}znGSJ zJMm-4gJLNEpre=!KnjWY{ulyZgkcL_54xytC}g$8ua;RLhd;6_Zh4(~pivre9Yc zh>-Q_F!C~QgVdJ$<@<88T2Q?7g zS$$1^eNBI88$=o8;IEp>gQrZ;o&fP=ALI?0w>S1E?aoJ)7@z=s_5vD%?8KP*3NFH(`t7)nFQ%9 zDa%s2U_t7UXwQM?p(&&qcx_QjTb-6x-O`*?sPICs`j=QsvyK%PD@dcHX3ynYTPr=H zC|jjKLd>`~Nm2ZB-M+23Izi3LmsFRaG|T$h|KG#4|B`Z3cT`C=g48!#MJlgDQ0ec} zs6wE-V?Ki!_hgX5R~Da0E)PDq%8CR@bW|VEs=$B7S%-I(yK#=;%sjSc0Z!8FZ^4A}fW#+T3J4mqTlFK#s_>(L{kd~qa zDpk1rpsZ%SU^6XQeW2!SU3XB|9W1-Ye>^Y7M06P<~Zb zWgzvR8VWt$*9S;+Qa)5tSs?YDO=aquf*78CK@3p7nxN76-+yT|{>zNec(I_nay z%iQ{rj{Ld#`ZfDAMh?(0W$S0n8EdTh`eBB){_tw;+p9H7wV|fkaBR=dLAOjMVa4Z- z86md01%%O;Ek+N0N9fV^wassss?Ub*ArC0RzctU-eKds&9J8}eCWG|EhQ^`*Uc6e< zv>&x^FdqI5zmPrJI2ervXlfb&L$)`8%b#x$&~bxqO!-l+U6J2pAgbYi7FG1@cff_1?uj3V@w}@!RxzT;{=DD&_U zQH~Mvz$!`W5q{}B{6T}#N!K+;_yZt3`2RB*6&pW!!B5_Hp2*y(u7%`ct5=Xq)QK|S z4V!T|;in}(*YS}7!p$bka1vR>N_4}U;J%rJv2aJ|W`1kgWelHnvHAJ?jlSy`Xf$^b zR^81l?fY*(Z^N!~H$YRhmV~=!Hq(P`ijQ1aTDG(w_k-5vmgYMe z9OI1w+ajOa+R{c2GojDW$qgg5fZNVs?@WJKCGnE2?0kX8rFAz#O*kK4ATT zUmDmAnw5$mp%-Ek8ZeD?mdHN%Bo2b`uw!hV);lxD45gT%BSRpRg_3OT$Gug%$S^WtWud`Zw7OhhJdg;Dw7(9cue8asUVgyk zPy4N{*O*+;FDCpi6VoDgM_w$+ebK(ztj-;0)^nI2rK_T#{j#Z%4zPQsJ%#QHvwczL z#K(Nb!5VfiBxqZXlO|oWNm2l9#@S)I2n+DuDZ3HK*1edIzy-oayc6QM81D>Bqr{Fo zi4Bn)@Y+m1g~JpBzHh*>Vc(j=uVpa*Bq~A{VGH_kAA(D=<;L&uWy)LMgK20QGy+9G z?hlYPCJpCk3~$+oo7iJ(8hl@i*!0O9`4h466ye(o#MYiZ!+}IZ0&57VpazOl591l; zSZFi4rJeM98Wg4^Esz=b^UKEB$HjXck z&Q9PJCc}3|4$yJ!961_n6{nhkH-CY^rt|@ nil) and + (FCurrentColorScheme.AttributeByEnum[aha] <> nil) and + (Element.StoredName = FCurrentColorScheme.AttributeByEnum[aha].StoredName); + end; begin if (FCurHighlightElement = nil) or UpdatingColor then Exit; @@ -536,22 +542,21 @@ begin BackGroundUseDefaultCheckBox.Caption := dlgBackColor; FrameColorUseDefaultCheckBox.Caption := dlgFrameColor; if FCurrentColorScheme <> nil then begin - if (FCurrentColorScheme.AttributeByEnum[ahaModifiedLine] <> nil) and - (FCurHighlightElement.StoredName = FCurrentColorScheme.AttributeByEnum[ahaModifiedLine].StoredName) - then begin + if IsAhaElement(FCurHighlightElement, ahaModifiedLine) then begin ForeGroundUseDefaultCheckBox.Caption := dlgSavedLineColor; FrameColorUseDefaultCheckBox.Caption := dlgUnsavedLineColor; end else - if (FCurrentColorScheme.AttributeByEnum[ahaCodeFoldingTree] <> nil) and - (FCurHighlightElement.StoredName = FCurrentColorScheme.AttributeByEnum[ahaCodeFoldingTree].StoredName) - then begin + if IsAhaElement(FCurHighlightElement, ahaCodeFoldingTree) then begin FrameColorUseDefaultCheckBox.Caption := dlgGutterCollapsedColor; end else - if (FCurrentColorScheme.AttributeByEnum[ahaCaretColor] <> nil) and - (FCurHighlightElement.StoredName = FCurrentColorScheme.AttributeByEnum[ahaCaretColor].StoredName) - then begin + if IsAhaElement(FCurHighlightElement, ahaCaretColor) then begin ForeGroundUseDefaultCheckBox.Caption := dlgCaretForeColor; BackGroundUseDefaultCheckBox.Caption := dlgCaretBackColor; + end else + if IsAhaElement(FCurHighlightElement, ahaOverviewGutter) then begin + ForeGroundUseDefaultCheckBox.Caption := dlgOverviewGutterBack1Color; + BackGroundUseDefaultCheckBox.Caption := dlgOverviewGutterBack2Color; + FrameColorUseDefaultCheckBox.Caption := dlgOverviewGutterPageColor; end; end;