Temas
Tema |
Detalle |
public Object |
''Agregue y elimine elementos en un paquete.
Sub ElementLifecycle
Dim package as Object Dim element as Object
package = m_Repository.GetPackageByID(2) element = package.elements.AddNew("Login to Website","UseCase") element.Stereotype = "testcase" element.Update package.elements.Refresh()
Dim idx as integer
''note las llamadas repetidas a "package.elements.GetAt" ''en general, debería hacer ésta llamada una vez y asignar a una ''variable - en el ejemplo abajo, Enterprise Architect carga el ''elemento requerido cada vez que se hace una llamada - en lugar de cargarlo una vez ''y mantener la referencia local.
For idx = 0 to package.elements.count-1 Console.WriteLine(package.elements.GetAt(idx).Name) If (package.elements.GetAt(idx).Name = "Login to Website" and _ package.elements.GetAt(idx).Type = "UseCase") Then package.elements.deleteat(idx, false) End If Next End Sub
|