변수로 가져온 스트링을 클립보드에

Question

Lv.0

등록일: 2014-11-122014-11-12T10:22:34+09:00 2014-11-12T10:22:34+09:00카테고리: AutoCAD & CADian

변수로 가져온 스트링을 클립보드에

스트링을 변수에 담았는데

이것을 클립보드에 넣어두려면 어떤 명령어를 사용해야하나요?

3 답변

xcsh · Answer 1 · 2014-11-12T14:24:02+09:00

;; http://www.theswamp.org/index.php?topic=21764.msg263322#msg263322
(defun _SetClipBoardText ( text / htmlfile result )

;; Caller’s sole responsibility is to pass a
;; text string. Anything else? Pie in face.

    (setq result
        (vlax-invoke
            (vlax-get
                (vlax-get (setq htmlfile (vlax-create-object “htmlfile”)) ‘ParentWindow)
               ‘ClipBoardData
            )
           ‘SetData “Text” text)
    )
    (vlax-release-object htmlfile)
    text
)
Code: [Select]
;; MP
(defun _GetClipBoardText( / htmlfile result )

    (setq result
        (vlax-invoke
            (vlax-get
                (vlax-get (setq htmlfile (vlax-create-object “htmlfile”)) ‘ParentWindow)
               ‘ClipBoardData
            )
           ‘GetData “Text”)
    )
    (vlax-release-object htmlfile)
    result
)