Hallo,
ich versuche jetzt mal nach dem Ausschlussprinzip vorzugehen... Vielleicht hat sich das Thema ja gleich erledigt.
die vorgelagerten Funktionen passen...
in "myss" sind meine ausgelesenen Refs und Blocks
gnbi ist eine interne recursive Funktion Da meine Refs Blöcke enthalten, die ich auch auslesen möcht...
Code:
(if (> mysslength 0)
(if (member (ucase (getstring "\nSoll ein Objekt eingelesen werden ja/nein?")) '("j" "ja" "J" "JA"))
(progn
(setq objnr (- (getint "\nWelches Objekt (Obj-Nr.) soll ausgelesen werden:") 1))
(setq readobj (ssname myss objnr))
(if readobj
(progn
(princ (strcat "\nObjekt mit dem Namen '" (cdr (assoc 2 (entget readobj))) "' wurde gewählt...\n"))
(command "_.refedit")
)
(princ "Falsche Nummer eingegeben...")
)
(progn
(princ "\nObjekt newss: ")
(princ readobj)
(gnbi newss "")
)
)
)
)
An sich funktioniert alles, nur
Es steht im grauen Befehlszeilenbereich:
"Referenz wählen:"
und in der aktuellen Befehlszeile:
"Welcher Typ soll gesucht werden?:"
was aus der Funktion "gnbi" kommt als Abfrage was für ein Objekttyp gesucht werden soll.
Es kommen keine Fehlermeldung...
Das heißt er bleibt bei dem befehle:
Code:
(command "_.refedit")
nicht stehen... ???
wenn ich
Code:
(command "_.refedit" readobj)
aufrufe kommt nacheinander in Der Befehlszeile
"Referenz nicht gefunden.
Referenz wählen:
Objekt newss: <Objektname: 20e3612ef60>
Welcher Typ soll gesucht werden?:"
und als wobei "<Objektname: 20e3612ef60>" die Referenz ist...
So nun seid Ihr dran
(hab das ganze Wochenende probiert)
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP