Hallo zusammen,
ich habe folgendes Problem:
Zur Erstellung eigener Libraryteile habe ich ein ein kleines LISP gezimmert, das einem 3D-Teil das Libraryattribut zuweist. Das Ganze funktioniert auch. Die Teile werden als Bibliotheksteil mit dem zu vergebenen Library-Namen und der Library-ID in der Datenbank gespeichert.
Lade ich diese Teile nun jedoch aus dem ModelManager ins Modeling, haben sie den Namen "T01" usw.
Wie muss ich denn mein LISP anpassen, damit die Teile, wenn sie geladen werden, den richtigen Namen wie im ModelManager haben? (z.B. "Bspschraube_ISO1234-xy-z")
Ich kann eigentlich gar kein LISP, sondern habe das Ganze mit der trial-and-error-Methode erstellt und mich an anderen LISPs und dem Integrationskit orientiert (SD-SET-LIBRARY-ATTR ).
Hier noch mein Code:
Zitat:
(in-package :custom)
(use-package :OLI);;--------------------------------------------------------------------------
(
sd-defdialog 'LibAttr
:Dialog-title '(sd-multi-lang-string "set lib_attr" :german "Lib_Attr vergeben")
:variables
'(
(teil :value-type 
art
:multiple-items nil
:title (sd-multi-lang-string "Part" :german "Teil"))
(LibID :value-type :string
:title (sd-multi-lang-string "Lib ID" :german "Lib ID")
:initial-value "XYZ"
roposals ("XYZ"))
(LibName :value-type :string
:title (sd-multi-lang-string "Lib name" :german "Lib Name"))
) ;;variables
:local-functions
'((set_lib_attr ()
(setq path (sd-inq-obj-pathname teil))
(sd-set-library-attr (sd-pathname-to-obj path) LibID LibName))) ;;local functions
k-action '(set_lib_attr)
)
Gruß David
PS: Beim Erstellen habe ich ausgewählt, dass keine Smilies angezeigt werden sollen. Geschieht aber trotzdem. Ich hoffe der Code ist dennoch lesbar 
[Diese Nachricht wurde von cncpt01 am 31. Mai. 2013 editiert.]
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP
Foren auf CAD.de (alle Foren)
| 
Der Papst empfiehlt: 
