topic Re: Any examples of using Workpoints? in Inventor Programming Forum

Any examples of using Workpoints?

Anonymous — Tue, 12 Nov 2002 15:21:15 GMT

I would like to add a workpoint to a part (manually) for other programming
purposes. Does anyone have any examples of: 1) Programatically naming a
workpoint. 2) Finding the named work point programatically. 3) Making the
named workpoint visible (which I think is something like "workpoint.visible=
true", but I can't find any examples of how to address the desired
workpoint).

Thanks,

Ed

Re: Any examples of using Workpoints?

Anonymous — Tue, 12 Nov 2002 15:51:09 GMT

There's a sample called "Work Point at Mass Center" that's part of the API
help. I think it demonstrates everything you asked about except the
visibility part.
--
Brian Ekins
Autodesk Inventor API Product Designer

"Ed Thompson" wrote in message
news:608ED00C34961C29C49843F7AD93DC39@in.WebX.maYIadrTaRb...
> I would like to add a workpoint to a part (manually) for other programming
> purposes. Does anyone have any examples of: 1) Programatically naming a
> workpoint. 2) Finding the named work point programatically. 3) Making
the
> named workpoint visible (which I think is something like
"workpoint.visible=
> true", but I can't find any examples of how to address the desired
> workpoint).
>
> Thanks,
>
> Ed
>
>

Re:

Anonymous — Tue, 12 Nov 2002 16:10:33 GMT

Brian,

Excellent! I see that I didn't look quite close enough at the example.
Thanks!

Ed

"Brian Ekins" wrote in message
news:8F7E53C36154021423E205F8ACDF0330@in.WebX.maYIadrTaRb...
> There's a sample called "Work Point at Mass Center" that's part of the API
> help. I think it demonstrates everything you asked about except the
> visibility part.
> --
> Brian Ekins
> Autodesk Inventor API Product Designer
>
>
> "Ed Thompson" wrote in message
> news:608ED00C34961C29C49843F7AD93DC39@in.WebX.maYIadrTaRb...
> > I would like to add a workpoint to a part (manually) for other
programming
> > purposes. Does anyone have any examples of: 1) Programatically naming
a
> > workpoint. 2) Finding the named work point programatically. 3) Making
> the
> > named workpoint visible (which I think is something like
> "workpoint.visible=
> > true", but I can't find any examples of how to address the desired
> > workpoint).
> >
> > Thanks,
> >
> > Ed
> >
> >
>
>

Re:

Anonymous — Fri, 15 Nov 2002 02:41:26 GMT

Brian,

Is if possible in R6 to place a workpoint in an assembly?

I tried the following code, but something is wrong?

Dim Comp As ComponentOccurrence
Set Comp = ThisApplication.ActiveDocument.SelectSet.Item(1)

Dim oWorkPoint As WorkPoint
Set oWorkPoint = Comp.WorkPoints.Item("Test Point")

Thanks,

Ed

"Brian Ekins" wrote in message
news:8F7E53C36154021423E205F8ACDF0330@in.WebX.maYIadrTaRb...
> There's a sample called "Work Point at Mass Center" that's part of the API
> help. I think it demonstrates everything you asked about except the
> visibility part.
> --
> Brian Ekins
> Autodesk Inventor API Product Designer
>
>
> "Ed Thompson" wrote in message
> news:608ED00C34961C29C49843F7AD93DC39@in.WebX.maYIadrTaRb...
> > I would like to add a workpoint to a part (manually) for other
programming
> > purposes. Does anyone have any examples of: 1) Programatically naming
a
> > workpoint. 2) Finding the named work point programatically. 3) Making
> the
> > named workpoint visible (which I think is something like
> "workpoint.visible=
> > true", but I can't find any examples of how to address the desired
> > workpoint).
> >
> > Thanks,
> >
> > Ed
> >
> >
>
>

Re:

Anonymous — Thu, 28 Nov 2002 11:26:49 GMT

Hi Ed,

Here's a sample that demonstrates creating work features in an assembly.

Public Sub AssemblyWorkFeatures()
' Get a reference to the assembly component definition.
Dim oCompDef As AssemblyComponentDefinition
Set oCompDef = ThisApplication.ActiveDocument.ComponentDefinition

' Get a reference to the TransientGeometry object.
Dim oTG As TransientGeometry
Set oTG = ThisApplication.TransientGeometry

' Create a work point at (0,0,0)
Dim oWPoint As WorkPoint
Set oWPoint = oCompDef.WorkPoints.AddFixed(oTG.CreatePoint(2, 0, 0))
oWPoint.Name = "My WorkPoint"

' Create a work axis through (3,1,0) and along the X axis.
Dim oWAxis As WorkAxis
Set oWAxis = oCompDef.WorkAxes.AddFixed(oTG.CreatePoint(3, 1, 0), _
oTG.CreateUnitVector(1, 0, 0))
oWAxis.Name = "My WorkAxis"

' Create a work plane that passes through (2,2,0) and is
' 45 degrees to the x-z plane.
Dim oWPlane As WorkPlane
Set oWPlane = oCompDef.WorkPlanes.AddFixed(oTG.CreatePoint(2, 2, 0), _
oTG.CreateUnitVector(0, 0, -1),
oTG.CreateUnitVector(-1, -1, 0))
oWPlane.Name = "My WorkPlane"
End Sub

-Brian

"Ed Thompson" wrote in message
news:01AAE77274E35A1DC34C60EA90150C95@in.WebX.maYIadrTaRb...
> Brian,
>
> Is if possible in R6 to place a workpoint in an assembly?
>
> I tried the following code, but something is wrong?
>
> Dim Comp As ComponentOccurrence
> Set Comp = ThisApplication.ActiveDocument.SelectSet.Item(1)
>
> Dim oWorkPoint As WorkPoint
> Set oWorkPoint = Comp.WorkPoints.Item("Test Point")
>
> Thanks,
>
> Ed
>
>
>
> "Brian Ekins" wrote in message
> news:8F7E53C36154021423E205F8ACDF0330@in.WebX.maYIadrTaRb...
> > There's a sample called "Work Point at Mass Center" that's part of the
API
> > help. I think it demonstrates everything you asked about except the
> > visibility part.
> > --
> > Brian Ekins
> > Autodesk Inventor API Product Designer
> >
> >
> > "Ed Thompson" wrote in message
> > news:608ED00C34961C29C49843F7AD93DC39@in.WebX.maYIadrTaRb...
> > > I would like to add a workpoint to a part (manually) for other
> programming
> > > purposes. Does anyone have any examples of: 1) Programatically
naming
> a
> > > workpoint. 2) Finding the named work point programatically. 3)
Making
> > the
> > > named workpoint visible (which I think is something like
> > "workpoint.visible=
> > > true", but I can't find any examples of how to address the desired
> > > workpoint).
> > >
> > > Thanks,
> > >
> > > Ed
> > >
> > >
> >
> >
>
>