diff --git a/Help/tslvclhelp.CHM b/Help/tslvclhelp.CHM
index ee34e88..cbf1877 100644
Binary files a/Help/tslvclhelp.CHM and b/Help/tslvclhelp.CHM differ
diff --git a/funcext/tvclib/utslvclconstant.tsf b/funcext/tvclib/utslvclconstant.tsf
index 8b8ca53..69f9e0d 100644
--- a/funcext/tvclib/utslvclconstant.tsf
+++ b/funcext/tvclib/utslvclconstant.tsf
@@ -5,6 +5,11 @@ unit utslvclconstant;
 **}
 interface
 //******************常量类型**********************************
+type constant = class()
+    {**
+        @explan(说明) 为方便使用,利用静态成员变量模拟的常量,请不要修改其值 %%
+    **}
+end 
 type tenumeration=class
     {**
     @explan(说明) 自增长常量基类,其子类的静态成员变量将分配自增长的一个整数值 %%
@@ -45,12 +50,12 @@ type TAlign=class(tenumeration)
     @explan(说明) 自动对齐类型常量 %%
     **}
     {**
-        @param(alNone)() 不对齐  %%
-        @param(alTop)() 上  %%
-        @param(alBottom)() 下  %%
-        @param(alLeft)() 左对齐  %%
-        @param(alRight)() 右对齐  %%
-        @param(alClient)() 占满  %%
+        @param(alNone)(constant) 不对齐  %%
+        @param(alTop)(constant) 上  %%
+        @param(alBottom)(constant) 下  %%
+        @param(alLeft)(constant) 左对齐  %%
+        @param(alRight)(constant) 右对齐  %%
+        @param(alClient)(constant) 占满  %%
     **}
 
     static alNone;
@@ -66,10 +71,10 @@ type TAnchorKind=class(tenumeration)
     @explan(说明) 锚定类型常量 %%
     **}
     {**
-        @param(akTop)() 上  %%
-        @param(akLeft)() 左  %%
-        @param(akRight)() 右  %%
-        @param(akBottom)()下  %%
+        @param(akTop)(constant) 上  %%
+        @param(akLeft)(constant) 左  %%
+        @param(akRight)(constant) 右  %%
+        @param(akBottom)(constant)下  %%
     **}
     static akTop;
     static akLeft;
@@ -157,9 +162,9 @@ end
 type TMouseButton=class(tenumeration)
 {**
     @exlan(说明) 鼠标按键情况 %%
-    @param(mbLeft)(integer) 左键 %%
-    @param(mbRight)(integer) 右键 %%
-    @param(mbMiddle)(integer) 中间按键 %%
+    @param(mbLeft)(constant) 左键 %%
+    @param(mbRight)(constant) 右键 %%
+    @param(mbMiddle)(constant) 中间按键 %%
 **}
     static mbLeft;
     static mbRight;
@@ -170,10 +175,10 @@ end
 type TShiftStateEnum=class(tenumeration)
 {**
     @exlan(说明) 功能键常量 %%
-    @param(ssShift)(integer) shift %%
-    @param(ssAlt)(integer) alt %%
-    @param(ssCtrl)(integer) ctl %%
-    @param(ssDouble)(integer) 双击 %%
+    @param(ssShift)(constant) shift %%
+    @param(ssAlt)(constant) alt %%
+    @param(ssCtrl)(constant) ctl %%
+    @param(ssDouble)(constant) 双击 %%
 **}
     static ssShift;
     static ssAlt;
@@ -301,9 +306,9 @@ end
 type TAlignStyle9=class(tenumeration)
     {**
     @explan(说明) 九宫格对齐常量,al9_ 开头 %%
-    @param(AL9_DEFAULT)(integer) 默认 %%
-    @param(AL9_TOPLEFT)(integer) 顶部 %%
-    @param(AL9_CENTER)(integer) 居 %%
+    @param(AL9_DEFAULT)(constant) 默认 %%
+    @param(AL9_TOPLEFT)(constant) 顶部 %%
+    @param(AL9_CENTER)(constant) 居 %%
     **}
     static AL9_DEFAULT; //0
     static AL9_TOPLEFT; //1
