홈/ 질문/Q 113330
다음
진행 중
Hrimsorrow
Lv.0
등록일: 2021-09-09T08:28:44+09:00 카테고리:

명령줄에서 옵션 클릭할수있는법 알려주세요

pline이라던가, undo같은데 보면 명령줄에서 클릭으로 옵션 변경이 가능하던데,

그건 어떻게 해야하는건가요?
공유

    관련 있는 질문들

    1 답변

    1. aalan
    2. Lv.0
      더 좋은 방법이 있을 거 같긴 한데, 저는 이런식으로 합니다.
      (defun c:otest ()
      (setq pttype 2 )
       (initget 128)
       (if (setq pt1(getpoint “n기준점을 클릭 또는 옵션버튼을 선택하세요 [Select/Move/Delete] : “))
         (progn
           (cond
            ((= (type pt1) ‘LIST)
              (setq pttype 0 )
              (alert (strcat “기준점을 클릭했습니다.n” “X ” (rtos (car pt1) 2 2) “nY ” (rtos (cadr pt1) 2 2) “nZ ” (rtos (caddr pt1) 2 2)  ))
            )

           ((= (type pt1) ‘STR)
              (setq pttype 1 )
              (alert (strcat “Option 버튼을 클릭했습니다 : ” pt1 ))
           )
            (t)
        );cond end
       );defun end
      );if end
      (princ)

        
      (if (= pttype 2 )
         (progn
             (alert “작업 취소”)
             (exit)
         );progn end  
      );if end

      )
      • 0