| | |
 | Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
|
Autor
|
Thema: Objektdaten transferieren (931 mal gelesen)
|
liza030
Mitglied
Student
   Beiträge: 7
Registriert: 12.12.2006
|
erstellt am: 02. Jan. 2007 19:12  <-- editieren / zitieren -->   Unities abgeben:          
Hallo zusammen! Ich wünsche erst einmal allen Usern ein gesundes neues Jahr! Gibt es unter Map 3D eine Möglichkeit Objektdaten von einer Objektdatentabelle in die andere zu transferieren? Ich möchte meine Werte, welche ich in einer Netztopologie in einer Fahrtzeitentabelle zu liegen habe, in die jeweiligen Datenfelder des Widerstandes und des Umkehrwiderstandes transferieren. Danke!
Gruß
Renè
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CAD-Huebner
Ehrenmitglied V.I.P. h.c.
Verm.- Ing., ATC-Trainer
Beiträge: 9732
Registriert: 01.12.2003 AutoCAD 2021, Civil 3D, MAP 3D, MDT, RD, Infraworks
Inventor 2021, Win10Pro
|
erstellt am: 02. Jan. 2007 22:34 <-- editieren / zitieren --> Unities abgeben: Nur für liza030 
Quick & Dirty Code:
(DEFUN C:TIME2RES ( / AW CNT ENAME VALUE)
(Prompt "Time To Resistance - Objektdaten der Zeit als Widerstand der Netzverknüpfung")
(if (setq aw (ssget (list (cons -4 "<OR")(cons 0 "*line")(cons 0 "arc")(cons -4 "OR>"))))
(progn
(setq cnt (sslength aw))
(while (>= (setq cnt (1- cnt)) 0)
(setq ename (ssname aw cnt))
;(ade_odgetfield ename table field recnum)
(if (setq value (ade_odgetfield ename "fahrundumsteigen" "time" 0))
(progn
(ade_odsetfield ename "TPMLINK_bvg" "DIRECT_RESISTANCE" 0 value)
(ade_odsetfield ename "TPMLINK_bvg" "REVERSE_RESISTANCE" 0 value)
)
)
)
)
)
)
------------------
Mit freundlichem Gruß Udo Hübner Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
liza030
Mitglied
Student
Beiträge: 7
Registriert: 12.12.2006
|
erstellt am: 02. Jan. 2007 23:22 <-- editieren / zitieren --> Unities abgeben:
|
marc.scherer
Moderator
CAD-Administrator
    
Beiträge: 2490
Registriert: 02.11.2001 Windows 10 64bit
AutoCAD Architecture 2018/2019 (deu/eng)
AEC-Collection 2019 (Revit und Zeugs)
Wenn sich's nicht vermeiden läßt:
D-A-CH Erweiterung (mies implementierter Schrott)
|
erstellt am: 03. Jan. 2007 11:32 <-- editieren / zitieren --> Unities abgeben: Nur für liza030
Zitat:
Original erstellt von CAD-Huebner:
Quick & Dirty...
Hi Udo,
aber das OR Konstrukt kannst Du Dir sparen, es geht auch so: Code:
(ssget (list (cons 0 "*line,arc")))
...------------------
Ciao,
Marc
 Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Foren auf CAD.de (alle Foren)
| 
