Chuyển đến nội dung
Diễn đàn CADViet

Nguyen Van Sang nuce

Thành viên
  • Số lượng nội dung

    5
  • Đã tham gia

  • Lần ghé thăm cuối

Bài đăng được đăng bởi Nguyen Van Sang nuce


  1. Vào lúc 9/9/2012 tại 07:46, Doan Van Ha đã nói:

    Muốn autoload khi mở cad thì bạn làm như sau:

    1). Chép toàn bộ *.dll vào 1 thư mục, ví dụ đó là "D:\\File_DLL".

    2). Add lisp này vào contents:

     

    • cadvietlisp.lsp
      lisp help
    •  
    
    (defun load-dll (path)
    (foreach f (apply (function append) (mapcar (function (lambda (x) (vl-directory-files path x 1))) '("*.DLL")))
     (command "_.netLoad" (strcat path "\\" f))))
    (load-dll "")	;Edit folder o dong nay!!!
    
     

     

     image.thumb.png.6e357ad067ac673d99d3227c8fc6eda8.pngimage.png.817176ada24424768ac1e6137a59c20b.png

    e làm theo code của bác mà auto load vẫn lỗi nhỉ , bác giúp e với!

     

    1.png

    image.png


  2. (Thao tác load thủ công dùng 1 lần như vậy thì load được lisp có chứa code load file dll ( code :  (command"_netload" "C:\\Users\\huynh\\Desktop\\vietteldll\\CAD_Viettel_Project.dll")   ) 

     

    image.png.206870cf174fac00dbe5517832ce2a41.png

     

     

    còn khi tạo tự động load lisp trên khi mở cad thì lỗi không load được 

    image.png.02a9cf5c8b4e330f1de844fb2a7210a4.pngimage.png.46826f874a958d117c3226ef2faa5c79.png

    image.png.d364886d37a4ae4425fc042404c3eea6.png

    mình  xin cảm ơn trước ! 

    hóng cao nhân chỉ dạy

     

    image.png

×