机械必威体育网址

 找回密码
 注册会员

QQ登录

只需一步,快速开始

搜索
查看: 19363|回复: 7
打印 上一主题 下一主题

[请教] 如何拾取装配体重心?

[复制链接]
跳转到指定楼层
1#
发表于 2011-1-21 11:00:45 | 只看该作者 回帖奖励 |正序浏览 |阅读模式
计算翻盖机构时,需要知道一个组件的重心位置,SW自带的评估功能可以得到,但是重心点无法拾取。6 T5 M* i( b) f# y. c% e3 Y
4 x1 k8 s# T7 G
怎样把重心变成实体点,这样可以用测量工具测量到重心与指定元素(铰链轴等)的距离。
6 N7 g5 D, g. |8 w: {* W$ O! m4 o' k6 ?% S
谢谢!. O! J0 L$ Q) l$ Q
回复

使用道具 举报

8#
发表于 2011-1-24 13:44:32 | 只看该作者
都是高手啊  宏的确是个好帮手 就是不会用
回复 支持 反对

使用道具 举报

7#
发表于 2011-1-23 22:35:08 | 只看该作者
正在学习中,呵呵!!
& x; N( u# c! y- f$ Y; w# B) g
回复 支持 反对

使用道具 举报

6#
发表于 2011-1-23 10:53:31 | 只看该作者
都是高手,谢谢了~~~~~~~~~~~~~~~~~~~~~~~~~~
回复 支持 反对

使用道具 举报

5#
 楼主| 发表于 2011-1-22 19:14:01 | 只看该作者
多谢大家指点迷津,我用草图解决了。* r6 u& d. ?! K2 ]6 i* y- H1 B

6 _8 [* U0 v$ p& \% ?2楼大侠的宏方法等有时间好好研究一下。* w+ y9 @, Y, y/ |( \
/ L4 H) _# B  G& A& X0 u$ l
谢谢大家!!
回复 支持 反对

使用道具 举报

4#
发表于 2011-1-21 14:22:04 | 只看该作者
先工具 质量特性 读出中心点的3维坐标值,然后画3D草图,做一个3D 的点 把点的坐标更改为 中心坐标的值,则3D 点位置就与重心位置是重合的。
回复 支持 反对

使用道具 举报

3#
发表于 2011-1-21 13:01:33 | 只看该作者
质量特性上面不是有个重心的坐标吗,可以自已画一个吗
回复 支持 反对

使用道具 举报

2#
发表于 2011-1-21 12:55:14 | 只看该作者
本帖最后由 叶飘零 于 2011-1-21 13:56 编辑
  B& f/ r: S$ ^, m% Q
. _, v- f3 _+ h, x! n- S可以先点装配体的质量特性按钮,软件计算出重心的XYZ坐标,记下这个坐标,在装配体中插入三维草图,新建一草图点,手动设置草图点的XYZ坐标为刚记下的坐标值就可以了。这是手动的笨方法,只有我这种笨人才用,改了图要手动改点坐标才行。' q0 r- a9 g# j" B% @
下面是转载的高手的方法,我试用过了,好像有问题,可能是版本的问题吧。(以下为转载)
4 _6 y0 z" h: u) U; L3 q* P! C
0 N) c9 x5 T8 h( U! t# b3D草图点可以通过宏程序和重心进行关联,具体操作方式步驟如下1. 功能表>工具>宏/巨集>新增6 r/ U9 J3 u+ Q3 F, T; t* P
2. 選擇儲存位置及給予有意義的名字
; V( P& U1 s7 J2 D3. 刪除新宏內所有內容,貼上以下的程序碼
$ K& A% g4 s5 u7 x8 l- h: Y& z! m, b8 i) R# y1 m
  • Function swmRebuild(swApp As Object, ModelDoc As Object, Feature As Object) As Variant
  • Dim nStatus As Long
  • vMassProp = ModelDoc.Extension.GetMassProperties(1, nStatus)
  • Parents = Feature.GetParents
  • vPoints = Parents(0).GetSpecificFeature2.GetSketchPoints2
  • Set Point = vPoints(0)
  • Point.X = vMassProp(0): Point.Y = vMassProp(1): Point.Z = vMassProp(2)
  • End Function
  • Sub main()
  • Set swApp = Application.SldWorks
  • Dim ModelDoc As SldWorks.ModelDoc2: Set ModelDoc = swApp.ActiveDoc
  • ThisFile = swApp.GetCurrentMacroPathName
  • Dim Methods(8) As String: Methods(0) = ThisFile: Methods(1) = "Module1": Methods(2) = "swmRebuild"
  • ModelDoc.SketchManager.Insert3DSketch True
  • ModelDoc.SketchManager.CreatePoint 0, 0, 0
  • ModelDoc.SketchManager.InsertSketch True
  • Set MacroFeature = ModelDoc.FeatureManager.InsertMacroFeature2("MassCenter_Update", "", (Methods), Empty, Empty, Empty, Empty, Empty, Nothing, Empty, 0)
  • End Sub& x6 H  l( S& U; M3 ~/ w* p& a5 G; K+ I! n
5. 立即運行也可,或到自定義工具列,新增一個圖示方便使用
% n0 X. @8 @0 O; g* y2 C& E由于程序簡短編寫,因此有很多禁忌必須注意:
  V0 _; Q# n* C& ?6 w4 h1. 必定在裝配內運行
* A" ~: ~- }* _  t$ v" G2. 再多配置/模型組態的情況下,每個重心特徵宏只可再一個配置/模型組態內運行,在其他配置/模型組態內必須抑制1 l, w3 Q7 {5 o. @
3. 3D草圖內的那一個點不可刪除
/ T6 U( B7 R3 A! x: J, X" w1 J3 E4. 這個裝配插入到另一個裝配(成為子裝配),如果多於一個的時候,這些子裝配就不可設定為靈活。
: z7 L9 b$ [* k, T6 k
# H( t  M& P% M1 N' ]2 ?5 t转载来源链接:http://www.5dcad.cn/bbs/thread-39631-1-1.html,感谢原作者!
9 r  c6 d" w; ]
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 注册会员

本版积分规则

小黑屋|手机版|Archiver|机械必威体育网址 ( 京ICP备10217105号-1,京ICP证050210号,浙公网安备33038202004372号 )

GMT+8, 2024-11-25 17:23 , Processed in 0.048855 second(s), 15 queries , Gzip On.

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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