면적산출 리습 질문이 있습니다. //

  안녕하세요.

  면적산출 리습을 잘쓰고 있습니다.
 
  산출시 상단에 “Area Table” 이라고 표현되는 부분을  레이어 이름으로 바꿀수있을까요?

  도움주시면 감사하겠습니다.

;┌─────────────────────┐
;│              ♥ 일괄 면적 표기 ♥
;│        Program By.   Jeong Kil Bok
;│        E-mail:   810storm@Daum.net
;│        Sep  26, 2008  Rev. Oct  07, 2008
;└─────────────────────┘


 (if (setq pt (getpoint “n>> 테이블 작성 포인트 지정:”))
    (progn
     (setq table (vla-addtable space (vlax-3d-point pt) (+ cnt 3) 2 (* $tsz 2) (* $tsz 10)))
     (vla-settext table 0 0 “Area Table“)
     (vla-settext table 1 0 “No.”)
     (vla-settext table 1 1 “Area”)
     (vla-settext table (+ cnt 2) 0 “Total”)
     (vla-settext table (+ cnt 2) 1 sum)
     (foreach x arlst
      (vla-settext table n 0 (itoa (- n 1)))
      (vla-settext table n 1 (cadr x))
      (setq n (1+ n))