---

Hallo,

ich habe eine eigene VLX-Anwendung unter AutoCAD Mechanical 2009 geladen. Darin enthalten ist eine eigene Funktion s::startup, die bei jedem Öffnen einer Zeichnung ausgeführt wird. Dabei kommt man an eine Stelle, wo die Funktion getkword gestartet wird. Hier erscheint statt der gewünschten Textausgabe im Fenster folgender Text:

Autodesk-DWG. Diese Datei ist eine zuverlässige DWG-Datei, die zuletzt von einer Autodesk-Anwendung bzw. einer von Autodesk lizenzierten Anwendung gespeichert wurde.

Hier muss nun der Anwender mit <Return> die Vorgabe von getkword eingeben. Alle Textausgaben der nachfolgenden Funktionen getxxx sind dann wieder in der Befehlszeile ersichtlich.

Was muss ich tun, dass bei der ersten Funktion getkword meine gewünschte Textausgabe mit den Optionen in der Befehlszeile ersichtlich ist?

Danke im Voraus und viele Grüße
Bernd

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Ladereihenfolge beachten .... ?! Evtl. nicht in startup, sondern in der acaddoc.lsp laden und aufrufen.

------------------
  - Thomas -
"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Thomas,

Zitat:

---

Original erstellt von CADmium:
Ladereihenfolge beachten .... ?! Evtl. nicht in startup, sondern in der acaddoc.lsp laden und aufrufen.

---

danke für Deinen Hinweis. Ich werde mal genau prüfen, in welcher Reihenfolge mein Laden passiert und melde mich dann wieder.

Gruß Bernd

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Thomas,

Zitat:

---

Original erstellt von CADmium:
Ladereihenfolge beachten .... ?! Evtl. nicht in startup, sondern in der acaddoc.lsp laden und aufrufen.

---

wie bereits geschrieben hier meine Vorgehensweise:

1.) Datei acaddoc.lsp von AutoCAD Mechanical 2009 am deren Ende um folgenden Eintrag erweitet:
    (princ (load "xyz_laden.lsp" "\nxyz nicht geladen!"))

2.) Hier der Inhalt meiner Datei xyz_laden.lsp:
    ( defun s::startup ( / cffvlx cvlx )

    ; xyz laden
      (setq cvlx "xyz")
      (command "_.commandline")
      (terpri)
      (princ (strcat cvlx " laden..."))
      (vl-bb-set '*cvlxdatei* (strcat cvlx ".vlx"))
      (setq cffvlx (findfile (vl-bb-ref '*cvlxdatei*)))
      (if (= cffvlx nil)
        (setq cffvlx (getfiled "VLX-Anwendung wählen" (vl-bb-ref '*cvlxdatei*) "vlx" 2))
      ) ; if
      (if (/= cffvlx nil)
        (load cffvlx)
      ) ; if
      (c:xyz) ;;; Hier werden wird in Unterfunktionen die besagte Funktion getkword ausgeführt ;;;

    ; Modulende
      (princ)
    )

Muss ich in meiner Datei xyz_laden.lsp s::startup ersetzen (mit was) oder wie bekomme ich den Aufruf an das Ende meiner Ladereihenfolge?

Danke im Voraus und viele Grüße
Bernd

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP