Réserver une Démo

SVP notez : Cette page d’aide n’est pas pour la dernière version d’Enterprise Architect. La dernière aide peut être trouvée ici.

Pré. Proc.

Stereotypes

This is some example code for adding and deleting stereotypes.

     Sub TestStereotypes

          Dim o as object

          Dim idx as integer

          ''add a new stereotype to the Stereotypes collection

          o = m_Repository.Stereotypes.AddNew("funky","class")

          If(o.Update=false) Then

               Console.WriteLine (o.GetLastError())

          End if

          o = nothing

          ''make sure you refresh

          m_Repository.Stereotypes.Refresh

          ''then iterate through - deleting our new entry in the process

          For idx = 0 to m_Repository.Stereotypes.Count-1

               Console.Writeline(m_Repository.Stereotypes.GetAt(idx).Name)

               If(m_Repository.Stereotypes.GetAt(idx).Name = "funky") then

                    m_Repository.Stereotypes.DeleteAt(idx,false)

                    Console.WriteLine("Delete element")

               End if

          Next

     End Sub