Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations MintJulep on being selected by the Eng-Tips community for having the most helpful posts in the forums last week. Way to Go!

Auto Rotation, is it available???

Status
Not open for further replies.

bloodclot

Mechanical
Joined
Jan 5, 2006
Messages
135
Location
US
Back when I used CadKey I could set a solid model to rotate about a point, origin, etc and sit back and watch it rotate, around, around, until I stopped it. Does SW have this option somewhere?

I did check the help files as well and the search here on the forum with no luck.

Thanks,
Bloodclot

***** Fear not those who argue but those who dodge *****

Dell Precision 670
3.0 Ghz Xeon Processor
Nvidia FX3450
3 gig of RAM
Dual 19" Viewsonics
 
You can do it in animation. There is an animation tab at the bottom of the SW window. It's in Help.

Chris
Systems Analyst, I.S.
SolidWorks 06 4.1/PDMWorks 06
AutoCAD 06
ctopher's home (updated 06-21-06)
 
Chris,

I forgot to add this to the original message. I was wondering if this kind of automatic rotation is possible outside of animator. I was hoping for a botton that I could add to a toolbar or maybe even a macro.

Thanks,
Bloodclot

***** Fear not those who argue but those who dodge *****

Dell Precision 670
3.0 Ghz Xeon Processor
Nvidia FX3450
3 gig of RAM
Dual 19" Viewsonics
 
Rotateviewpro is what you are asking for if you didn't want to use animator. It's great because it has many options. Rotate about screen axis or model axis (I mainly use model axis). Also, rotate about X, Y, or Z axis, or a combination of them. Also change rotation degree increments, and finally, either just let it rotate or have it save named views, jpeg, or tiff files.


Flores
SW06 SP4.1
 
You could always apply a rotary motor. I don't have SW Office so Animator is not available to me. I have applied the motor in the past for something similar.

mncad
 
My benchmark macro contains rotate and zoom code (a full rotation is 2*pi):

Code:
' ******************************************************************************
' SolidWorks graphics benchmark
' v1.00
'
' Tests rotation & zoom speed of your current model.
' ******************************************************************************

Dim swApp                       As Object
Dim swModel                     As Object
Dim swModelView                 As Object
Dim SelMgr                      As Object
Dim boolstatus                  As Boolean
Dim longstatus                  As Long, longwarnings As Long
Dim Feature                     As Object
Dim runTimeRotate               As String
Dim runTimeZoom                 As String
Dim i                           As Double
Dim s                           As Double

Sub main()
    Set swApp = Application.SldWorks
    Set swModel = swApp.ActiveDoc
    Set swModelView = swModel.ActiveView
    Set SelMgr = swModel.SelectionManager

    ' Rotating performance
    swModel.ShowNamedView2 "*Isometric", -1
    swModel.ViewZoomtofit2
    nStart = Timer
    For i = 0 To 1000
        swModel.ActiveView().RotateAboutCenter -3.14159265358979E-03, 0
        swModel.ActiveView().RotateAboutCenter 0, -3.14159265358979E-03
    Next i
    runTimeRotate = Timer - nStart & " seconds"
    
    ' Zooming performance
    swModel.ShowNamedView2 "*Isometric", -1
    swModel.ViewZoomtofit2
    s = swModelView.Scale2
    nStart = Timer
    For i = 1 To 1001
        s = s * 1.005
        swModelView.Scale2 = s
        swModel.GraphicsRedraw2
        ' swModel.ViewZoomTo2 -6.39704, 0.902824, 2.96739, -0.347961, -3.72995, 2.96739
        ' swModel.ViewZoomtofit2
    Next i
    runTimeZoom = Timer - nStart & " seconds"
    
    ' Set the properties
    propRet = swModel.AddCustomInfo3("", "benchmarkRotate", swCustomInfoText, runTimeRotate)
    propRet = swModel.AddCustomInfo3("", "benchmarkZoom", swCustomInfoText, runTimeZoom)
    
    ' Return to isometric position
    ' swModel.ShowNamedView2 "*Isometric", -1
    ' swModel.ViewZoomtofit2
End Sub

Stefan Hamminga
EngIT Solutions
CSWP/Mechanical designer/AI student
 
Thanks to all. Your replies have given me what I need to get it done.

Bloodclot

***** Fear not those who argue but those who dodge *****

Dell Precision 670
3.0 Ghz Xeon Processor
Nvidia FX3450
3 gig of RAM
Dual 19" Viewsonics
 
you can just hold down one of the arrow keys on your keyboard. each one revolves your view about an axis relative to the screen.
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top