设为首页收藏本站转
发帖领奖家园QQ群申请版主版主评价切换到宽版

 找回密码
 立即注册

QQ登录

只需一步，快速开始

扫一扫，访问微社区

晓东CAD家园-论坛»论坛 › ╃CAD编程开发 › OpenDCL › 对话框中控件的联动问题（不在st788796长老的帖子捣乱了 ...
返回列表 发新帖
查看: 2630|回复: 11

[求助] 对话框中控件的联动问题（不在st788796长老的帖子捣乱了，另开一个贴）

[复制链接]
13808843088
发表于 2014-12-6 12:29:56 | 显示全部楼层 |阅读模式
【广而告之】积分规则、D豆获取攻略       窝窝空间装扮攻略

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

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

×
本帖最后由 13808843088 于 2014-12-6 12:47 编辑

在st788796长老的帖子里提了些问题，容易与其主体混淆，另开一贴，请大家指导，谢谢。
英文帮助看得痛苦至极，最好是哪位同仁有时间根据本例做个范例。
效果 QQ图片20141206122518.jpg
几个问题:
1、这种联动的对话框是否只能非模态实现。
2、当字符串1没有在EditChanged状态，而是粘贴状态，字符串1粘贴后长度大于9如何处理。
3、高宽比那里如何处理。
  2. (defun c:tt1 ()
  3.   (setq lst'("YWt6A6oaAABBAVkJBuKTJjU2Ki9mgDk4xaYa3WvGSqrstKny8WdpX8P2rC9ZPxxcro/Um+1ubSQm"
  4. "Lmr6xnZa0gvGlnfDdqKq3KTHFp/c+7XW0jtur72XQYGi5wWZZeO/SuO7IsegjeOB4oHggeKBhZjg"
  5. "nXJT+LbGTfk32QBk3DTMb6+SWNwSAFQt7+UUx6Q9K5rbdIBVm6U9q6qw21SUnhnuNZMiKRXqwoKS"
  6. "XEnFkpxoP1AHxvHCVNpCCM/BXgsMNeOBRLvxsMPDLAwN0RRQB6cJe6no9EFxiS9DRIbXDTNLyay2"
  7. "3zi1MD06h9qnVv3yNbsK+niXYjkrN6RltPUm8ljk4ZIax8pP9yLQcZIuxTMneMrX7xUBfvF+sE2F"
  8. "qVUBkb8AYI5NzcPCgXee2f5hfYB7gDh/GaccjxFNIJs2xTTl3O3bnFMiCIwgLNjbXRdkBgBlre3K"
  9. "bA3a3SIMVhXQvkwi3dJ4JyzjhAY/S3n67ndRBH6IBf6RfcB1Zn2X9TA3Zol8kPF4HIXQ2BZukhl/"
  10. "IfmJUzodc507zcNSv2mWgUfEWh8ieoPB5J1vhWwn47/aTtDG8sg5vXGl5TLFlNobu1KziMi+0HVQ"
  11. "IVvXme4AG4KLOnMDwkqTgUjQyfoTUMRP38kWcf838V6tzH9xusK5rzZZ1v6RYDf9QFBhnIGj2sNO"
  12. "ucneuBEf5i2Hp3WPkk6TSWsQSI/CvFO+3jHuybvYwzqnA1iwKYZGihF+onaGZh6atxDm6eymj3QR"
  13. "4nxtj9gUU43e/pyMHiVacZjYkOLQjccnbYS3bxTg0o+xeirzKRSctvQaMOhbNhBaTexjt4PRJ/ha"
  14. "OOzddt423vYeqNyW0l71eyXMJtcX4rYmzAQkyzFYTFY0tnxq5xrcKnKPJiYtP5W15CdMJs0rHlyo"
  15. "xqnsS2wZUhXiDS1N/wnDC6qnFUHnnfUOlow2JR42EcNGkzGNG5OHzNqUWZ711oJ4jDuSaMCqrYSM"
  16. "m0ehcEtFR3yJXSHKKCCCL2TYfYJPRjTQ2uJX+QkrfsgOlFkONJKGO/xiN7j34msMfEfudcfrVOKO"
  17. "PqK3Rkx3D18Z0L9CCn4QfRKf5hbj+x05qxGsQLa/LL62P2OOYPaRa54ltQ0GIKcx/wNZDt6yEoEd"
  18. "Eh1HwZrpG2nyActknvuHJf9Yiu7fdyV6WK3624mogTdtWoko2Xc7P9Rdjc7d4rIDEEcfFvuqOn0K"
  19. "5kSXcqlgmscXGaJTGWgXEzcVNdQX9aaPBVyryjvLCHYyigOQNOF426oX7kMMnO302UP8D+ESn8+W"
  20. "NnThiFajbSASaOb2abcBESnJEcs5CNSXg5ekkTF70Z5COYxIqwAxqOdplIR1LSVhtA=="))
  21.   (dcl_project_import lst)
  22.   (dcl-Form-Show temp1/Form1)
  23.   )
  24. (defun c:temp1/Form1/TextBox1#OnEditChanged (NewValue / n)
  25.   (if (null (< (setq n(strlen NewValue)) 8))
  26.     (dcl-Control-SetFocus temp1/Form1/TextBox2)
  27.     (dcl-Control-SetCaption temp1/Form1/Label3 (strcat"高宽比为：" (rtos(/ 9.(* n 3.)) 2 2)))
  28.     )
  29.   )
