---

Hi.

Folgende Aufgabe ist zu lösen - leider kein befriedigendes Ergebnis im Beitragsarchiv gefunden:
Höhenschichtlinien liegen alle auf z=0. Layername enstspricht der tatsächlichen Höhe. Die Höhenschichten sollen jetzt auf ihre tatsächliche Höhe gehoben werden. Bei 10 Schichtlinien kein Problem, dies manuel zu ändern, aber bei 530 in einer Zeichnung sehr Zeitraubend. Kennt oder hat jemand ein Tool (lisp oder vba) mit dem man dies lösen kann.
Dank im voraus.

------------------
Ciao Günter
--------------------------------------------------------------------------------
"Wir haben keine Probleme, nur Aufgaben zu lösen."

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

---

Zitat:

---

Original erstellt von GWH:
Hi.

Folgende Aufgabe ist zu lösen - leider kein befriedigendes Ergebnis im Beitragsarchiv gefunden:
Höhenschichtlinien liegen alle auf z=0. Layername enstspricht der tatsächlichen Höhe. Die Höhenschichten sollen jetzt auf ihre tatsächliche Höhe gehoben werden. Bei 10 Schichtlinien kein Problem, dies manuel zu ändern, aber bei 530 in einer Zeichnung sehr Zeitraubend. Kennt oder hat jemand ein Tool (lisp oder vba) mit dem man dies lösen kann.
Dank im voraus.

---

z.b. Meinereiner kennt und hat nicht so ein Fertig-Tool. Aber eines nach deinen Spezialwünschen zu schreiben ist IMHO kein Problem, ist bloß auch zeitraubend  ..

------------------
  - 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

---

Hi Günther

kommst du an ArcView ran?

da die dxf importieren und aus den Polylines PolylineZ machen mit z-Wert aus Layername.

wenn dir Cadmium was programmiert (was er ja kann:-) umso besser.

------------------
mit CADzerischen Grüßen
Matthias 

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

---

Hallo,
was fehlt dir denn, um es selbst, z.B. in VBA, zu programmieren?
Alle Objekte selektieren,
für alle Objekte mitdem richtigen Objektnamen
den layernamen feststellen,
elevation entsprechend setzen,
fertig.
MfG
wwwilli

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

---

wwwilly, Günther hat im Autocad gepostet,
nicht im VBA und nicht im Lisp, gehe also mal davon aus,
da ist seinerseits noch keine Berührung vorhanden, weder zum einem noch zum andren ;-)

Gruss, Nancy

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

---

Hallo Günter,

unser Produkt DATAflor CAD V6 enthält das Modul Fremddatenoptimierung, welches genau diese Funktion ausführen kann. Hier kann man u.a. die Objekte über die Auswahl des Layernamens wählen und anschließend die gewünschte Höhe angeben, auf die die Objekte gehoben werden sollen. Dies ist in dem Fall pro Layername durchzuführen.
DATAflor CAD V6 gibt es als 30 Tage vollfunktionsfähige Demo Version. Einfach anfordern.

------------------
Mit freundlichen Grüßen aus Göttingen
Ihr DATAflor Team

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

---

Zitat:

---

Original erstellt von DATAflor:
...Dies ist in dem Fall pro Layername durchzuführen....

---

genau das soll doch nicht gemacht werden oder?
Haupsache Firmenname gepostet ? 

------------------

gruß CADdog, the dog formerly known as TR

AutoCAD spricht mit einem, aber viele hören nicht zu.

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

---

Hallo CADdog,

hatte ich so verstanden, dass die Linien (530) nicht alle einzeln angeklickt werden sollen. Und das ist damit nun mal nicht notwendig.

------------------
Mit freundlichen Grüßen aus Göttingen
Ihr DATAflor Team

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

---

Zitat:

---

Original erstellt von DATAflor:
Hallo CADdog,

hatte ich so verstanden, dass die Linien (530) nicht alle einzeln angeklickt werden sollen. Und das ist damit nun mal nicht notwendig.

---

.. und was spricht dagegen, auch gleich die z-Höhe aus dem Layernamen zu generieren ? .. das sollte doch nun echt kein Problem darstellen.. übrigens hab ich das als "530 Layer" gelesen ...

------------------
  - 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 CAD'ler.

Dank für eure Antworten und Anregungen.

@wwwilli - wären meine Programmierkentnisse ensprechend, wäre dieser Beitrag nicht zustande gekommen.

530...  - sind 530 Layer

------------------
Ciao Günter
--------------------------------------------------------------------------------
"Wir haben keine Probleme, nur Aufgaben zu lösen."

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