(defun dllset(ndame mi im imx imy gla)
(vl-load-com)
(setq acd (vlax-get-acad-object))
(setq srv (vlax-invoke acd “getinterfaceobject””han.main”))
(setq yy (vlax-invoke srv ndame mi im imx imy gla))
;;dll 인수를 받아오고 싶은데 어떻게 해야 할까요?
(princ)
)
(defun c:test()
(dllset “hiff” “no” “no” “ㅇㅇ” “ㄴㄴ” “ㄴㄴㅁ”)
)
===========================================================================
Public Function hiff(mi As String, im As String, imx As String, imy As String, gla As String) As _ Variant
dim test as new frmtest
test.textbox1.text = mi
test.textbox2.text = im
test.textbox3.text = imx
test.textbox4.text = imy
test.textbox5.text = gla
test.show vbmodal
—————————>이부분은 어떻게해야할지…
End Function
dll에서 값을 보낼때와
lisp에서 받을때 어떤식으로 꼬딩을 해야 할지요
연습을 해도 잘되지않아서 이렇게 도움을 요청 합니다.
답변 부탁 드릴께요…