对话框

相关帖子

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

使用道具 举报

st788796

已领礼包: 1268个

财富等级: 财源广进
发表于 2014-12-6 12:39:32 来自手机 | 显示全部楼层
首先你要纠正一个概念，对话框界面是 点，界面规整，布局合理、字体大小合适即可，没有 mm 之说

点评

newer
美眉，咪咪，就是你图片里面写的3mm，不用定这个，就3单位就行了。ODCL里面是像素。 你这个问题，其实重点主要是 setFocus, 然后 setText .  详情 回复 发表于 2014-12-6 12:52
13808843088
？什么叫mm？  发表于 2014-12-6 12:48
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能，那里可能会有你要找的答案；
如果你在论坛求助问题，并且已经从坛友或者管理的回复中解决了问题，请把帖子标题加上【已解决】；
如何回报帮助你解决问题的坛友，一个好办法就是给对方加【D豆】，加分不会扣除自己的积分，做一个热心并受欢迎的人！
回复 支持 反对

使用道具 举报

newer

已领礼包: 40个

财富等级: 招财进宝
发表于 2014-12-6 12:52:07 | 显示全部楼层
【广而告之】积分规则、D豆获取攻略       窝窝空间装扮攻略
st788796 发表于 2014-12-6 12:39
首先你要纠正一个概念，对话框界面是 点，界面规整，布局合理、字体大小合适即可，没有 mm 之说

美眉，咪咪{:soso_e113:}，就是你图片里面写的3mm，不用定这个，就3单位就行了。ODCL里面是像素。

你这个问题，其实重点主要是 setFocus, 然后 setText .

点评

13808843088
这个我明白，里面所说的mm是在对话框中提取出来后，写到autocad中的高度  发表于 2014-12-6 12:54
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能，那里可能会有你要找的答案；
如果你在论坛求助问题，并且已经从坛友或者管理的回复中解决了问题，请把帖子标题加上【已解决】；
如何回报帮助你解决问题的坛友，一个好办法就是给对方加【D豆】，加分不会扣除自己的积分，做一个热心并受欢迎的人！
回复 支持 反对

使用道具 举报

13808843088
 楼主| 发表于 2014-12-6 12:52:54 | 显示全部楼层
在一楼的附件中，联动解决了，剩下粘贴的问题没有解决 1.gif

