Replace Component for Derived Parts

Discussion Groups

Status:

Add an option in parts created from derived components to replace the derived component.

Status:

Curtis' solution works but we already are considering building it in. [US4564 ] Another workaroudn solution is to rename the file you derived FROM and open the derived part. When you get the resolve file dialog pick the one you want to replace the original source with.

Comments

- edited

This is a good suggestion, I do this now with an iLogic rule, but it would be nice to have it built in.

 
Dim oDoc as Document
oDoc = ThisDoc.Document
Dim oRefFile As FileDescriptor
Dim oOrigRefName As Object	

For Each oRefFile In oDoc.file.ReferencedFileDescriptors
'get the full file path to the original internal references
oOrigRefName = oRefFile.FullFileName

	'present a File Selection dialog
	Dim oFileDlg As inventor.FileDialog = Nothing
	InventorVb.Application.CreateFileDialog(oFileDlg)
	oFileDlg.InitialDirectory = oOrigRefName
	oFileDlg.CancelError = True
	On Error Resume Next
	oFileDlg.ShowOpen()
	If Err.Number <> 0 Then
	Return
	ElseIf oFileDlg.FileName <> "" Then
	selectedfile = oFileDlg.FileName
	End if
‘replace the reference
oRefFile.ReplaceReference (selectedfile)      
InventorVb.DocumentUpdate()
oOrigRefName = “”                                         
Next

iLogicVb.UpdateWhenDone = True