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