I'm trying to create an interlocking but I haven't found an example in the online help.
I've found only the creation code:
VBA Code:
Dim zInterlockings As Interlockings 'Object from type Interlockings
Dim zInterlocking As Interlocking 'Child object from type Interlockings
'Fill the objects
Set zInterlockings = MyWorkspace.ActiveDocument.Interlockings
'Creates an interlocking called "Interlocking" with an assignment
Set zInterlocking = zInterlockings.Create("Interlocking", False)
I've found this code for adding a variable but the variable is empty:
VBA Code:
'Create a "variable" at the command interlocking
zInterlocking.CreateDynProperty ("Variables")
'Allocate the first variable of the project variables list
zInterlocking.DynProperties("Variables[0].Name") = varName & ".Automatic"
and I don't know how to set a conditiion where my variable value is equal to 0.
Have you a complete example for interlocking creation?
Thanks
This is a migrated post! Originally posted on 06.07.2012 by user davide.galigani. Please be aware that information can be outdated.