|
Lisp : Aus Datei mit Daten (List.dat) List erstellen
CADmium am 06.12.2009 um 14:42 Uhr (0)
(SETQ TEST (OPEN "LIST.dat" "r"))(SETQ TESTLesen (list (READ-LINE TEST)))(CLOSE TEST)(setq LISTE(read(strcat "(" TESTLesen ")"))so ??------------------ - Thomas - "Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."
|
| In das Form Lisp wechseln |
|
Lisp : Aus Datei mit Daten (List.dat) List erstellen
Nano am 06.12.2009 um 15:01 Uhr (0)
Danke ThomasGenau das ohne (list nur (read-line ........habe noch angeschaut mit substr aber so ist es einfacher.(SETQ TEST (OPEN "C:/Programme/ProHLK/Pro Heizung/Daten Runtal/LIST.dat" "r"))(SETQ TESTLesen (READ-LINE TEST))(CLOSE TEST)(setq LISTE (read( strcat "(" TESTLesen ")")))Gruss Nano
|
| In das Form Lisp wechseln |
|
Lisp : Aktives Farbbuch+Farbe bei TrueColor
HPW am 14.12.2009 um 12:35 Uhr (0)
Hallo,Wenn ich mit Farbe in Autocad 2006 eine TrueColor aus den Farbbüchern einstelle enthält die Systemvariable CECOLOR aber nur den entsprechenden RGB-Wert.Wie kann ich denn nun das aktive Farbbuch und die gewählte Farbe in Lisp herausfinden?Grüsse,------------------Hans-Peter
|
| In das Form Lisp wechseln |
|
Lisp : Aktives Farbbuch+Farbe bei TrueColor
Bernd10 am 15.12.2009 um 08:50 Uhr (0)
Hallo Hans-Peter, Zitat:Original erstellt von HPW:Wenn ich mit Farbe in Autocad 2006 eine TrueColor aus den Farbbüchern einstelle enthält die Systemvariable CECOLOR aber nur den entsprechenden RGB-Wert.Wie kann ich denn nun das aktive Farbbuch und die gewählte Farbe in Lisp herausfinden?ein Ansatz für Dich könnte die beiliegende Fuktion sein. Diese ermittelt die Farbinformation eines Layers. Da ich aber viele geschachtelte Funktionen habe, wird sie nicht durchlaufen, könnte aber zum Verständnis für Dich be ...
|
| In das Form Lisp wechseln |
|
Lisp : Herausfinden ob 32bit oder 64bit Plattform
marc.scherer am 06.10.2009 um 09:05 Uhr (0)
Hallo die Damen und Herren,ich hab mir die neue Version von Doslib heruntergeladen und festgestellt, das neben den AutoCAD-Versionsabhängigen arxen jetzt auch 64bit Versionen notwendig sind (logisch).Ich will mein Programm doslib-loader nun natürlich auch dahingehend aufbohren, das er automatisch erkennt wann die 64bit Version geladen werden muß. Irgendwelche Ideen wie ich mit Lisp herausfinden kann ob das Acad bzw. die Plattform auf der das Acad läuft eine 32bit oder 64bit Version ist?Was ich im Netz bish ...
|
| In das Form Lisp wechseln |
|
Lisp : Herausfinden ob 32bit oder 64bit Plattform
wronzky am 06.10.2009 um 09:51 Uhr (0)
HIER wurde das auch schon mal diskutiert. Ich finde den Code am Besten:Code:(defun acad64bit-p () (vl-load-com) ( (strlen (vl-prin1-to-string (vlax-get-acad-object) ) ) 40 ))...wenn es Dir darum geht, in welcher Version AUTOCAD läuft.Grüsse, Henning------------------Henning JesseVoxelManufakturComputer-Dienstleistungen für Architekten und Ingenieure http://www.voxelman.de
|
| In das Form Lisp wechseln |
|
Lisp : Herausfinden ob 32bit oder 64bit Plattform
alterHausmeister am 06.10.2009 um 11:18 Uhr (0)
Tut mir Leid, daß ihr beiden es mit einem Blindfisch zutun habt.... erst mal Cadmium ...Regeneriert Modell.AutoCAD Express Tools Copyright © 2002-2004 Autodesk, Inc.AutoCAD Menü-Dienstprogramme geladen.Befehl: BEFEHLSZEILEBefehl: propertiesBefehl: (load"c:/temp/cadmium.lsp")ACAD64BITBefehl: (acad64bit?); Fehler: no function definition: ACAD64BIT?Befehl:... dann Wronzky ...Regeneriert Modell.AutoCAD Express Tools Copyright © 2002-2004 Autodesk, Inc.AutoCAD Menü-Dienstprogramme geladen.Befehl: BEFEHLSZEILEBe ...
|
| In das Form Lisp wechseln |
|
Lisp : Herausfinden ob 32bit oder 64bit Plattform
CAD-Huebner am 06.10.2009 um 11:44 Uhr (0)
Unter AutoCAD 2010 64 Bit mit Vista 64 auf Intel Core 2 DUO E8400 ergibt dieser CodeCode:(vl-load-com)(defun OS64bit1-p () (vl-string-search "x64" (print (getvar "platform"))))(defun OS64bit2-p () (vl-string-search "x64" (print (getenv "PROCESSOR_ARCHITECTURE"))))(defun ACAD64BIT?(/ UTILITY) (vl-load-com) (and(=(atof(getvar "ACADVER"))17.1) (setq UTILITY (vlax-get-property (vla-get-activedocument(vlax-get-acad-object)) "Utility" ) ) (vlax-method-applicable-p UTI ...
|
| In das Form Lisp wechseln |
|
Lisp : Herausfinden ob 32bit oder 64bit Plattform
alterHausmeister am 06.10.2009 um 11:46 Uhr (0)
... eigentlich nicht ...Hier noch einmal das volle Programm (Neustart ACAD):Regeneriert Modell.AutoCAD Express Tools Copyright © 2002-2004 Autodesk, Inc.AutoCAD Menü-Dienstprogramme geladen.Befehl: BEFEHLSZEILEBefehl: propertiesBefehl: (vl-load-com)Befehl: (load"c:/temp/cadmium.lsp")ACAD64BITBefehl: (acad64bit?); Fehler: no function definition: ACAD64BIT?Befehl: (acad64bit); Fehler: Zu wenig ArgumenteBefehl: (vl-prin1-to-string(vlax-get-acad-object))"#VLA-OBJECT IAcadApplication 00000000012358d0"Befehl:*wi ...
|
| In das Form Lisp wechseln |
|
Lisp : Herausfinden ob 32bit oder 64bit Plattform
CADmium am 06.10.2009 um 12:22 Uhr (0)
Zitat:Original erstellt von CAD-Huebner:Code:Befehl: 64BITTEST"Microsoft Windows NT Version 6.0 (x64)"34"AMD64"nilnilT TBefehl:Auf AutoCAD Civil 3D 2010 (32 bit !) unter Vista 64Code:"Microsoft Windows NT Version 6.0 (x86)"nil"x86"nilnilnil nilna damit kann man doch sicher was anfangen .. thx 2all------------------ - Thomas -"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."
|
| In das Form Lisp wechseln |
|
Lisp : Herausfinden ob 32bit oder 64bit Plattform
alfred neswadba am 15.12.2009 um 21:11 Uhr (0)
Hi,Auf AutoCAD Civil 3D 2010 (32 bit !) unter Win7x64 bringt 64bitTest"Microsoft Windows NT Version 6.1 (x86)"nil"AMD64"nilnilnil nilHoffentlich frustiere ich jetzt damit niemanden - alfred -------------------www.hollaus.at
|
| In das Form Lisp wechseln |
|
Lisp : Schraffurdaten
Andreas Kraus am 21.12.2009 um 17:01 Uhr (0)
Ja, das weis ich auch.Ich greife aber über Object-DBX auf die DWG zu und hab nicht solche Daten:((-1 . Objektname: 7e563420 ) (0 . "HATCH") (330 . Objektname: 7e561cf8 ) (5 . "1FC") (100 . "AcDbEntity") (67 . 0) (410 . "Model") (8 . "0") (100 . "AcDbHatch") (10 0.0 0.0 0.0) (210 0.0 0.0 1.0) (2 . "ANSI31") (70 . 0) (71 . 1) (91 . 1) (92 . 7) (72 . 0) (73 . 1) (93 . 4) (10 3073.76 1844.76 0.0) (10 1142.08 1844.76 0.0) (10 1142.08 556.191 0.0) (10 3073.76 556.191 0.0) (97 . 1) (330 . Objektname: 7e5633a8 ) ( ...
|
| In das Form Lisp wechseln |
|
Lisp : Civil3D Cogo-Punkte mit benutzerdefinierten Attributen
CAD-Huebner am 17.05.2016 um 18:12 Uhr (1)
ACHTUNG! Sie antworten auf einen Beitrag der älter als 1 Jahr ist!Ja, aber da ich gerade wieder mal damit zu tun hatte - prinzipiell funktioniert obiger Code, ABERdazu muss die Punktgruppe, in der der Punkt gerade dargestellt wird, zu der jeweiligen Klasse der ben. definierten Eigenschaften zugeordnet sein.https://knowledge.autodesk.com/support/autocad-civil-3d/learn-explore/caas/CloudHelp/cloudhelp/2016/ENU/Civil3D-UserGuide/files/GUID-6C6CA8DE-4880-4AE8-8AAC-8ADB79D7700F-htm.htmlLeider wird der lange Pfa ...
|
| In das Form Lisp wechseln |
