• Industries
  • Products
  • Buy
  • Services & Support
  • Communities
  • Autodesk Robot Structural Analysis

    Reply
    Contributor
    samuel.pereira
    Posts: 22
    Registered: ‎01-02-2012

    API Bracket definition

    76 Views, 2 Replies
    06-22-2012 03:01 AM

    Hello,

     

    I'm trying to create a bracket and assign to a bar using Robot steel API.

    It’s possible provide a complete example to "Visual Basic -Microsoft Excel" for a “Bar” type?

     

    Thanks

    Please use plain text.
    Product Support
    Posts: 2,500
    Registered: ‎04-26-2010

    Re: Bracket definition

    06-22-2012 05:11 AM in reply to: samuel.pereira

    Example

     

    Dim RobApp As RobotApplication
    Set RobApp = New RobotApplication
    
    
        Dim RBracket As RobotLabel
        Dim BracketData As RobotBarEndBracketData
        
        Set RBracket = RobApp.Project.Structure.Labels.Create(I_LT_BAREND_BRACKET, "Bracket")
        Set BracketData = RBracket.Data
        BracketData.Type = I_BEBT_PLATES
        BracketData.SetValue I_BEBDV_HEIGHT, 0.4, 0
        BracketData.SetValue I_BEBDV_LENGTH, 0.6, 0
        BracketData.SetValue I_BEBDV_THICKNESS_1, 0.01, 0
        BracketData.SetValue I_BEBDV_THICKNESS_2, 0.02, 0
        BracketData.SetValue I_BEBDV_WIDTH, 0.3, 0
        
        RobApp.Project.Structure.Labels.Store RBracket
        
        bar_number = 1
        
        Dim RBar As RobotBar
        Set RBar = RobApp.Project.Structure.Bars.Get(bar_number)
        
        Dim BarE As RobotBarEnd
        
        Set BarE = RBar.Start
        BarE.SetLabel I_LT_BAREND_BRACKET, "Bracket"
        
        Set BarE = RBar.End
        BarE.SetLabel I_LT_BAREND_BRACKET, "Bracket"

     



    Rafal Gaweda
    Product Support
    Autodesk, Inc.
    Please use plain text.
    Contributor
    samuel.pereira
    Posts: 22
    Registered: ‎01-02-2012

    Re: Bracket definition

    06-22-2012 07:25 AM in reply to: RG_Adsk

    Thank you!

    Please use plain text.