les dictionnaires

[juju]

Quelqu'un sait il créé :

1) des enregistrements dans un dictionnaire.

2) lire le contenu des enregistrements d'un dictionnaire

merci!

thierry.jupiter@cg67.fr

[smellems]

je sais que c'est un vieux message mais si ça peut aider quelqu'un...

 

pour créer un dictionaire:

 

Dim DictionaryObj As AcadDictionary

Set DictionaryObj = ThisDrawing.Dictionaries.Add("ACAD_NouveauDictionnaire")

 

ensuite, moi je sauve des xRecord dans mon dictionnaire...

 

Dim XRecordObj As AcadXRecord

Set XRecordObj = TrackingDictionary.addXRecord("NouveauXRecord")

XRecordObj.SetXRecordData 0, "allo"

 

et pour le lire:

 

Set XRecordObj = TrackingDictionary.GetObject("NouveauXRecord")