找回密码
 立即注册

QQ登录

只需一步,快速开始

扫一扫,访问微社区

查看: 386|回复: 13

[研讨] 关于TEXT实体设置对齐方式为中下时候遇到的问题

[复制链接]

已领礼包: 40个

财富等级: 招财进宝

发表于 2017-8-6 01:49:03 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?立即注册

×
本帖最后由 newer 于 2017-8-6 08:23 编辑

  1. (defun c:tt2 ()
  2.   (if (and (setq e (car (entsel "\nselect a text:")))
  3.            (setq o (vlax-ename->vla-object e))
  4.            (eq (vla-get-objectname o) "AcDbText")
  5.            (setq pt (getpoint "\npick alignment point:"))
  6.       )
  7.     (progn      
  8.       (vla-put-alignment o acAlignmentbottomCenter)
  9.       (vla-put-textalignmentpoint o (vlax-3d-point pt))
  10.     )
  11.   )
  12.   (princ)
  13. )


上面代码TT2,是设置对齐方式为中下,但是对齐点离开文字很远,其他的对齐方式,朋友们帮忙测试和分析下

文字样式字体用SHX。


搜狗截图20170806011508.png
搜狗截图20170806082115.png


论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!

已领礼包: 1268个

财富等级: 财源广进

发表于 2017-8-6 02:59:26 来自手机 | 显示全部楼层
换个字体   

点评

嗯,很多字体都有这个问题,romanc,romand,complex都有这个问题  发表于 2017-8-7 13:15
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 5060个

财富等级: 富甲天下

发表于 2017-8-6 07:19:29 来自手机 | 显示全部楼层
手机回复,没法测试:应该是顺序问题,dxf10和dxf11是两个不同组码,如果先改对齐方式为中下,中断一下,文字的位置会变了。试试去掉alignment,改 vla-put-textposition
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 2476个

财富等级: 金玉满堂

发表于 2017-8-6 08:01:22 | 显示全部楼层
本帖最后由 q3_2006 于 2017-8-6 08:02 编辑

Justify Alignment Mode HorizontalMode(setHozMode) VerticalMode(setVerMode) Code73 Code72
0 acAlignmentLeft L 0 0 0 0
1 acAlignmentCenter C 0 1 0 1
2 acAlignmentRight R 0 2 0 2
3 acAlignmentAligned A 0 3 0 3
4 acAlignmentMiddle M 0 4 0 4
5 acAlignmentFit F 0 5 0 5
6 acAlignmentTopLeft TL 3 0 3 0
7 acAlignmentTopCenter TC 3 1 3 1
8 acAlignmentTopRight TR 3 2 3 2
9 acAlignmentMiddleLeft ML 2 0 2 0
10 acAlignmentMiddleCenter MC 2 1 2 1
11 acAlignmentMiddleRight MR 2 2 2 2
12 acAlignmentBottomLeft BL 1 0 1 0
13 acAlignmentBottomCenter BC 1 1 1 1
14 acAlignmentBottomRight BR 1 2 1 2

(setq l1 '(0 1 2 3 4 5 6 7 8 9 10 11 12 13 14)
        l2 '("L" "C" "R" "A" "M" "F" "TL" "TC" "TR" "ML" "MC" "MR" "BL" "BC" "BR")
)
(setq e (entlast)
        pc (Vlax-Get (Vlax-Ename->Vla-Object e) 'InsertionPoint )
        pc1 (Vlax-Get (Vlax-Ename->Vla-Object e) 'TextAlignmentPoint )
)
(Vlax-Put-Property (Vlax-Ename->Vla-Object e) 'Alignment 10 )
(setq pca (Vlax-Get (Vlax-Ename->Vla-Object e) 'InsertionPoint ))
(Vlax-Put-Property (Vlax-Ename->Vla-Object e) 'TextAlignmentPoint (Vlax-3d-Point (mapcar '- pc pca)) )
感觉跟块插入点意思相近



论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 40个

财富等级: 招财进宝

 楼主| 发表于 2017-8-6 08:15:00 | 显示全部楼层

测试下对齐方式 13, acAlignmentBottomCenter
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 40个

财富等级: 招财进宝

 楼主| 发表于 2017-8-6 08:18:01 | 显示全部楼层

所有的西文的字体都这样。就想看看是AUTOCAD的BUG,还是有什么方法解决。
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 40个

财富等级: 招财进宝

 楼主| 发表于 2017-8-6 08:34:21 | 显示全部楼层
又测试了几次,发现是当BIGFONT设置为 gbcbig.shx时候,才会出现问题,难道是这个字体设计的原因?

搜狗截图20170806082115.png
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 2476个

财富等级: 金玉满堂

发表于 2017-8-6 08:58:33 | 显示全部楼层

我测试没问题....
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 40个

财富等级: 招财进宝

 楼主| 发表于 2017-8-6 09:10:59 | 显示全部楼层

你的代码,我修改了对齐方式是13,
你用下我上面图的样式设置,大字体用 GBCBIG.SHX,小字体随便,你在测试下

  1. (defun c:tt ()
  2.   (setq        l1 '(0 1 2 3 4 5 6 7 8 9 10 11 12 13 14)
  3.         l2 '("L" "C" "R" "A" "M" "F" "TL" "TC" "TR" "ML" "MC" "MR" "BL"
  4.              "BC" "BR")
  5.   )
  6.   (setq        e   (entlast)
  7.         pc  (Vlax-Get (Vlax-Ename->Vla-Object e) 'InsertionPoint)
  8.         pc1 (Vlax-Get (Vlax-Ename->Vla-Object e) 'TextAlignmentPoint)
  9.   )
  10.   (Vlax-Put-Property (Vlax-Ename->Vla-Object e) 'Alignment 13)
  11.   (setq pca (Vlax-Get (Vlax-Ename->Vla-Object e) 'InsertionPoint))
  12.   (Vlax-Put-Property
  13.     (Vlax-Ename->Vla-Object e)
  14.     'TextAlignmentPoint
  15.     (Vlax-3d-Point (mapcar '- pc pca))
  16.   )
  17. )


论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 2476个

财富等级: 金玉满堂

发表于 2017-8-6 09:38:31 | 显示全部楼层

这次位置不对了..
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 1268个

财富等级: 财源广进

发表于 2017-8-6 10:37:21 | 显示全部楼层

这个可能和图形(英制)以及 字体定义中的控制有关,一般用 style 命令修改,没有深究过
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 604个

财富等级: 财运亨通

发表于 2017-8-6 21:29:37 | 显示全部楼层
本帖最后由 /db_自贡黄明儒_ 于 2017-8-6 21:35 编辑

遇到过,但没深究。当时感觉还是JUSTIFYTEXT命令好。

论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 20个

财富等级: 恭喜发财

发表于 2017-8-6 21:41:37 | 显示全部楼层

这种字体,应该用JUSTTEXT命令结果也一样。应该是字体设计的缺陷。
因为命令也是调用底层内部的核心,和VLA调用的是一样的。
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|申请友链|Archiver|手机版|小黑屋|辽公网安备|晓东CAD家园 ( 辽ICP备15016793号 )

GMT+8, 2024-3-29 17:22 , Processed in 0.357894 second(s), 56 queries , Gzip On.

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表