明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 2397|回复: 4

求助:.arx自动加载。谢谢!!!!!!1

[复制链接]
发表于 2005-5-18 18:47:00 | 显示全部楼层 |阅读模式
我想在cad上加一个按钮,当点击的时候,自动加载.arx文件。请指点呀,谢谢了!!!!!!!!!
 楼主| 发表于 2005-5-19 10:34:00 | 显示全部楼层
当cad启动的时候,自动加载.arx程序,不用添加按钮也可以呀,怎么实现呀,帮帮忙了!


谢谢!!!!!!!!!!1
 楼主| 发表于 2005-5-19 11:26:00 | 显示全部楼层
以下是自动加载的方法 我是从以前的帖子复制过来的,希望对现在要用的人有用 需要说明的:是论坛以前发的东西,我只是复制一下,未做改动,原创者不要生气: 让你的ARX程序自动加载 void Regiter(LPCTSTR lpszMyAppName)
{
CString strKeyPos=::acrxProductKey()+CString(_T("\\AutodeskApps"));

//下边函数的第一个参数:AcadApp::kOnCommandInvocation,是调用你的命令时自动加载
::acrxRegisterApp(AcadApp::kOnCommandInvocation,lpszMyAppName,strKeyPos,2);
CRegKey regKey;
if(regKey.Create(HKEY_LOCAL_MACHINE,strKeyPos+_T("\\")+lpszMyAppName)==ERROR_SUCCESS)
{
CRegKey regSubKey;
if(regSubKey.Create(regKey,_T("Commands"))==ERROR_SUCCESS)
{
regSubKey.SetValue("E:\\刘万辉程序相关\\VC源代码\\HMBDesigner\\Debug\\","ARXHMBDesigner.arx");
//一直加加到你的命令加完为止
regSubKey.Close();
}
if(regSubKey.Create(regKey,_T("Loader"))==ERROR_SUCCESS)
{
regSubKey.SetValue(acedGetAppName(),_T("MODULE"));
regSubKey.Close();
}
if(regSubKey.Create(regKey,_T("Name"))==ERROR_SUCCESS)
{
regSubKey.SetValue(lpszMyAppName,lpszMyAppName);
regSubKey.Close();
}
regKey.Close();
}
}
//将上边那个函数放在AcRx::kInitAppMsg消息处,当然你的ARX至少要运行一次才行。
//-----------------------------------------------------------------------------------------
发表于 2005-5-20 15:31:00 | 显示全部楼层
在你的AutoCAD得Support文件中找到acad2000.lsp文件


在最后边的;; Silent load.前加上


(arxload"F:/设计sheji/debug/bysheji.arx")


“”中是你ARX所在位置
 楼主| 发表于 2005-5-20 20:58:00 | 显示全部楼层
非常感谢呀!!!!!!!!!!!!!!!
您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2024-11-26 08:28 , Processed in 0.157336 second(s), 23 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

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