Đến nội dung


Hình ảnh
5 stars - based on 24598 reviews
- - - - -

Tiếng Việt trong hộp thoại Acad


  • Please log in to reply
48 replies to this topic

#41 ketxu

ketxu

    Copier - Paster - Editor

  • Moderator
  • PipPipPipPipPipPipPip
  • 5709 Bài viết
Điểm đánh giá: 2632 (tuyệt vời)

Đã gửi 14 April 2011 - 11:28 PM

Up xuống bài dưới do bị bác kia đánh bom ^^
  • 0

Thành viên nhóm CadMagic.
Mời bạn ghé thăm facebook nhóm - Page viết lisp theo yêu cầu  :
CAD MAGIC


#42 ketxu

ketxu

    Copier - Paster - Editor

  • Moderator
  • PipPipPipPipPipPipPip
  • 5709 Bài viết
Điểm đánh giá: 2632 (tuyệt vời)

Đã gửi 15 April 2011 - 12:00 AM

Mình định viết Lisp có chức năng như thế này trên CAD2004 mà chưa có thời gian :
a- Viết chữ bằng lệnh MTEXT với Font Unicode. Mỗi đoạn là 1 MTEXT
b- Duyệt qua từng MTEXT đó -> Explode cái phần tử Mtext đó ra. Khi Explode cái Mtext đó ra thì nó sẽ đổi thành Text. Tuy nhiên, bạn sẽ thấy rằng các Text bị nổ ra có thể sẽ bị rời rạc -> Viết đoạn code nối chúng lại. Bạn sẽ nhận thấy rằng bảng mã ANSI đã được chuyển thành Unicode trong các Text. (bạn thử xem) :rolleyes:
c- Làm như thế cho đến MTEXT cuối cùng.
Có thể xuất kết quả qua txt hoặc là để các Text lại trên nền CAD2004
-> Thao tác còn lại của bạn là copy và paste
File không nhiều byte đâu bạn. Muốn sửa thì vô CAD2004 mà sửa cũng đơn giản
Nếu thao tác không cần Lisp cũng được nhưng hơi lâu.
Đoạn mã mà mình viết hồi sáng(không phải là "siêng") dựa trên ý này. Vài dòng chia sẻ.

Không biết bác Tuệ có thời gian hoàn thành ý tưởng này chưa... ^^. Em viết cái này tặng bác và anh em Lispser, đề phòng sau này các bác từ giã em 04 hoặc ngại ngồi explode, hoặc chẳng ưa charmap ^^. Hy vọng là có ích
Cách dùng cũng chỉ có đánh đoạn string cần hiển thị trong lisp vào ô bên trái (bằng unicode), rồi chuyển sang lisp editor paste luôn (nếu để auto copy)
Unicode Lisp String
P/S : có thể miss vì lý do thì các bác bên trên nói nhìu r, nên nếu bác nào dùng thấy sai thì thông cảm cho e nha ^^
  • 0

Thành viên nhóm CadMagic.
Mời bạn ghé thăm facebook nhóm - Page viết lisp theo yêu cầu  :
CAD MAGIC


#43 Doan Van Ha

Doan Van Ha

    biết lệnh adcenter

  • CADViet Team
  • PipPipPipPipPipPipPip
  • 5514 Bài viết
Điểm đánh giá: 2658 (tuyệt vời)

Đã gửi 15 April 2011 - 12:05 AM

Không biết bác Tuệ có thời gian hoàn thành ý tưởng này chưa... ^^. Em viết cái này tặng bác và anh em Lispser, đề phòng sau này các bác từ giã em 04 hoặc ngại ngồi explode, hoặc chẳng ưa charmap ^^. Hy vọng là có ích
Cách dùng cũng chỉ có đánh đoạn string cần hiển thị trong lisp vào ô bên trái (bằng unicode), rồi chuyển sang lisp editor paste luôn (nếu để auto copy)
Unicode Lisp String
P/S : có thể miss vì lý do thì các bác bên trên nói nhìu r, nên nếu bác nào dùng thấy sai thì thông cảm cho e nha ^^

@Ketxu: sao chạy file của bác không được?
@Tue_NV: hình như nó nổ vô tổ chức lắm. Bác thử viết "Tôi đi học" bằng Times New Roman rồi nổ xem sao nhé. Hình như chữ "đi" bị nó xé ra làm đôi, thì biết đường nào mà nối.
Tôi vẫn chưa hiểu ý định của bác là để làm gì.
  • 0

* Chỉ nên yêu cầu Lisp khi bạn làm việc đó mất cả ngày nhưng họ chỉ viết 1 giờ. Đừng nêu yêu cầu Lisp khi bạn chỉ làm 1 giờ nhưng bắt họ phải mất cả ngày.