@@ -321,9 +326,9 @@ type TAlignStyleH3=class(tenumeration)
     @explan(说明) 水平对齐常量 %%
     **}
     (**
-        @param(AL3_LEFT)() 左  %%
-        @param(AL3_RIGHT)() 右  %%
-        @param(AL3_CENTER)() 居中  %%
+        @param(AL3_LEFT)(constant) 左  %%
+        @param(AL3_RIGHT)(constant) 右  %%
+        @param(AL3_CENTER)(constant) 居中  %%
     **)
 
     static AL3_LEFT; //0
@@ -360,7 +365,7 @@ type TSysCursor=class(tenumeration)
     end
     {**
         @explan(说明)idc_ 开头的 光标样式 %%
-        @param(IDC_ARROW)() 类型  %%
+        @param(IDC_ARROW)(constant) 类型  %%
     **}
 
     static IDC_ARROW; //MAKEINTRESOURCE(32512)
@@ -403,13 +408,13 @@ type TMBbtnstyle=class()
     @explan(说明) TMessageboxADlg 按钮样式常量%%
     **}
     {**
-        @param(MB_OK)() 样式  %%
-        @param(MB_OKCANCEL)() 样式  %%
-        @param(MB_ABORTRETRYIGNORE)() 样式  %%
-        @param(MB_YESNOCANCEL)() 样式  %%
-        @param(MB_YESNO)() 样式  %%
-        @param(MB_RETRYCANCEL)() 样式  %%
-        @param(MB_CANCELTRYCONTINUE)() 样式  %%
+        @param(MB_OK)(constant) 样式  %%
+        @param(MB_OKCANCEL)(constant) 样式  %%
+        @param(MB_ABORTRETRYIGNORE)(constant) 样式  %%
+        @param(MB_YESNOCANCEL)(constant) 样式  %%
+        @param(MB_YESNO)(constant) 样式  %%
+        @param(MB_RETRYCANCEL)(constant) 样式  %%
+        @param(MB_CANCELTRYCONTINUE)(constant) 样式  %%
         @param(MB_HELP)() 样式  %%
     **}
 
@@ -427,10 +432,10 @@ type TMBiconstyle=class()
     @explan(说明)TMessageboxADlg 图标样式常量%%
     **}
     (**
-        @param(MB_ICONWARNING)() 样式  %%
-        @param(MB_ICONASTERISK)() 样式  %%
-        @param(MB_ICONQUESTION)() 样式  %%
-        @param(MB_ICONSTOP)() 样式  %%
+        @param(MB_ICONWARNING)(constant) 样式  %%
+        @param(MB_ICONASTERISK)(constant) 样式  %%
+        @param(MB_ICONQUESTION)(constant) 样式  %%
+        @param(MB_ICONSTOP)(constant) 样式  %%
     **)
 
     static MB_ICONWARNING;
@@ -516,12 +521,12 @@ end
 type TSystemCursor=class
     {**
     @explan(说明) 鼠标常量类,作为参考ocr_ 开头 %%
-    @param(OCR_WAIT)() 样式  %%
-    @param(OCR_CROSS)() 样式  %%
-    @param(OCR_UP)() 样式  %%
-    @param(OCR_SIZE)() 样式  %%
-    @param(OCR_NO)() 样式  %%
-    @param(OCR_HAND)() 样式  %%
+    @param(OCR_WAIT)(constant) 样式  %%
+    @param(OCR_CROSS)(constant) 样式  %%
+    @param(OCR_UP)(constant) 样式  %%
+    @param(OCR_SIZE)(constant) 样式  %%
+    @param(OCR_NO)(constant) 样式  %%
+    @param(OCR_HAND)(constant) 样式  %%
     **}
     static OCR_WAIT; //150
     static OCR_CROSS; //30;
@@ -568,9 +573,6 @@ end
 type TSLUICONST=class(tmacroconst,tconstant)
     {**
     @explan(说明) 界面库常量类 %%
-    @param(opRemove)() 移除 %%
-    @param(opInsert)() 插入 %%
-    @param(opRecycling)() 销毁 %%    
     **}
     static WM_TRAY;
     static opInsert;