All Frameworks  Object Hierarchy  This Framework  Indexes

Fastener (Object)

Interface DELMIAFastener DELMIAFastener represent body in white fasteners of both types point and curve.
For detail information, consult DELMIAPointFastener and DELMIACurveFastener interface files

Property Index

Color
Returns or sets the color of the fastener.
ProcessType
Returns or sets the Process Type as a string.

Method Index

AllPartsLoaded
Gets the loading status of the joining parts of the fastener If all the joining parts are loaded in the V5 session then it returns TRUE If no parts or some parts are loaded in the V5 session then it returns FALSE Return type : 1,0
Example:
Dim AllPartsLoaded AllPartsLoaded = MyFastener.
GetDoubleUserAttribute
Returns the value of user attribute whoes name matches the input
string.
GetIntUserAttribute
GetPart
Returns the product at the specified index from list of parts joined by fastener.
GetParts
Returns the list of parts joined by fastener.
GetProcess
Returns the activity, at the specified index, on which the fastener is assigned
GetStringUserAttribute
Returns the value of user attribute whoes name matches the input
string.
NumberOfAssignedProcesses
Returns Number of processes assigned with the fastener
Example:
Dim Num Num = MyFastener.
NumberOfJoiningParts
Returns the number of parts joined by fastener.
SetDoubleUserAttribute
Set the value of user attribute whoes name matches the input
string.
SetIntUserAttribute
SetStringUserAttribute
Set the value of user attribute whoes name matches the input
string.
SetTextIDVisibility
Sets the Hide/Show status of the text ID of the fastener in the 3D window Valid Param : 1,0
Example:
//to make the fastener id visible in 3D MyFastener.

Properties


o Property Color() As
Returns or sets the color of the fastener.
Example:
This example sets the Color type of the fastener to red 
 redCol  =16711680 'Encoded RGB color within long integer (R=255 G=0 B=0)
 MyFastener.Color = redCol
o Property ProcessType() As (Read Only)
Returns or sets the Process Type as a string.
Example:
This example gets the Process Type of the fastener 
 Dim PrType
 PrType = MyFastener.ProcessType

Methods


o Func AllPartsLoaded() As
Gets the loading status of the joining parts of the fastener If all the joining parts are loaded in the V5 session then it returns TRUE If no parts or some parts are loaded in the V5 session then it returns FALSE Return type : 1,0
Example:
Dim AllPartsLoaded AllPartsLoaded = MyFastener.AllPartsLoaded
o Func GetDoubleUserAttribute( iAttributeLabel) As
Returns the value of user attribute whoes name matches the input
string. Valid for attributes of type double. User attributes are
created from Process Engineer user attributes only.
Parameters:
iAttributeLabel
The label of user attribute of double type
Example:
This example gets value of double user attribute "PLATE SIZE" on Process Engineer fastener 
 DblAttrVal = MyFastener.GetDoubleUserAttribute ("PLATE SIZE")
o Func GetIntUserAttribute( iAttributeLabel) As
o Func GetPart( index) As
Returns the product at the specified index from list of parts joined by fastener.
Parameters:
index
Index should be greater than equal to 1.
Example:
This example gets the part at index 1 
 Dim MyProduct As Product
 Set MyProduct = MyFastener.GetPart(1)
o Sub GetParts( oListOfParts)
Returns the list of parts joined by fastener.
Parameters:
oListOfParts
The list of parts
Example:
This example gets list of parts joined by fastener 
 Dim NumberOfParts
 Dim JoiningParts()
 NumberOfParts = MyFastener.NumberOfJoiningParts
 ReDim JoiningParts(NumParts-1)
 MyFastener.GetParts(JoiningParts)
o Func GetProcess( index) As
Returns the activity, at the specified index, on which the fastener is assigned
Parameters:
index
Index should be greater than equal to 1.
Example:
This example gets the activity at index 1 
 Dim MyActivity As Activity
 Set MyActivity = MyFastener.GetProcess(1)
o Func GetStringUserAttribute( iAttributeLabel) As
Returns the value of user attribute whoes name matches the input
string. Valid for attributes of type string. User attributes are
created from Process Engineer user attributes only.
Parameters:
iAttributeLabel
The label of user attribute of string type
Example:
This example gets value of string user attribute "PLATE NAME" on Process Engineer fastener 
 Dim StrAttrVal As String
 StrAttrVal = MyFastener.GetStringUserAttribute ("PLATE NAME")
o Func NumberOfAssignedProcesses() As
Returns Number of processes assigned with the fastener
Example:
Dim Num Num = MyFastener.NumberOfAssignedProcesses
o Func NumberOfJoiningParts() As
Returns the number of parts joined by fastener.
Parameters:
oNumOfParts
The number of parts
Example:
This example gets number of parts joined by fastener 
 Dim NumberOfParts
 NumberOfParts = MyFastener.NumberOfJoiningParts
o Sub SetDoubleUserAttribute( iAttributeLabel,
iDoubleValue)
Set the value of user attribute whoes name matches the input
string. Valid for attributes of type double. User attributes are
created from Process Engineer user attributes only.
Parameters:
iAttributeLabel
The label of user attribute of double type
Example:
This example gets value of double user attribute "PLATE SIZE" on Process Engineer fastener 
 MyFastener.GetDoubleUserAttribute ("PLATE SIZE",DblAttrVal)
o Sub SetIntUserAttribute( iAttributeLabel,
iIntValue)
o Sub SetStringUserAttribute( iAttributeLabel,
iStringValue)
Set the value of user attribute whoes name matches the input
string. Valid for attributes of type string. User attributes are
created from Process Engineer user attributes only.
Parameters:
iAttributeLabel
The label of user attribute of string type
Example:
This example gets value of string user attribute "PLATE NAME" on Process Engineer fastener 
 Dim StrAttrVal As String
 StrAttrVal = "Name"
 MyFastener.SetStringUserAttribute ("PLATE NAME",StrAttrVal)
o Sub SetTextIDVisibility( iStatus)
Sets the Hide/Show status of the text ID of the fastener in the 3D window Valid Param : 1,0
Example:
//to make the fastener id visible in 3D MyFastener.SetIDVisibility(1) //to make the fastener id hidden in 3D MyFastener.SetIDVisibility(0)

Copyright © 2003, Dassault Systèmes. All rights reserved.