nhat2233
-
Số lượng nội dung
17 -
Đã tham gia
-
Lần ghé thăm cuối
Bài đăng được đăng bởi nhat2233
-
-
Mình xin cảm ơn bác doductiep vì đã giúp đỡ theo như yêu cầu của mình. cảm ơn bác nhiều nhiều. nhưng bác viết thêm hàng tiêu đề là số hiệu đỉnh thửa và chiều dài cho giống như hướng dẫn được ko bác.hi
-
làm sao bảng tọa độ chỉ có số hiệu đỉnh thửa và chiều dài không bạn? tại theo thông tư 24 mới bảng kích thước cạnh không có tọa độ.
-
-
bạn nhấn chuột phải -> zoom -> extents ok.
-
nhấp phải chọn run Admin là được mà.
-
Bạn in 1=1 hay 2=1
Tỷ lệ vẽ là bao nhiêu. 1/500 ? 1/200 ? 1/1000 ?
Tỷ lệ là 1/500 bạn ak.
-
Nếu bạn cần dimaligned thì dùng lệnh cad thôi. còn LSP ghikt đó phù hợp với y/c của bạn mà. text đc ghi ra chính là giá trị cạnh của 2 điểm bạn chọn đó. còn bạn muốn to nhỏ hay cách bao nhiêu thì sửa lsp lại chút là đc .
Vậy nhờ bạn TaiNguyen79 sửa dùm lại cho mình lisp đó được không. Cảm ơn ơn bạn.
-
Tôi nghĩ lệnh "Command: _dimaligned" thì sao?
lệnh _dimaligned thì ok nhưng tại nhu cầu công việc gồm nhiều cạnh thửa đất mà dùng lệnh _dimaligned để ghi kt thì mình phải mất 1 công đoạn nữa đó là nhập khoảng cách of text với đg line mới đc như ý muốn. Nên mình mới cấn lisp mà khi pick 2 đầu của 1 đoạn thẳng sẽ cho ra kq nằm song song tại trung điểm của đoạn thằng đó và cách đoạn thẳng đó 2cm.
-
Vấn đề này đã có nhiều rồi. tuy nhiên có lẽ đoạn lsp sau đây là hợp với ý bạn :
;ghi kich thuoc
;Luu gia tri bien PTC trong bo nho dung de lay diem truoc do
;neu enter o buoc chon PT1 thi se lay PT1 la diem lien truoc (lastpoint)
(defun c:ghikt (/ OSM PT0 PT1 PT2 DIST A12 MID12)
(setq OSM (getvar "osmode"))
(if (null PTC) (setq PT0 (getvar "Lastpoint")) (setq PT0 PTC))
(setvar "osmode" 1)
(if (null (setq PT1 (getpoint "\nChon diem thu nhat :\n"))) (setq PT1 PT0))
(initget 1) (setq PT2 (getpoint PT1 "\nChon diem thu hai :\n"))
(setvar "osmode" 0)
(setq PTC PT2)
(if (equal PT1 PT2 0.001)
(princ "\nHai diem trung nhau\n")
(progn
(setq DIST (distance PT1 PT2) A12 (angle PT1 PT2) MID12 (polar PT1 A12 (/ DIST 2.0)))
(setq pt (polar MID12 (+ A12 (/ PI 2)) 1))
(if (or (<= A12 (/ PI 2)) (>= A12 (* PI 1.5)))
(command ".TEXT" "M" pt 1 (* (/ A12 pi) 180) (rtos DIST 2 2) "")
(command ".TEXT" "M" pt 1 (+ (* (/ A12 pi) 180) 180) (rtos DIST 2 2) ""))))
(setvar "osmode" OSM)(princ))
Cảm ơn bạn TaiNguyen79 đã giúp đỡ mình nhưng yêu cầu của mình là làm sao text ghi kích thước sẽ song song với đường line, nằm trung điểm và cách line 1 khoảng cách là 2cm chẳng hạn. Chân thành cảm ơn!
-
Mình muốn xin diễn đàn viết giúp mình lisp ghi kích thước đoạn thẳng mà khi pick vào điểm đầu và điểm cuối của đoạn thẳng thì sẽ tự động ghi ra text kích thước tại trung điểm của đoạn thẳng với 1 khoảng cách nhất định. Mình xin cảm ơn.
-
Xin bác Hà chỉ rõ cho e cách sửa text ngay trên screen mà không thông qua edit box trong cad 2004 làm như thế nào? Theo hướng dẫn của bác là DTEXTED >> 2 nhưng e không làm được. Cảm ơn bác nhiều!
-
Mình dùng cad 2004 khi viết chữ bằng mtext thì font chữ tiếng việt hiển thị bình thường nhưng khi dùng lệnh explode để chuyển về dtext thì khi kích đúp vào dòng chữ đó để sửa thì trong ô dtext hiển thị bị lỗi font tiếng việt. Mình đã tìm đủ cách nhưng không khắc phục được. Mong mọi người giúp đỡ.
-
Mình cũng bị trường hợp như thế này lâu rồi mà tới h vẫn không tìm được ra cách giải quyết. Có ai đã khắc phục được lỗi này xin giúp đỡ mình với. thank!
-
Mình đã cài lại cad nhưng vẫn không được. Chẳng lẻ không còn cách nào ngoài việc phải cài lại win sao? Ai đã từng gặp lỗi này chưa xin giúp mình với.
-
Khi mình khởi động cad và vào Open->Computer thì cad báo lỗi: FATALl Error: unhandled access violation writing 0x0014 exception at 770f224dh và tự động out. Có ai biết lỗi này xin chỉ giáo cho mình với. Mình đã tìm kiếm trên google rồi nhưng không thấy lỗi như trên. Cảm ơn mọi người!
-
Chào tất cả mọi người!
Mình dùng cad 2004 và file cad cũng là file 2004 nhưng hôm nay tự nhiên mở file Cad không được. Cụ thể là mình vào Cad->Open-> sau đó mở 1 file cad thì có file mở được file không. Đối với file không mở được thì thư mục chứa nhiều file cad nhưng khi nhấp vào thì chỉ còn lại 1 file đã chọn và chọn vào thì không được. Và sau đó undo trong cửa sổ Open cũng không đc. Tuy nhiên những máy nối mạng lan với máy mình thì lại mở được. Có ai biết lỗi này xin chỉ giáo giúp mình với. Mình xin cảm ơn!
xin lisp thống kê bảng kích thước thửa đất để phục vụ công việc in GCN!
trong AutoLisp
Đã đăng · Trả lời báo cáo
Mình xin chào cả nhà! Vì nhu cầu công việc in Giấy chứng nhận QSDĐ hiện nay thể hiện sơ đồ trên trang 3 GCN có bảng thống kê số hiệu đỉnh thửa và kích thước các cạnh thửa đất (không có tọa độ đỉnh). MÌnh tìm kiếm trên diễn đàn nhưng không có lisp nào đáp ứng theo yêu cầu. Do đó, mình xin các pro diễn đàn CadViet giúp đỡ cho mình với. Mình xin cám ơn và chúc sức khỏe cả nhà!