vndesperados 254 Báo cáo bài đăng Đã đăng Tháng 8 5, 2008 Tôi rất ngạc nhiên khi thấy các bác bỏ ra một chi phí thời gian rất lớn (từ 2/04/2008 - hôm nay) chỉ để giải quyết một vấn đề mà nếu làm bằng tay mất khỏang 5 min. Nếu như mà giải quyết xong vấn đề này thì nó tiết kiệm được cho các bác cái gì? Tôi làm quản lý dự án nên cái gì cũng rạch ròi về chi phí. Chia sẻ bài đăng này Liên kết tới bài đăng Chia sẻ trên các trang web khác
bemove 1.314 Báo cáo bài đăng Đã đăng Tháng 8 5, 2008 Tôi làm quản lý dự án nên cái gì cũng rạch ròi về chi phí Tôi làm giám đốc nên cũng... =)) Chia sẻ bài đăng này Liên kết tới bài đăng Chia sẻ trên các trang web khác
ghost8.3 163 Báo cáo bài đăng Đã đăng Tháng 8 5, 2008 Tôi rất ngạc nhiên khi thấy các bác bỏ ra một chi phí thời gian rất lớn (từ 2/04/2008 - hôm nay) chỉ để giải quyết một vấn đề mà nếu làm bằng tay mất khỏang 5 min. Nếu như mà giải quyết xong vấn đề này thì nó tiết kiệm được cho các bác cái gì?Tôi làm quản lý dự án nên cái gì cũng rạch ròi về chi phí. Chả có ai bỏ phí cả bạn à! Đơn giản là khi nào tìm thấy cái gì mình cần thì dù thời gian có là bao cũng không bao giờ là phí cả. Mặc dù topic có từ 2/04/2008 (cho dù là 2/04/2006 đi nữa) nhưng nếu đến bây giờ bạn mới tìm ra đây là thứ bạn cần thì bạn có xem là phí không. Cái gì cũng cần học hỏi và trao đổi lẫn nhau. Chia sẻ bài đăng này Liên kết tới bài đăng Chia sẻ trên các trang web khác
nguoiotanphu 0 Báo cáo bài đăng Đã đăng Tháng 8 24, 2008 -Bạn nói đúng rồi.-Mình khôg biết làm sao để biết hiện có bao nhiêu menu cả. -Bạn yên tâm nó không đè lên mà xen vào nghĩa là cái menucó sẵn sẻ lùi về 1 vị trí. Xin chào bạn Duy782006 Cám ơn bạn đã giúp đỡ. Bạn có thể giúp mình thêm 1 hàm lisp xóa hoặc copy file không phải mã ASCII không?. Trong Lisp mình thấy chỉ hổ trợ write file ASCII thôi. Mình có dùng thử lệnh SHELL của Acad trong LISP nhưng vẫn chưa được. Cám ơn nhiều nguoiotanphu Chia sẻ bài đăng này Liên kết tới bài đăng Chia sẻ trên các trang web khác
Nộ Thiên 133 Báo cáo bài đăng Đã đăng Tháng 8 24, 2008 Tôi làm quản lý dự án nên . . . Tôi làm giám đốc nên cũng... =)) Khà .. khà.. Bemove khéo đùa! Chà toàn là PM với CEO cả. Chả bù với mình chỉ là ... CT-HĐQT( hí hí..) Chia sẻ bài đăng này Liên kết tới bài đăng Chia sẻ trên các trang web khác
Snowman 92 Báo cáo bài đăng Đã đăng Tháng 8 24, 2008 Xin chào bạn Duy782006Cám ơn bạn đã giúp đỡ. Bạn có thể giúp mình thêm 1 hàm lisp xóa hoặc copy file không phải mã ASCII không?. Trong Lisp mình thấy chỉ hổ trợ write file ASCII thôi. Mình có dùng thử lệnh SHELL của Acad trong LISP nhưng vẫn chưa được. Cám ơn nhiều nguoiotanphu Bạn dùng hàm này đi: (vl-file-delete filename) : del file chứa trong biến filename (bất kỳ loại file gì - bạn có thể dùng hàm getfiled để chọn file muốn xoá) (vl-file-copy source-file destination-file [append]) copy file với tuỳ chọn ghi đè hay ghi nối tiếp vào file đích Để biết rõ hơn, bạn có thể đọc trong help. (Bạn định làm gì với hàm delete file vậy? khủng bố ah? :s_big: ) 1 Chia sẻ bài đăng này Liên kết tới bài đăng Chia sẻ trên các trang web khác
nguoiotanphu 0 Báo cáo bài đăng Đã đăng Tháng 8 26, 2008 Bạn dùng hàm này đi:(vl-file-delete filename) : del file chứa trong biến filename (bất kỳ loại file gì - bạn có thể dùng hàm getfiled để chọn file muốn xoá) (vl-file-copy source-file destination-file [append]) copy file với tuỳ chọn ghi đè hay ghi nối tiếp vào file đích Để biết rõ hơn, bạn có thể đọc trong help. (Bạn định làm gì với hàm delete file vậy? khủng bố ah? :s_big: ) Cám ơn snowman chỉ giúp Mình đang làm lisp tự động cập nhật các lệnh thường dùng vào acaddoc.lsp. Nếu muốn uninstall thì sẽ loại các lệnh này ra hoặc xoá file acaddoc.lsp để không ảnh hưởng acad trên máy người khác. Chia sẻ bài đăng này Liên kết tới bài đăng Chia sẻ trên các trang web khác
HoangSon614 66 Báo cáo bài đăng Đã đăng Tháng 6 3, 2009 Bộ cài bạn đownloa ở trên về mà dùng. mình sẽ post file register cho !Bạn làm như trên đây để đc load menu và đường dẫn tự động ! Còn khi sử dụng chuơng trình. Bạn hãy download file ảnh của mình post đây và làm theo hướng dẫn : Mở chương trình Bước 1 : Chọn Tab File Bước 2 : Bạn Add File mà bạn cần cài đặt vào ( Chọn Folder chứa file là đc) Bước 3 : Bôi đen File đó ( nếu bạn có nhiều File thì có thể bôi đen cùng 1 lúc ) Bước 4 : Chọn Tab Windown Bước 5 : Chọn Other Bước 6 : Paste đưòng dẫn mà tôi cho dưới đây Chú Ý : các bước trùng với các số mà tôi đánh dấu trên file ảnh gửi kèm Bạn Paste đường dấn sau vào ô số 6 Cad 2007 #UserDir#\Application Data\Autodesk\AutoCAD 2007\R17.0\enu\Support Cad 2008 #UserDir#\Application Data\Autodesk\AutoCAD 2008\R17.1\enu\Support Cad 2009 #UserDir#\Application Data\Autodesk\AutoCAD 2009\R17.2\enu\Support FIle Ảnh hướng dẫn : http://www.cadviet.com/upfiles/HuongDan.bmp File bẻ khóa Install Creator Pro http://www.cadviet.com/upfiles/RegCode.txt Chúc bạn thành công ! Chào bạn Ar_Chanwoo! Mình cũng làm theo các bước như bạn hướng dẫn nhưng vẫn không cài đặt được (không load lisp được). Bạn có thể hướng dẫn cụ thể hơn không, cảm ơn bạn (mình thấy cái này pro hơn). Cố gắng giúp mình, mình đang rất cần. Chia sẻ bài đăng này Liên kết tới bài đăng Chia sẻ trên các trang web khác
dovananh.xd 25 Báo cáo bài đăng Đã đăng Tháng 12 10, 2011 Ý mình cũng giống một người trong topic này. Đó là mình có sắn các lisp rồi, bây h mình tạo một file.mns và trong file.mns này có chứa các lệnh tắt của các lisp đã có để tạo một menu mới thì làm như thế nào? Chia sẻ bài đăng này Liên kết tới bài đăng Chia sẻ trên các trang web khác
hoquangvinh 7 Báo cáo bài đăng Đã đăng Tháng 1 20, 2016 -Bạn nên viết các dữ liệu và menu (nói chung là mọi thứ) trong 1 thư mục nhất định nào đó không cần đưa vào thư mục support, như vậy giải quyết được vấn đề chép dữ liệu. -Chỉ cần viết 1 file acaddoc.lsp để load các thứ của bạn. File này copy vào thư mục cài đặt cad là được rồi (gần như các máy thư mục này như nhau), giải quyết luôn được phần load tự động các lisp của bạn. -Bạn tham khảo file acaddoc.lsp của mình về việc load menu, lisp và tạo đường dẩn cho tiện ích của bạn: ;---------------------------- (Defun C:run ( ) (setq OD (GETENV "ACAD")) (setq NEW (strcat OD ";E:\\tienich\\dcl;E:\\tienich\\dwg;E:\\tienich\\hdt;E:\\tienich\\tvnd;E:\\tienich\\tvct")) (setenv "ACAD" NEW) ;-------------------------- Tạo đường dẩn đến các thư mục cố định của bạn. ;--------------------------- (load"e:/tienich/lenh/thuvienndung") (load"e:/tienich/lenh/thuvienchitiet") (load"e:/tienich/lenh/tienichchonht") (load"e:/tienich/lenh/thongke") (load"e:/tienich/lenh/tienichdimht") ;--------------------------- Load các lisp của bạn. ;-------------- (defun S::STARTUP () (setq tinhtrangmenutienich (menugroup "tienich")) (Cond ((= tinhtrangmenutienich nil) (setq duongdanmenutienich (strcat odiachay "\\tienich\\filehethong\\tienich.mns")) (command "_menuload" duongdanmenutienich) (menucmd "P13=+tienich.pop1") ) ((/= tinhtrangmenutienich nil) ) ) (Princ) ) ;------------------- Load menu của bạn. e muốn hỏi lại các bước này. e chỉ muốn load 1 folder có chưa các file lisp thôi, cũng sửa lại giống như bác đã trình bày nhưng chưa có file .mns và .pop1 nữa thì lisp load các lệnh có chạy được ko e sửa như sau các bác check hộ với Paste các dòng lisp vào ko hiển thị được nên phải up file lên, nhờ các bác xem giúp [ code];---------------------------- (Defun C:run ( ) (setq OD (GETENV "ACAD")) (setq NEW (strcat OD ";E:\\Lisp_cad")) (setenv "ACAD" NEW) ;-------------------------- T?o du?ng d?n d?n các thu m?c c? d?nh c?a b?n. ;--------------------------- (load"e:/Lisp_cad") ;--------------------------- Load các lisp c?a b?n. ;-------------- (defun S::STARTUP () (setq tinhtrangmenutienich (menugroup "Lisp_cad")) (Cond ((= tinhtrangmenutienich nil) (setq duongdanmenutienich (strcat odiachay "\\Lisp_cad\\Lisp_cad.mns")) (command "_menuload" duongdanmenutienich) (menucmd "P13=+Lisp_cad.pop1") ) ((/= tinhtrangmenutienich nil) ) ) (Princ) ) ;------------------- Load menu c?a b?n.[ /code] http://www.cadviet.com/upfiles/5/50811_load_lisp.lsp Chia sẻ bài đăng này Liên kết tới bài đăng Chia sẻ trên các trang web khác