一个简单的例子详解FORM的操作

amengtys · 发表于 2023-6-25 10:39:14

学习

zwzlove · 发表于 2023-9-12 11:53:32

受教了，豁然开朗

f2001fcn · 发表于 2023-9-12 13:43:41

看不懂，学不会啊

zwzlove · 发表于 2023-9-20 11:31:30

学习了。谢谢分享

zwzlove · 发表于 2023-10-17 18:00:04

请教一下，怎么在退出时删除生成的.form文件呢？

1061652558 · 发表于 2024-3-20 10:20:13

膜拜师傅啊

1061652558 · 发表于 2024-3-25 10:54:50

正在学习中……

xiaomi8 · 发表于 2024-6-12 17:16:06

本帖最后由 xiaomi8 于 2024-6-12 17:18 编辑

axlCmdRegister("ss" 'setspacing)
procedure(setspacing()
testForm = axlFormCreate((gensym) "d:/cns_space_values.form" nil 'setspacingAction t nil)
axlFormDisplay(testForm)
);end procedure
procedure(setspacingAction(testForm)
case(testForm->curField
("pin_to_pin"
axlCNSSetSpacing("" "top" 'pin_pin "pin_to_pin")
)
("line_to_pin"
axlCNSSetSpacing("" "top" 'line_pin "line_to_pin")
)
("line_to_line"
axlCNSSetSpacing("" "top" 'line_line "line_to_line")
)
);end case
)

复制代码

考拉lyn · 发表于 2024-7-14 12:36:54

感谢无私分享，可以使用，谢谢

帐号		自动登录	找回密码
密码			立即注册

罗老师， 请帮忙看一下，怎么在方框中填入数值，然后自动同步到constraint manager...