几何尺寸与公差论坛------致力于产品几何量公差标准GD&T (GDT:ASME)|New GPS(ISO)研究/CAD设计/CAM加工/CMM测量  


返回   几何尺寸与公差论坛------致力于产品几何量公差标准GD&T (GDT:ASME)|New GPS(ISO)研究/CAD设计/CAM加工/CMM测量 » 仿射空间:CAX软件开发(三)二次开发与程序设计 » CAD二次开发 » AutoCAD二次开发 » ObjectARX(VB.NET/C#)
用户名
密码
注册 帮助 会员 日历 银行 搜索 今日新帖 标记论坛为已读


回复
 
主题工具 搜索本主题 显示模式
旧 2009-04-21, 09:46 AM   #1
yang686526
高级会员
 
注册日期: 06-11
帖子: 14579
精华: 1
现金: 224494 标准币
资产: 234494 标准币
yang686526 向着好的方向发展
默认 【转帖】如何在拖放操中取得鼠标松开时在cad下的座标?

如何在拖放操中取得鼠标松开时在cad下的座标?
www.dimcax.com
如何在拖放操中取得鼠标松开时在cad下的座标?
如标题所示。样例(第六课,可停靠对话框。)上也是后来再输入了一个点。我感觉这是个画蛇添足的做法。要是能取得这个点就好了。我的vb。net较菜望各位不吝赐教。
我想了想,此问题可简化为只需取出当时鼠档在cad中的位置座标(即cad左下角的实时变化的座标值)。此方法有没有人知道是什么命令?有的话烦请告诉我。。 [
cad开发爱好者
或有这个函数也可以。 将屏幕点转化为cad下的点。 vb开发cad extern static bool acedcoordfrompixeltoworld(int viewportnumber, system.drawing.point pixel, out autodesk.autocad.geometry.point3d worldpt); [dllimport("acad.exe", callingconvention = callingconvention.cdecl, entrypoint="?acedcoordfromworldtopixel@@yahhqbnaavcpoint@@@z")] extern static bool acedcoordfromworldtopixel(int viewportnumber, ref autodesk.autocad.geometry.point3d worldpt, out system.drawing.point pixel); [commandmethod("testpix")] public void test() { point3d pt = new point3d(0,0,0); system.drawing.point pix; acedcoordfromworldtopixel(0,ref pt,out pix); point3d res; acedcoordfrompixeltoworld(0,pix,out res); } }
c#最适合开发autocad,因为它拥有vb容易的特点,却具有vc++的强大功能。
谢谢站长,感激涕零!我将其改为vb代码,有什么问题免不了还要麻烦站长。呵……真是太不好意思了。 只是我水平太差,没有能力将其改写成vb的,可否麻烦站长帮助改写或用什么方法让vb可以调用。 [
cad开发爱好者
cad开发爱好者
'''api函数如下所示: public class arxapi _ public shared function acedcoordfrompixeltoworld(byval viewportnumber as integer, byval pixel as system.drawing.point, byref point as point3d) as boolean ''' ''' end function ''' _ public shared function acedcoordfromworldtopixel(byval viewportnumber as integer, byval worldpt as point3d, byref pixel as system.drawing.point) as boolean ''' ''' end function end class '''调用函数如下: public overrides sub ondrop(byval e as system.windows.forms.drageventargs) dim position as point3d = new point3d(e.x, e.y, 0) showmessage(position.tostring) 'dim ed as editor = application.documentmanager.mdiactivedocument.editor 'position = ed.getpoint("in point:").value arxapi.acedcoordfrompixeltoworld(0, new point(e.x, e.y), position) showmessage(position.tostring) dim fiex as point = new point(0, 0) 'arxapi.acedcoordfromworldtopixel(0, position, fiex) showmessage(fiex.tostring) end sub
cad开发爱好者
不过将cad点转为屏幕点的函数好像不对。站长您能不能帮我看一下有什么不对的?
cad开发爱好者


1
yang686526离线中   回复时引用此帖
GDT自动化论坛(仅游客可见)
回复


主题工具 搜索本主题
搜索本主题:

高级搜索
显示模式

发帖规则
不可以发表新主题
不可以回复主题
不可以上传附件
不可以编辑您的帖子

vB 代码开启
[IMG]代码开启
HTML代码关闭



所有的时间均为北京时间。 现在的时间是 01:42 PM.


于2004年创办,几何尺寸与公差论坛"致力于产品几何量公差标准GD&T | GPS研究/CAD设计/CAM加工/CMM测量"。免责声明:论坛严禁发布色情反动言论及有关违反国家法律法规内容!情节严重者提供其IP,并配合相关部门进行严厉查处,若內容有涉及侵权,请立即联系我们QQ:44671734。注:此论坛须管理员验证方可发帖。
沪ICP备06057009号-2
更多