* Nhờ viết lisp cũng như đi khám bệnh. Chỉ gởi căn cước và than sắp chết thì không bác sỹ nào cứu sống được.


#44 ketxu

ketxu

    Copier - Paster - Editor

  • Moderator
  • PipPipPipPipPipPipPip
  • 5709 Bài viết
Điểm đánh giá: 2632 (tuyệt vời)

Đã gửi 15 April 2011 - 12:21 AM

Có thể do mình để Net 4, chắc phải giảm xuống thôi ^^
  • 0

Thành viên nhóm CadMagic.
Mời bạn ghé thăm facebook nhóm - Page viết lisp theo yêu cầu  :
CAD MAGIC


#45 phamngoctukts

phamngoctukts

    biết lệnh adcenter

  • CADViet Team
  • PipPipPipPipPipPipPip
  • 1107 Bài viết
Điểm đánh giá: 708 (tốt)

Đã gửi 15 April 2011 - 12:59 AM

Unicode Lisp String

Cái này hay à! Ketxu dạo này ăn chơi quá!
  • 0
Tất cả vì sự phát triển của diễn đàn ...
Cám ơn đừng nói lời suông mà hãy nhấn Hình đã gửi!

#46 gia_bach

gia_bach

    biết lệnh adcenter

  • CADViet Team
  • PipPipPipPipPipPipPip
  • 1448 Bài viết
Điểm đánh giá: 1434 (rất tốt)

Đã gửi 15 April 2011 - 07:27 AM

Không biết bác Tuệ có thời gian hoàn thành ý tưởng này chưa... ^^. Em viết cái này tặng bác và anh em Lispser, đề phòng sau này các bác từ giã em 04 hoặc ngại ngồi explode, hoặc chẳng ưa charmap ^^. Hy vọng là có ích
Cách dùng cũng chỉ có đánh đoạn string cần hiển thị trong lisp vào ô bên trái (bằng unicode), rồi chuyển sang lisp editor paste luôn (nếu để auto copy)
Unicode Lisp String
P/S : có thể miss vì lý do thì các bác bên trên nói nhìu r, nên nếu bác nào dùng thấy sai thì thông cảm cho e nha ^^

Convert xuống Net 2. hay 3.5 đuợc không ketxu ?!
Hình đã gửi
  • 0

#47 ketxu

ketxu

    Copier - Paster - Editor

  • Moderator
  • PipPipPipPipPipPipPip
  • 5709 Bài viết
Điểm đánh giá: 2632 (tuyệt vời)

Đã gửi 15 April 2011 - 08:16 AM

Vâng, em đang ngồi convert xuống, nhưng mà k hiểu sao sau lần ghost máy cài lại, VS của e chỉ nhận mỗi Net4, không còn danh sách 2,3,4 như ngày trước để chọn nữa :(

Update : đã update sang link mới :
Tiếng Việt trong Lisp phần II
  • 0

Thành viên nhóm CadMagic.
Mời bạn ghé thăm facebook nhóm - Page viết lisp theo yêu cầu  :
CAD MAGIC


#48 Doan Van Ha

Doan Van Ha

    biết lệnh adcenter

  • CADViet Team
  • PipPipPipPipPipPipPip
  • 5514 Bài viết
Điểm đánh giá: 2658 (tuyệt vời)

Đã gửi 19 April 2011 - 09:38 AM

Vâng, em đang ngồi convert xuống, nhưng mà k hiểu sao sau lần ghost máy cài lại, VS của e chỉ nhận mỗi Net4, không còn danh sách 2,3,4 như ngày trước để chọn nữa :(

Update : đã update sang link mới :
Tiếng Việt trong Lisp phần II

srr, chỉ thử post ảnh lên CADViet.
  • 0

* Chỉ nên yêu cầu Lisp khi bạn làm việc đó mất cả ngày nhưng họ chỉ viết 1 giờ. Đừng nêu yêu cầu Lisp khi bạn chỉ làm 1 giờ nhưng bắt họ phải mất cả ngày.

* Nhờ viết lisp cũng như đi khám bệnh. Chỉ gởi căn cước và than sắp chết thì không bác sỹ nào cứu sống được.


#49 nguyenbd1

nguyenbd1

    biết lệnh text

  • Members
  • PipPipPipPip
  • 276 Bài viết
Điểm đánh giá: 13 (tàm tạm)

Đã gửi 22 September 2013 - 09:40 AM

tác dụng của lisp này là gì hở các bachttp://www.cadviet.c...cadvietlisp.lsp


  • 0