点评

守仁格竹GM
复制粘贴也没问题吧，用你的代码 都可以实现。  详情 回复 发表于 2014-12-6 13:41
newer
粘贴有什么问题？你想怎么做？  详情 回复 发表于 2014-12-6 13:05
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能，那里可能会有你要找的答案；
如果你在论坛求助问题，并且已经从坛友或者管理的回复中解决了问题，请把帖子标题加上【已解决】；
如何回报帮助你解决问题的坛友，一个好办法就是给对方加【D豆】，加分不会扣除自己的积分，做一个热心并受欢迎的人！
回复 支持 反对

使用道具 举报

newer

已领礼包: 40个

财富等级: 招财进宝
发表于 2014-12-6 13:05:23 | 显示全部楼层
【广而告之】积分规则、D豆获取攻略       窝窝空间装扮攻略
13808843088 发表于 2014-12-6 12:52
在一楼的附件中，联动解决了，剩下粘贴的问题没有解决

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

使用道具 举报

13808843088
 楼主| 发表于 2014-12-6 13:25:01 | 显示全部楼层
过分执着于对话框本身了，应在回调函数上想办法，谢谢各位
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能，那里可能会有你要找的答案；
如果你在论坛求助问题，并且已经从坛友或者管理的回复中解决了问题，请把帖子标题加上【已解决】；
如何回报帮助你解决问题的坛友，一个好办法就是给对方加【D豆】，加分不会扣除自己的积分，做一个热心并受欢迎的人！
回复 支持 反对

使用道具 举报

守仁格竹GM

已领礼包: 1757个

财富等级: 堆金积玉
发表于 2014-12-6 13:34:30 | 显示全部楼层
【广而告之】积分规则、D豆获取攻略       窝窝空间装扮攻略
opendcl高版本跟低版本不一样真烦人那

点评

newer
你指的是哪些？具体有什么冲突？  详情 回复 发表于 2014-12-6 13:36
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能，那里可能会有你要找的答案；
如果你在论坛求助问题，并且已经从坛友或者管理的回复中解决了问题，请把帖子标题加上【已解决】；
如何回报帮助你解决问题的坛友，一个好办法就是给对方加【D豆】，加分不会扣除自己的积分，做一个热心并受欢迎的人！
回复 支持 反对

使用道具 举报

newer

已领礼包: 40个

财富等级: 招财进宝
发表于 2014-12-6 13:36:39 | 显示全部楼层
守仁格竹GM 发表于 2014-12-6 13:34
opendcl高版本跟低版本不一样真烦人那

你指的是哪些？具体有什么冲突？

点评

