为什么在这里就会出错？

lite

1. 
   
2. (lambda ($KEY $VALUE $DATA $REASON $X $Y)
   
3.   (PROGN (START_IMAGE "image")
   
4.          (FILL_IMAGE 0 0 DIMX DIMY -2)
   
5.          (END_IMAGE)
   
6.          (SETQ SLDNAME$ (NTH (ATOI $VALUE) SLDLST$))
   
7.          (IF (WCMATCH (STRCASE SLDNAME$) "*.SLD")
   
8.            (PROGN (XZJ-DCLST-SHOW "slb" nil)
   
9.                   (XZJ-DCL-DISABLECTRLS (QUOTE ("slb")))
   
10.                   (SETQ SLBFULLNAME$ (STRCAT SLDPATH$ "\\" SLDNAME$))
    
11.                   (START_IMAGE "image")
    
12.                   (SLIDE_IMAGE 0 0 DIMX DIMY SLBFULLNAME$)
    
13.                   (END_IMAGE))
    
14.            (PROGN (XZJ-DCL-ENABLECTRLS (QUOTE ("slb")))
    
15.                   (SETQ SLBLST$ (XZJ-SLB-ALLNAME (STRCAT SLDPATH$ "\\" SLDNAME$)))
    
16.                   (XZJ-DCLST-SHOW "slb" SLBLST$)
    
17.                   (SET_TILE "slb" "0")
    
18.                   (SETQ DIMX (1- (DIMX_TILE "image"))
    
19.                         DIMY (1- (DIMY_TILE "image")))
    
20.                   (START_IMAGE "image")
    
21.                   (FILL_IMAGE 0 0 DIMX DIMY -2)
    
22.                   (END_IMAGE)
    
23.                   (SETQ SLBNAME (NTH (ATOI $VALUE) SLBLST$))
    
24.                   (SETQ SLBFULLNAME$ (STRCAT SLDPATH$ "\\" SLDNAME$ "(" SLBNAME ")"))
    
25.                   (START_IMAGE "image")
    
26.                   (SLIDE_IMAGE 0 0 DIMX DIMY SLBFULLNAME$)
    
27.                   (END_IMAGE)))))
    

<br /> (lambda ($KEY $VALUE $DATA $REASON $X $Y)<br />   (PROGN (START_IMAGE "image")<br />          (FILL_IMAGE 0 0 DIMX DIMY -2)<br />          (END_IMAGE)<br />          (SETQ SLDNAME$ (NTH (ATOI $VALUE) SLDLST$))<br />          (IF (WCMATCH (STRCASE SLDNAME$) "*.SLD")<br />            (PROGN (XZJ-DCLST-SHOW "slb" nil)<br />                   (XZJ-DCL-DISABLECTRLS (QUOTE ("slb")))<br />                   (SETQ SLBFULLNAME$ (STRCAT SLDPATH$ "\\" SLDNAME$))<br />                   (START_IMAGE "image")<br />                   (SLIDE_IMAGE 0 0 DIMX DIMY SLBFULLNAME$)<br />                   (END_IMAGE))<br />            (PROGN (XZJ-DCL-ENABLECTRLS (QUOTE ("slb")))<br />                   (SETQ SLBLST$ (XZJ-SLB-ALLNAME (STRCAT SLDPATH$ "\\" SLDNAME$)))<br />                   (XZJ-DCLST-SHOW "slb" SLBLST$)<br />                   (SET_TILE "slb" "0")<br />                   (SETQ DIMX (1- (DIMX_TILE "image"))<br />                         DIMY (1- (DIMY_TILE "image")))<br />                   (START_IMAGE "image")<br />                   (FILL_IMAGE 0 0 DIMX DIMY -2)<br />                   (END_IMAGE)<br />                   (SETQ SLBNAME (NTH (ATOI $VALUE) SLBLST$))<br />                   (SETQ SLBFULLNAME$ (STRCAT SLDPATH$ "\\" SLDNAME$ "(" SLBNAME ")"))<br />                   (START_IMAGE "image")<br />                   (SLIDE_IMAGE 0 0 DIMX DIMY SLBFULLNAME$)<br />                   (END_IMAGE)))))<br />

在(STRCAT SLDPATH$ "\\" SLDNAME$ "(" SLBNAME ")")部分出现错误，是什么原因？

lite

看来解决问题还是自己，此问题已解决！出现了一个新的疑问就是在我预览时，命令行有时会出现下面的提示，是为什么？？？


多边形顶点计数 (68) 错误

多边形顶点计数 (23) 错误

多边形顶点计数 (50) 错误

多边形顶点计数 (65) 错误

多边形顶点计数 (68) 错误

多边形顶点计数 (23) 错误

多边形顶点计数 (184) 错误

多边形顶点计数 (125) 错误

多边形顶点计数 (120) 错误

多边形顶点计数 (125) 错误

多边形顶点计数 (85) 错误

多边形顶点计数 (153) 错误

多边形顶点计数 (121) 错误

多边形顶点计数 (124) 错误

多边形顶点计数 (85) 错误

多边形顶点计数 (68) 错误

多边形顶点计数 (23) 错误

多边形顶点计数 (86) 错误

多边形顶点计数 (100) 错误

多边形顶点计数 (158) 错误

多边形顶点计数 (139) 错误

多边形顶点计数 (75) 错误

多边形顶点计数 (74) 错误

多边形顶点计数 (232) 错误

多边形顶点计数 (140) 错误

多边形顶点计数 (74) 错误