Browse By Tags

  • Rotating and Moving Elements with VBA

    I've posted some articles about using matrices and transforms with MicroStation VBA to rotate or move (translate) a DGN element. The articles explain the purpose and use of Matrix3d and Transform3d , and how to apply them to an element.
  • RE: How to get rotation around axis?

    Unknown said: I have got the following details: slope angle angle of the slant edge width of the roof width, length, height of the beam When dealing with 3D geometry, work with vectors, transformations and matrices. MicroStation VBA…
  • Transform a point3d

    Hello, I try unsuccessfully (poor English) in vba help to find a function to apply a transformation3d to a point3d. I use a line to calculate the point : dim Trns as Transform3D dim Mypoint as point3d dim MyNewPt as Point3d Trns = Transform3dMatrix3dAndFixedPoint3d…
  • Re: move/copy line parallely in vba

    Find the direction of the line — the vector from start point to end point Calculate the perpendicular of the direction — rotate the vector by π/2 Create a transformation matrix ( Transform3d ) Apply the perpendicular rotation to the transformation…
  • Re: Applying a 3D rotation to a cell

    Something like … Dim origin As Point3d origin = oElement.Origin Dim offset As Point3d offset = Point3dSubtract (Point3dZero, origin) oElement.Move offset ... do rotation oElement.Move origin oElement.Rewrite You haven't told us how you…
  • Re: Reference File to Master Transform

    mrmojo: The user will go into the ref file, snap to the coordinates that surround a text string and write them down. Aren't those coordinates in master file units? mrmojo: The ref is rotated, scaled and moved therefore I have…
  • Re: modify reference elements one by one

    cenber said: td.Y = a0 + a1 * onc.Y + b1 * onc.X td.X = b0 + b2 * onc.Y + a2 * onc.X It looks like you're attempting to transform elements. Why write your own transforms when MicroStation VBA provides an extensive API for object manipulation in 3D…