| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für PTC CREO |
| |
| SF DRAWING , eine App
|
Autor
|
Thema: Befehl im Annotation nicht zu ende ausführen (1224 / mal gelesen)
|
Greskamp Mitglied Ingenieur
Beiträge: 523 Registriert: 12.03.2003
|
erstellt am: 07. Mai. 2018 12:24 <-- editieren / zitieren --> Unities abgeben:
Hallo, ich glaube ich hatte dieses Thema schon mal versucht. Ich würde im Annotation gerne den Befehl Text erstellen aufrufen, den TExt auch eingeben, dann aber noch positionieren können. Mit
Code: am_create_text "3-000330~%Linsenschraube~%M6x16~%DIN 7985~%Stahl verzinkt"
geht das ja auch. Aber wie ist das wenn ich in einem def drin bin, dann klappt das irgendwie nicht und leider klappt sd-call-cmds bei Annotation ja nicht. Ich möchte aus einer Textdatei eine Zeile rauslesen und diese dann als Text im Annotation platzieren können. Code: (defun auslesen (file) (sleep 0.5) (with-open-file (str file :direction :input) (do ((line (read-line str nil 'eof) (read-line str nil 'eof))) ((eql line 'eof)) (setq texte (format nil "~A" line)) ) ) am_create_text (format nil "3-000330~%Linsenschraube~%M6x16~%DIN 7985~%Stahl verzinkt") )
Die Variable texte wird noch nicht verwendet, aber nur das ihr das Prinzip versteht. Danke und ------------------ Gruß Peter Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
taino Mitglied CAD Konstrukteur
Beiträge: 93 Registriert: 11.06.2013 PTC Creo Elements/Direct Modeling 20
|
erstellt am: 08. Mai. 2018 09:37 <-- editieren / zitieren --> Unities abgeben: Nur für Greskamp
Hallo den Text aus der Textdatei bekommst du raus? Wenn ja dann einfach an den Mauszeiger hängen mit (Code-Schnipsel) :after-input (progn (sd-execute-annotator-command :cmd (format nil "TEXT '~A' " text-variable)) );;ende progn Gruß tAiNo
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Greskamp Mitglied Ingenieur
Beiträge: 523 Registriert: 12.03.2003
|
erstellt am: 08. Mai. 2018 14:04 <-- editieren / zitieren --> Unities abgeben:
Hallo taiNo, erst mal danke für den Tipp, damit ruft man ja die Draftign Befehle auf, richtig? Den TExt aus der Textdatei bekomme ich raus, aber mit dem Befehl komme ich so im Annotation nicht ganz zurecht, kann den Text dann nciht absetzen. Auch das :after-input habe ich so ja nicht drin. Wenn ich klappen müsste, sollte ich doch den Befehl auch einfach so
Code: (sd-execute-annotator-command :cmd (format nil "TEXT 'Hallo~%Welt!'"))
ausführen können, oder? ------------------ Gruß Peter Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
taino Mitglied CAD Konstrukteur
Beiträge: 93 Registriert: 11.06.2013 PTC Creo Elements/Direct Modeling 20
|
erstellt am: 08. Mai. 2018 14:21 <-- editieren / zitieren --> Unities abgeben: Nur für Greskamp
|
Greskamp Mitglied Ingenieur
Beiträge: 523 Registriert: 12.03.2003
|
erstellt am: 08. Mai. 2018 14:31 <-- editieren / zitieren --> Unities abgeben:
|
der_Wolfgang Moderator Tastenhauer
Beiträge: 2219 Registriert: 3.20. ● PE60+80@home ● W10 Pro Build10.0.19045.4780 ● Drafting V17~V20.7 ● Modeling V17~V20.7 ● Windchill 12.1.2.6 ● UWGM Client 13.0.0.1
|
erstellt am: 20. Mai. 2018 12:49 <-- editieren / zitieren --> Unities abgeben: Nur für Greskamp
Zitat: Original erstellt von Greskamp: leider klappt sd-call-cmds bei Annotation ja nicht.
Sorry. Aber diese Aussage ist einfach falsch! sd-call-cmds ist auch in Annotation unterstuetzt. Man muss es halt hier, wie auch im 3D, richtig aufrufen. Mid sd-call-cmds rufst du eineen Dialog (eine action) auf und diese wird KOMPLETT ausgeführt ohne jegliche interaction. Und SO ist das auch gewollt. Wenn ich deinen Ursprungliche LISP schnipssel ansehe, vermute ich das Du die Textdatei komplett leses willst und als _einen_ Text dann _interactive_ platzieren willst? Den Text mit reinen ME10 Mitteln zu platzieren ist vielleicht nicht ganz so gut (je nach anwendungsfall). Du umgehst dann evlt. ein wenig das "Besitzer" konzept vom Annotation.
------------------ ● Firefox ESR ● Java Forum Stuttgart JUGS ● OSD Hilfeseite (de) / help page (en) ● NotePad++ ● BuFDi ● Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
der_Wolfgang Moderator Tastenhauer
Beiträge: 2219 Registriert: 3.20. ● PE60+80@home ● W10 Pro Build10.0.19045.4780 ● Drafting V17~V20.7 ● Modeling V17~V20.7 ● Windchill 12.1.2.6 ● UWGM Client 13.0.0.1
|
erstellt am: 28. Mai. 2018 23:06 <-- editieren / zitieren --> Unities abgeben: Nur für Greskamp
|