tangweinbs 发表于 4 天前

大神发布CAD 装逼想求个CASS 装逼

本帖最后由 tangweinbs 于 2024-12-24 06:56 编辑

原版：南方cass11
修改完打开后：南方cass11 腾飞版
大神发布的网址http://bbs.mjtd.com/thread-176826-1-1.html
试了大神发布的LISP 在低版本cad 上没弄明白

[*](defun c:zhB()
[*]http://bbs.mjtd.com/source/plugin/imc_colorcode/images/jssc_none.gif(setq hCAD (vla-get-hwnd (vlax-get-acad-object))
[*]http://bbs.mjtd.com/source/plugin/imc_colorcode/images/jssc_none.gif      dwx (vlax-create-object "DynamicWrapperX"))
[*]http://bbs.mjtd.com/source/plugin/imc_colorcode/images/jssc_none.gif(if dwx (progn
[*]http://bbs.mjtd.com/source/plugin/imc_colorcode/images/jssc_none.gif(vlax-invoke dwx 'Register "user32" "SetWindowTextW" "i=hw" "r=m")
[*]http://bbs.mjtd.com/source/plugin/imc_colorcode/images/jssc_none.gif(vlax-invoke dwx 'SetWindowTextW hCAD "AutoCAD 装逼犯专供版")
[*]http://bbs.mjtd.com/source/plugin/imc_colorcode/images/jssc_none.gif)(princ "\n请注册 DWX 插件")
[*]http://bbs.mjtd.com/source/plugin/imc_colorcode/images/jssc_none.gif)(and dwx (vlax-release-object dwx))
[*]http://bbs.mjtd.com/source/plugin/imc_colorcode/images/jssc_none.gif(princ)
[*]http://bbs.mjtd.com/source/plugin/imc_colorcode/images/jssc_none.gif)



tangweinbs 发表于 3 天前

求大神 指点迷津啊{:1_1:}{:1_1:}{:1_1:}{:1_1:}

你有种再说一遍 发表于 3 天前

你发错板块了,
C#处理这个只需要Acap.MainWindow.Text ="标题";
简单得很.

gzxl 发表于 3 天前

ObjectARX 也是一句
acedGetAcadFrame::SetWindowText

Bao_lai 发表于 3 天前


老铁没毛病。

tangweinbs 发表于 前天 06:54

:D-没弄懂.......
页: [1]
查看完整版本: 大神发布CAD 装逼想求个CASS 装逼