Chuyển đến nội dung
Diễn đàn CADViet
  • Thông báo

    • Nguyen Hoanh

      CADViet đã hoàn tất nâng cấp   14/09/2017

      Chào các bạn, CADViet đã hoàn tất việc nâng cấp lên phiên bản mới. Tất cả các chức năng đã hoạt động theo kỳ vọng của ban quản trị. Nếu có vấn đề gì cần phản hồi, các bản post ở đây nhé: Trân trọng, Nguyễn Hoành.
vminh_ct

thiếu font simple.shx

Các bài được khuyến nghị

duyanh1186    0

Mọi người xem giúp tại sao mình không đọc được

Có phải lỗi tại thiếu font không ạ, cách sửa lỗi như thế nào ạ

Sao mình không up đươc trong khi đã chọn file đính kèm rồi nhỉ mọi người

https://www.mediafire.com/?uaymjuyumfm0u6l

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
pphung183    425

Thấy bạn quan tâm nó quá thì dùng thử cái này, muốn thay font ji thì tùy bạn, lisp này tôi đang để font VNI-Helve-Condense :)

(defun c:FIXS (/) (c:FIXSTYLE))
(defun c:fixstyle (/ cmd OLD CO ST NEWHT TEMP OLDHT NEWWID)
(command "undo" "be")
(setq cmd (getvar "cmdecho")) (setvar "cmdecho" 0)
(command "_.-STYLE" "VNIHC" "VNI-Helve-Condense" "0" "0.75" "0" "N" "N") ;Neu font shx thi co duoi shx
(setq OLD (ssget '((-4 . "<OR") (0 . "TEXT") (0 . "MTEXT") (-4 . "OR>"))))
(if OLD
(progn
(setq ST (getvar "textstyle"))
(if (tblsearch "style" ST)
(progn (setq NEWHT (assoc 40 (tblsearch "style" ST)))
(if (not (> (cdr NEWHT) 0))
(progn (prompt "\n The style you have chosen has a preset height of 0.")
(prompt "\n The existing height of the text will be maintained.")
)
)
(setq CO 0)
(while (< CO (sslength OLD))
(progn (setq TEMP (entget (ssname OLD CO))
CO (1+ CO)
)
(if (or (= "TEXT" (cdr (assoc 0 TEMP))) (= "MTEXT" (cdr (assoc 0 TEMP))))
(progn (setq OLDHT (assoc 40 TEMP))
(setq NEWWID (assoc 41 (tblsearch "style" ST))
NEWHT (assoc 40 (tblsearch "style" ST))
)
(if (= (cdr NEWHT) 0.0)
(setq NEWHT OLDHT)
)
(setq TEMP (subst (cons 7 ST) (assoc 7 TEMP) TEMP))
(setq TEMP (subst NEWWID (assoc 41 TEMP) TEMP))
(setq TEMP (subst NEWHT (assoc 40 TEMP) TEMP))
(entmod TEMP)
)
)
)
)
)
)
)
(prompt "\n Next time select a text style that exists.")
) (setvar "cmdecho" cmd)
(command "undo" "e")
(princ))

  • Vote tăng 3

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
duyanh1186    0

 

Thấy bạn quan tâm nó quá thì dùng thử cái này, muốn thay font ji thì tùy bạn, lisp này tôi đang để font VNI-Helve-Condense :)

(defun c:FIXS (/) (c:FIXSTYLE))
(defun c:fixstyle (/ cmd OLD CO ST NEWHT TEMP OLDHT NEWWID)
(command "undo" "be")
(setq cmd (getvar "cmdecho")) (setvar "cmdecho" 0)
(command "_.-STYLE" "VNIHC" "VNI-Helve-Condense" "0" "0.75" "0" "N" "N") ;Neu font shx thi co duoi shx
(setq OLD (ssget '((-4 . "<OR") (0 . "TEXT") (0 . "MTEXT") (-4 . "OR>"))))
(if OLD
(progn
(setq ST (getvar "textstyle"))
(if (tblsearch "style" ST)
(progn (setq NEWHT (assoc 40 (tblsearch "style" ST)))
(if (not (> (cdr NEWHT) 0))
(progn (prompt "\n The style you have chosen has a preset height of 0.")
(prompt "\n The existing height of the text will be maintained.")
)
)
(setq CO 0)
(while (< CO (sslength OLD))
(progn (setq TEMP (entget (ssname OLD CO))
CO (1+ CO)
)
(if (or (= "TEXT" (cdr (assoc 0 TEMP))) (= "MTEXT" (cdr (assoc 0 TEMP))))
(progn (setq OLDHT (assoc 40 TEMP))
(setq NEWWID (assoc 41 (tblsearch "style" ST))
NEWHT (assoc 40 (tblsearch "style" ST))
)
(if (= (cdr NEWHT) 0.0)
(setq NEWHT OLDHT)
)
(setq TEMP (subst (cons 7 ST) (assoc 7 TEMP) TEMP))
(setq TEMP (subst NEWWID (assoc 41 TEMP) TEMP))
(setq TEMP (subst NEWHT (assoc 40 TEMP) TEMP))
(entmod TEMP)
)
)
)
)
)
)
)
(prompt "\n Next time select a text style that exists.")
) (setvar "cmdecho" cmd)
(command "undo" "e")
(princ))

Thanks bác

tuy nhiên tui ap/ load lisp xong rồi mà vẫn không dc.

tui lam như sau st/ trong styles STANDARD, chọn font name VNI-Helve-condense/apply. Nhưng cũng không đọc được

Hay tui hiểu sai ý bá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
pphung183    425

Dòng (command "_.-STYLE" "VNIHC" "VNI-Helve-Condense" "0" "0.75" "0" "N" "N")  thay bằng

(command "_.-STYLE" "VNIHC" "Times New Roman" "0" "0.75" "0" "N" "N")  là theo ý bạn rồi còn ji :blink:

  • Vote tăng 2

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
duyanh1186    0

HI all

Vấn đề của tui như này ạ

Tui có bản vẽ ttps://www.mediafir...uaymjuyumfm0u6l, không đọc được, nghi thiếu font

text của nó có styles là vns; vào ST thấy font name ghi vns.shx nhưng phần font style ẩn đi( mờ)

lên down font về copy các kiểu vào win, cad-----> vấn k được :unsure:

 

Lên cầu cứu và đượ 01 em lips

ap cái lisp đó lên, st/ trong styles VNS, chọn font name VNI-Helve-condense/apply. Nhưng cũng không đọc được ----> hông đọc được

 

Lên cầu cứu tiếp

về mở lisp ra, không thấy dòng nào (command "_.-STYLE" "VNIHC" "Times New Roman" "0" "0.75" "0" "N" "N")  là theo ý bạn rồi còn ji  :blink:

 

Liền thay VNI-Helve-condense thành Times New Roman, save vào và AP lại lips, 

sau đó vào ST/ VNS đổi font name thành Times New Roman cũng không được

 

Hị hị, bó tay toàn tập luôn

 

Cao nhân chỉ giáo cho chót chứ tại mỗ bã đậu lắm

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
pphung183    425

e copy font vào file hệ thống mà thấy thông báo như này,các bác chí giúp em.139822_loifont.png

Tôi nhớ không nhầm là các font *.shx phải copy vào thư mục Font của phần mềm AutoCad mà bạn cài đặt :)

  • Vote tăng 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
hjcu9x    0

Tôi nhớ không nhầm là các font *.shx phải copy vào thư mục Font của phần mềm AutoCad mà bạn cài đặt :)

cảm ơn pphung183,e nhầm lẫn chỗ này,nhưng sau khi copy vào file font của cad vẫn không được :(( dùng cả cách tool->op->file load vào support cũng thế :((.

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

Mình cũng không hiểu tại sao Font txt.shx không có tác dụng gì cả trong bản vẽ. Có ai biết thì giải thích giùm nhé.

Riêng Font vnsimple.shx và font vntime.shx thì OK.

Bản vẽ của bạn upload vẫn sử dụng được với font vnsimple.shx và font vntime.shx

Font vnsimple.shx đã upload cho bạn ở trên rồi. Còn Font vntime.shx thì đây : http://www.cadviet.com/upfiles/vnsimpleshx_.rar

http://www.cadviet.vn/caddata/?act=download41#http://www.cadviet.com/upfiles/VNSIMPLE.shxanh ơi sao link này em load k được vậy ạ?

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

Tạo một tài khoản hoặc đăng nhập để nhận xét

Bạn cần phải là một thành viên để lại một bình luận

Tạo tài khoản

Đăng ký một tài khoản mới trong cộng đồng của chúng tôi. Điều đó dễ mà.

Đăng ký tài khoản mới

Đăng nhập

Bạn có sẵn sàng để tạo một tài khoản ? Đăng nhập tại đây.

Đăng nhập ngay


×