diff --git a/designer/utslsynmemo.tsf b/designer/utslsynmemo.tsf
index 5659823..e51cc94 100644
--- a/designer/utslsynmemo.tsf
+++ b/designer/utslsynmemo.tsf
@@ -1251,7 +1251,7 @@ type ttfmhighlighter = class(tcustomsynhighlighter)
         ExecuteCommand("string",array(('"',"\\")));
         ExecuteCommand("keywords",array("object","end","inherited"));
         ExecuteCommand("rowannotes",array());
-        ExecuteCommand("blockannotes",array());
+        ExecuteCommand("blockannotes",array(("{","}")));
         ExecuteCommand("syms",array("{","}","[","]","<",">",":",",","="));
         ExecuteCommand("pairs",array(("{","}"),("[","]"),("<",">"),("object","end"),("inherited","end")));
     end 
diff --git a/funcext/tvclib/utslmemo.tsf b/funcext/tvclib/utslmemo.tsf
index d1955f4..d373078 100644
--- a/funcext/tvclib/utslmemo.tsf
+++ b/funcext/tvclib/utslmemo.tsf
@@ -3305,7 +3305,7 @@ type tcustomsynhighlighter = class(TSynHighLighter)
                 begin
                     SetTToken(tokens,ttk,idx-1);
                     bostr := ostr;
-                    ncost := array("str",bostr,fstrstires[bostr],fstrstires_zy[cst]);
+                    ncost := array("str",bostr,fstrstires[bostr],fstrstires_zy[bostr]);
                     SetTToken(tokens,ostr,oidx-1,ncost);
                     idx := oidx-1;  
                     return ParserTokenLines(s,idx+1,e,ncost,tokens);