Toggle visibility of objects inside drawings

[Anonymous]

Hi everyone,

I'm struggling to find a way to toggle the visibility of some objects (images) I have put inside my .IDW.

Do you have an idea to get this with iLogic?

Thank you for you time,

Andrea

[mcgyvr]

ReferencedOLEFileDescriptor.Visible Property

ReferencedOLEFileDescriptor.Visible Property

Parent Object: ReferencedOLEFileDescriptor

Description

Gets/Sets whether the linked/embedded object is visible in the graphics window.

Syntax

ReferencedOLEFileDescriptor.Visible() As Boolean

Property Value

This is a read/write property whose value is a Boolean.

Version

Introduced in version 2011

[Anonymous]

Hi thanks for your reply,

I tried the following lines to toggle the visibility of one of my objects, but it does not work:

Dim oDoc As Document
oDoc = ThisApplication.ActiveDocument
Dim aOLERefs() As ReferencedOLEFileDescriptor
ReDim aOLERefs(oDoc.ReferencedOLEFileDescriptors.Count)

Dim iRefCount As Integer
iRefCount = oDoc.ReferencedOLEFileDescriptors.Count
Dim i As Integer
For i = 1 To iRefCount
    aOLERefs() = oDoc.ReferencedOLEFileDescriptors.Item(i)
Next

For i = 1 To iRefCount
If aOLERefs(i).DisplayName = "ADX" Then
aOLERefs(i).Visible= False
End If 
Next

I got the following error: HRESULT: 0x80004005 (E_FAIL) 

Thanks again,

Andrea