守仁格竹GM
(defun c:tt1 () (setq lst '("YWt6A5wOAABUe1dVBuKTKDUVbS9qgCytihSV1V52EFQ4UpSqN6SkuPv20fvIuNTedV/mSBerwO7c" "uzPJeyPGLD9pg39Av3nG0mWjC5e8YV4WC1mc3Y/ipRcQmM1fes8an3NNDcEFIIngTZnl0lFSam4i" "i222H  详情 回复 发表于 2014-12-6 13:43
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能，那里可能会有你要找的答案；
如果你在论坛求助问题，并且已经从坛友或者管理的回复中解决了问题，请把帖子标题加上【已解决】；
如何回报帮助你解决问题的坛友，一个好办法就是给对方加【D豆】，加分不会扣除自己的积分，做一个热心并受欢迎的人！
回复 支持 反对

使用道具 举报

守仁格竹GM

已领礼包: 1757个

财富等级: 堆金积玉
发表于 2014-12-6 13:41:45 | 显示全部楼层
【广而告之】积分规则、D豆获取攻略       窝窝空间装扮攻略
13808843088 发表于 2014-12-6 12:52
在一楼的附件中，联动解决了，剩下粘贴的问题没有解决

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

使用道具 举报

守仁格竹GM

已领礼包: 1757个

财富等级: 堆金积玉
发表于 2014-12-6 13:43:26 | 显示全部楼层
newer 发表于 2014-12-6 13:36
你指的是哪些？具体有什么冲突？

(defun c:tt1 ()
  (setq lst
  '("YWt6A5wOAABUe1dVBuKTKDUVbS9qgCytihSV1V52EFQ4UpSqN6SkuPv20fvIuNTedV/mSBerwO7c"
"uzPJeyPGLD9pg39Av3nG0mWjC5e8YV4WC1mc3Y/ipRcQmM1fes8an3NNDcEFIIngTZnl0lFSam4i"
"i222H3qdNl58HtB/JtNtb7tFG89tY5Zp62rsju65e4ZMiRrLJe6wLMzsOukjjZuX9VpbCH0co1/N"
"ghzW/ASS7kurL5UAr46alGyjO5Xi6wS29FJbCTHcW5sUuSDHCaRWd6+MbzvdRMtl6/9TTm+qX2YE"
"0t1mvWtHJnyYc+TpWv/0R1tg/N9AsuoDpo8/gud8HDUc8x3QbcAxhmmf1foZL/HsH+QjwsX0oe2A"
"S7zVXJ+DwAqIqKENvFF2QV0C7YKhX4L9jlqfJlryASxAyetTuKXuetirk5LjshInqwnd0JKZzORN"
"LIA3Mp7eBuJSLaJE5pw/ia64goz7gdD78cQ8Jwekt7lrqa2/4UYBSKAtjMFQ6sYGQYi/SyJ4UE9n"
"jq9MNh1qOdo9ULSUX3I3cfIcLsp4HmAvP2BsID2F5tsNE9ppDErqmNgg4jj1Ij1sEyYAU0ZSiT/m"
"NTvBSFEY8o42TyHv0eSxtVphWIK0mwkgi8VX4VvzzCePE0SpUES5SptfNYZSnzOwAcmk4QoGOBgY"
"SUvwOYZ4h7VvoDeZBzOGYJeJR4E4neFZh6h0k66YksEz94P8tcmzqRm0gQKvodyB8argISJD04BZ"
"SvoO4pLJxYZlKgC8nxe7B0SxD7QZcZ8gvLl22VbhMlFFlgNX32VboFyjSpc0W8Q30Fqjyhxbl1iH"
"sZa4kI1Bo6pCo94UxDeoaqPiPeYQcN7Ilhh4f6PWuyQjFx3E94s2sRsTcSqAGb0BJ92KFNhXS88M"
"36SB2udYKjlF8TfBbCNC1uxAFPtQNJa/uUwKLqygiJUjrKANJtgDhZYL08vRi6HINWuTD1UGgHgS"
"8LND")
)
  (dcl_project_import lst)
  (dcl_Form_Show temp1_Form1)
  )
(defun c:temp1_Form1_TextBox1_OnEditChanged (NewValue / n)
  (if (null (< (setq n (strlen NewValue)) 8))
    (dcl_Control_SetFocus temp1_Form1_TextBox2)
    (dcl_Control_SetCaption temp1_Form1_Label1 (strcat"高宽比为：" (rtos(/ 9.(* n 3.)) 2 2)))
    )
  )
这是低版本
的，命令、变量名都有一些变动、
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能，那里可能会有你要找的答案；
如果你在论坛求助问题，并且已经从坛友或者管理的回复中解决了问题，请把帖子标题加上【已解决】；
如何回报帮助你解决问题的坛友，一个好办法就是给对方加【D豆】，加分不会扣除自己的积分，做一个热心并受欢迎的人！
回复 支持 反对

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

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

GMT+8, 2025-9-20 06:05 , Processed in 0.293177 second(s), 52 queries , Gzip On.

Powered by Discuz! X3.5

© 2001-2025 Discuz! Team.

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