máy bơm nước hỏa tiễn công ty in ấn https://duan-knparadise.com/ Bơm nước hỏa tiễn bóp da nam Túi nilon PP cong ty in bieu mau
Xin Lisp scale không làm thay đổi kích thước của text - Diễn đàn của các kỹ sư kết cấu Việt Nam










































































Features
Go Back   Diễn đàn của các kỹ sư kết cấu Việt Nam > ỨNG DỤNG TIN HỌC TRONG THIẾT KẾ XÂY DỰNG > Phần mềm thiết kế do thành viên giới thiệu
Tên thành viên
Mật mã
Tin HOT Thông tin BQT diễn đàn

Result  Reload Thống Kê - Diễn đàn của các kỹ sư kết cấu Việt Nam
All Forums | Thông báo | Văn Bản Pháp Luật | Văn Hóa Văn Nghệ Giao Lưu
Please wait...
Please wait...
Trả lời
Ðiều Chỉnh Xếp Bài
Unread 23-09-2007   #1
steel_structure
Thành viên mới
 
Tham gia ngày: Sep 2006
Bài gởi: 10
Thanks: 0
Thanked 0 Times in 0 Posts
Default Xin Lisp scale không làm thay đổi kích thước của text

Xin chào mọi người. E đang cần cái lisp để scale hình mà k làm thay đổi kích thước của text, lần trước e có thấy trên diễn đàn nhưng search lại hoài mà k thấy . Help me
steel_structure vẫn chưa có mặt trong diễn đàn   Trả Lời Với Trích Dẫn
Unread 24-09-2007   #2
lê lương căn
Thành viên mới
 
Tham gia ngày: Feb 2005
Bài gởi: 29
Thanks: 0
Thanked 20 Times in 4 Posts
Default Ðề: Xin Lisp scale không làm thay đổi kích thước của text

Trích:
Nguyên văn bởi steel_structure
Xin chào mọi người. E đang cần cái lisp để scale hình mà k làm thay đổi kích thước của text, lần trước e có thấy trên diễn đàn nhưng search lại hoài mà k thấy . Help me
cũng hỏi ý như trên , nhưng nếu dùng viewport , dĩ nhiên dim sẽ zoom theo nhung co cách nào kích thước text ko nhỉ?????Bác nào biết chỉ giùm
lê lương căn vẫn chưa có mặt trong diễn đàn   Trả Lời Với Trích Dẫn
Unread 24-09-2007   #3
steel_structure
Thành viên mới
 
Tham gia ngày: Sep 2006
Bài gởi: 10
Thanks: 0
Thanked 0 Times in 0 Posts
Default Ðề: Xin Lisp scale không làm thay đổi kích thước của text

Trích:
Nguyên văn bởi lê lương căn
cũng hỏi ý như trên , nhưng nếu dùng viewport , dĩ nhiên dim sẽ zoom theo nhung co cách nào kích thước text ko nhỉ?????Bác nào biết chỉ giùm
Vì hình của e có các text chú thích và text của dim nên cần thiết có cái lisp này. Còn cái của a, như a nói thì a chỉ wan tâm đến cái text của dim..cái này k cần lisp làm thủ công cũng nhanh chán. Bỏ các dim đi, scale hình bình thường rồi thiết lập cái dim mới fù hợp với tỉ lệ a vừa scale rồi dim lại .
Lần trước có người đã up cái lisp này..nếu đọc đc bài này của e post lại dùm e với..many many thanks.
steel_structure vẫn chưa có mặt trong diễn đàn   Trả Lời Với Trích Dẫn
Unread 16-09-2010   #4
tuotnovit201
Thành viên mới
 
Tham gia ngày: Sep 2010
Bài gởi: 2
Thanks: 0
Thanked 5 Times in 1 Post
Default Ðề: Xin Lisp scale không làm thay đổi kích thước của text

http://www.cadviet.com/upfiles/fakedim.vlx

Dùng lệnh fakedim, các giá trị của đối tượng dim sẽ được sửa giá trị sang text. Bạn cứ scale thoải mái đi!
tuotnovit201 vẫn chưa có mặt trong diễn đàn   Trả Lời Với Trích Dẫn
The Following 5 Users Say Thank You to tuotnovit201 For This Useful Post:
dung_can (04-05-2012), ledinhquan80 (09-04-2015), thaisonen (16-09-2010), thanhphong_v (21-05-2012), XDDD.CN (01-07-2016)
Unread 03-07-2014   #5
phanbadung48
 
Tham gia ngày: Apr 2014
Bài gởi: 2
Thanks: 1
Thanked 0 Times in 0 Posts
Default Ðề: Xin Lisp scale không làm thay đổi kích thước của text

Trích:
Nguyên văn bởi tuotnovit201 View Post
http://www.cadviet.com/upfiles/fakedim.vlx

Dùng lệnh fakedim, các giá trị của đối tượng dim sẽ được sửa giá trị sang text. Bạn cứ scale thoải mái đi!
lisp cua bac dung hay do.
cam on bac nhieu nha
phanbadung48 vẫn chưa có mặt trong diễn đàn   Trả Lời Với Trích Dẫn
Unread 03-07-2014   #6
bachhaiduong
Thành viên
 
Tham gia ngày: Dec 2013
Bài gởi: 77
Thanks: 30
Thanked 87 Times in 30 Posts
Default Ðề: Xin Lisp scale không làm thay đổi kích thước của text

Trích:
Nguyên văn bởi tuotnovit201 View Post
http://www.cadviet.com/upfiles/fakedim.vlx

