Đến nội dung


Hình ảnh
- - - - -

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


  • Please log in to reply
49 replies to this topic

#41 Doan Van Ha

Doan Van Ha

    biết lệnh adcenter

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

Đã gửi 11 April 2011 - 06:44 PM

Hề hề. mình áp dụng cái code của bác Hoành để hiển thị tiếng việt unicode từ cái hồi chưa ai đề cập đến vấn đề này, và chắc chắn không phải là mình may mắn, chỉ là mình nắm đuợc cái nguyên tắc đơn giản: Bảng mã nào hiển thị cho font chữ của bảng mã ấy, không thể có chuyện râu ông nọ cắm cằm bà kia. Nếu có vấn đề gì không hiển thị được thì chỉ có thể là do lệch bảng mã hoặc phần mềm chưa hỗ trợ bảng mã. bác cứ nằm lòng câu này thì chẳng bao giờ bác fải mong chờ sự may mắn với vấn đề này cả.
Điều bác Tue nói lúc sáng mình đọc, mình hiểu. Mình cứ tưởng là bác cũng hiểu rồi, vậy mà vẫn loanh quanh luẩn quẩn với font chữ, bảng mã, hỗ trợ hay chưa hỗ trợ.

Sorry Bác vì từ "may mắn". Bởi Bác Tuệ bảo là chẳng cần sửa font trong Win gì trọi thì tiếng Việt vẫn xuất hiện nên tôi dùng từ này để ý nói là do font mặc định là Unicode mà thôi.
Còn chuyện Bác hiểu ý Bác Tuệ từ hồi sáng và tôi chiều nay mới hiểu thì coi như "sự cố nghề nghiệp" thôi. Chỉ tiếc là từ khi Bác Tuệ post lên, tôi đã nhiều lần thắc mắc nhưng 2 Bác vẫn im re. Thế mới khổ.
Nói tóm lại, không vấn đề gì. Chúc Bác vui
  • 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.


#42 ketxu

ketxu

    Copier - Paster - Editor

  • Moderator
  • PipPipPipPipPipPipPip
  • 5682 Bài viết
Điểm đánh giá: 2605 (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


#43 ketxu

ketxu

    Copier - Paster - Editor

  • Moderator
  • PipPipPipPipPipPipPip
  • 5682 Bài viết
Điểm đánh giá: 2605 (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


#44 Doan Van Ha

Doan Van Ha

    biết lệnh adcenter

  • CADViet Team
  • PipPipPipPipPipPipPip
  • 5449 Bài viết
Điểm đánh giá: 2625 (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.


#45 ketxu

ketxu

    Copier - Paster - Editor

  • Moderator
  • PipPipPipPipPipPipPip
  • 5682 Bài viết
Điểm đánh giá: 2605 (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


#46 phamngoctukts

phamngoctukts

    biết lệnh adcenter

  • CADViet Team
  • PipPipPipPipPipPipPip
  • 1107 Bài viết
Điểm đánh giá: 696 (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!

#47 gia_bach

gia_bach

    biết lệnh adcenter

  • CADViet Team
  • PipPipPipPipPipPipPip
  • 1436 Bài viết
Điểm đánh giá: 1426 (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

#48 ketxu

ketxu

    Copier - Paster - Editor

  • Moderator
  • PipPipPipPipPipPipPip
  • 5682 Bài viết
Điểm đánh giá: 2605 (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


#49 Doan Van Ha

Doan Van Ha

    biết lệnh adcenter

  • CADViet Team
  • PipPipPipPipPipPipPip
  • 5449 Bài viết
Điểm đánh giá: 2625 (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.


#50 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