Dùng lệnh fakedim, các giá trị của đối tượng dim sẽ được sửa giá trị sang text. Bạn cứ scale thoải mái đi!
Có hướng dẫn sử dụng không bác. Download về đổi đuôi lại thành LSP rồi mà không xài được. Hay tại e xài cad 2014 nhỉ?
À mà ý của bác steel_structure là thay đổi tỉ lệ của bản vẽ mà không ảnh hưởng tới kích thước của "text ghi chú" chứ không phải text của dim. Vd chuyển bản vẽ từ khổ A3 --> A1 thì "text ghi chú" - cái mà đang nằm hỗn loạn trong bản vẽ - sẽ bị phóng to lên gấp 2 lần.Do đó cần lisp nào mà cố định được kích thước của "text ghi chú" .Em cũng muốn tìm cái lisp đó ai có tù thiện cho e với nhé.
bachhaiduong vẫn chưa có mặt trong diễn đàn   Trả Lời Với Trích Dẫn
Unread 25-01-2016   #7
toilaai202
Thành viên mới
 
Tham gia ngày: Jul 2009
Bài gởi: 10
Thanks: 0
Thanked 3 Times in 1 Post
Default Ðề: Xin Lisp scale không làm thay đổi kích thước của text

Trích:
Nguyên văn bởi tuotnovit201 View Post
http://www.cadviet.com/upfiles/fakedim.vlx

Dùng lệnh fakedim, các giá trị của đối tượng dim sẽ được sửa giá trị sang text. Bạn cứ scale thoải mái đi!
Không có lệnh tắt hay sao mà nhất thiết phải gõ từng chữ FAKEDIM dài dòng vậy chú ?
toilaai202 vẫn chưa có mặt trong diễn đàn   Trả Lời Với Trích Dẫn
Unread 01-07-2016   #8
XDDD.CN
Thành viên mới
 
Tham gia ngày: Jun 2013
Bài gởi: 1
Thanks: 1
Thanked 0 Times in 0 Posts
Default Ðề: Xin Lisp scale không làm thay đổi kích thước của text

Trích:
Nguyên văn bởi tuotnovit201 View Post
http://www.cadviet.com/upfiles/fakedim.vlx

Dùng lệnh fakedim, các giá trị của đối tượng dim sẽ được sửa giá trị sang text. Bạn cứ scale thoải mái đi!
Hay lắm bạn, cám ơn bạn nhiều
XDDD.CN vẫn chưa có mặt trong diễn đàn   Trả Lời Với Trích Dẫn
Unread 21-12-2016   #9
tuandx
Thành viên
 
Tham gia ngày: Jan 2010
Bài gởi: 99
Thanks: 61
Thanked 37 Times in 20 Posts
Default Ðề: Xin Lisp scale không làm thay đổi kích thước của text

[Error (429)
This account's links are generating too much traffic and have been temporarily disabled!
tuandx vẫn chưa có mặt trong diễn đàn   Trả Lời Với Trích Dẫn
Unread 25-12-2016   #10
Canhcam_1704
Thành viên mới
 
Tham gia ngày: Dec 2015
Bài gởi: 1
Thanks: 0
Thanked 0 Times in 0 Posts
Default Ðề: Xin Lisp scale không làm thay đổi kích thước của text

ai có lisp fakedim kia cho em xin vs ạ
link bác ấy post bị khóa rồi ạ
Canhcam_1704 vẫn chưa có mặt trong diễn đàn   Trả Lời Với Trích Dẫn
Unread 27-12-2016   #11
ThangCoi
Thành viên nhiệt huyết
 
ThangCoi's Avatar
 
Tham gia ngày: Mar 2006
Nơi Cư Ngụ: Không cố định
Bài gởi: 603
Thanks: 56
Thanked 279 Times in 104 Posts
Send a message via Yahoo to ThangCoi
Default Ðề: Xin Lisp scale không làm thay đổi kích thước của text

Cái này chỉ cần vài công lênh đơn giản trong VBA là xong ngay thôi.
-------------------------------------------------------------------------------
'Chuong trinh chuyen dim tu dim that thanh dim ed (gia tri khong doi)
Public Sub TextDim()

Dim ReturnObj1 As AcadObject
Dim BasePnt As Variant
Dim Dim1 As AcadDimension
Dim KT As String
Dim i As Integer
Dim Sel As AcadSelectionSet
Dim FilterData(0) As Variant, FilterType(0) As Integer
'===========================================
On Error GoTo Ketthuc
For i = 0 To ThisDrawing.SelectionSets.Count - 1
ThisDrawing.SelectionSets(i).Delete
Next i
Set Sel = ThisDrawing.SelectionSets.Add("Dimension")
FilterType(0) = 0: FilterData(0) = "Dimension"
Sel.SelectOnScreen FilterType, FilterData
For i = 0 To Sel.Count - 1
Set Dim1 = Sel(i)
KT = Round(Dim1.Measurement, 1)
Dim1.TextOverride = KT
Dim1.Highlight (False)
Next i
Ketthuc:
End Sub
ThangCoi vẫn chưa có mặt trong diễn đàn   Trả Lời Với Trích Dẫn
Trả lời

Ðiều Chỉnh
Xếp Bài

Quyền sử dụng ở Diễn Ðàn
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is Mở
Smilies đang Mở
[IMG] đang Mở
HTML đang Mở

Chuyển đến



Múi giờ GMT. Hiện tại là 05:04 AM.


DIỄN ĐÀN http://ketcau.com/forum NƠI HỘI TỤ CỦA CÁC KỸ SƯ KẾT CÂU VIỆT NAM
WWW.KETCAU.COM - CẦU NỐI CỦA CÁC KỸ SƯ KẾT CẤU CÔNG TRÌNH, ĐỊA KỸ THUẬT VIỆT NAM. DIỄN ĐÀN ĐƯỢC MUA BẢN QUYỀN CỦA JELSOFT ENTERPRISES Ltd.