|
Lisp : .vlx und .fas in AutoCAD OEM
Andreas Kraus am 29.01.2008 um 16:07 Uhr (0)
Hallo Mario,was ist das denn genau für eine Version die du da hast ?Ist das vielleicht ACAD-LT ?Dann gehts nämlich nicht. Außer du besorgst dir den Extender der müsste die .fas laden können (ich habs noch nicht probiert)GrußAndreas
|
| In das Form Lisp wechseln |
|
Lisp : mit ODBX schreibgeschützte öffnen
Andreas Kraus am 11.02.2008 um 12:03 Uhr (0)
Hallo zusammen,ich möchte mit ODBX aus Dateien etwas auslesen egal ob gerade irgend jemand eine dieser Dateien bearbeitet. Geht das oder muß die Datei geschlossen sein ? Wenns nicht geht müßte ich mir eine Kopie erstellen die ich dann wieder lösche, ist mir aber lieber wenns ohne geht.DankeGruß Andreas
|
| In das Form Lisp wechseln |
|
Lisp : Excel-Datei als Object
Andreas Kraus am 12.02.2008 um 08:57 Uhr (0)
DAAAAANKE !!!!!Das Workbooks-Objekt isses.Ich hab nach der Open-Methode gesucht und da ist sie.Und schon funktioniert alles.Us4UDankeGrußAndreas
|
| In das Form Lisp wechseln |
|
Lisp : Excel-Datei als Object
Andreas Kraus am 12.02.2008 um 09:33 Uhr (0)
Hab doch noch was gefunden.Meine Konstruktion sieht jett so aus:(setq excel (vlax-get-or-create-object "excel.application"))(setq workbooks (vlax-get-property excel "Workbooks"))(vlax-invoke-method workbooks OPEN pfad)(setq ExcelWorkbook (if excel (vlax-get-property excel "ActiveWorkbook" ) ) ExcelSheet (if ExcelWorkbook (vlax-get-property ExcelWorkbook "ACTIVESHEET" ) ) ExcelCells (if ExcelSheet (vlax-get-property ExcelSheet "CELLS" ) ));;; Ab hier wird i ...
|
| In das Form Lisp wechseln |
|
Lisp : Excel-Datei als Object
Andreas Kraus am 12.02.2008 um 12:53 Uhr (0)
Aha,muß ich doch mal schauen wo ich da nicht aufgeräumt hab.DankeGrußAndreas
|
| In das Form Lisp wechseln |
|
Lisp : Excel-Datei als Object
Andreas Kraus am 11.02.2008 um 14:26 Uhr (0)
Hallo zusammen,ich möchte Daten aus Lisp direkt in eine Excel-Datei schreiben.Geht ja auch wenn die Datei in Excel geöffnet ist mit:(setq excel (vlax-get-object "excel.application"))usw...Ich kann mir die Datei auch automatisch öffnen lassen wenn sie nicht offen ist. Hab ich hier was gefunden:http://ww3.cad.de/foren/ubb/Forum145/HTML/002049.shtml#000003Hab ich mir gedacht, warum denn Excel starten ? Könnte doch auch so gehn:(setq excel (vlax-get-or-create-object "excel.application"))Aber wie öffne ich da j ...
|
| In das Form Lisp wechseln |
|
Lisp : Hilfe beim Rauschschreiben !!!
Andreas Kraus am 04.08.2008 um 15:26 Uhr (0)
Aha, verstanden.probier mal folgendes Programm. Ich hoffe du kommst mit "mapcar" und "vl-remove-if-not" klar. An der Stelle wo "(entget (car (entsel)))" steht kannst du auch direkt die Elementdaten der Polylinie einsetzen.Un da wo "(strcat "Test" " " (rtos (nth 1 p)) " " (rtos (nth 1 p)))" steht wird die Zeichenkette zusammengebaut.Wenn du fragen hast, frag.GrußAndreas(defun c:xxx () (setq datei (open (getfiled "Liste speichern" (getvar "dwgprefix") "txt" 3) "w")) (foreach zeile (mapcar (la ...
|
| In das Form Lisp wechseln |
|
Lisp : Hilfe beim Rauschschreiben !!!
Andreas Kraus am 05.08.2008 um 11:30 Uhr (0)
Jetzt lob mich mal nicht zuviel, ich heb ja noch ab kurze Codeerklärung:Ich hole mir die Liste der Elementdaten eines angeklickten Objekts.Da ist aber noch keine Prüfung dabei ob das eine Polylinie ist(entget (car (entsel)))Die Liste speichere ich NICHT in einer Variablen, sondern verarbeite sie gleich weiter.Ich brauch ja nur die Stützpunkte, also alles was den Gruppencode 10 hat.vl-remove-if-not kann bestimmte Elemente aus einer Liste entfernen, man braucht nur zu sagen welche. Also entferne ich "alle E ...
|
| In das Form Lisp wechseln |
|
Lisp : regular expressions in autocad 2007+ ??
Andreas Kraus am 03.11.2008 um 08:19 Uhr (0)
oder das:http://ww3.cad.de/foren/ubb/Forum145/HTML/002546.shtml#000000GrußAndreas
|
| In das Form Lisp wechseln |
|
Lisp : In DCL-Datei Symbole schreiben
Andreas Kraus am 27.01.2009 um 14:52 Uhr (0)
Oder du verwendest:: button { key = "hoch"; label = "/"; } : button { key = "runter"; label = "/"; }Sieht aus wie im angehängten BildNix für Designer, aber besser als nix .GrußAndreas
|
| In das Form Lisp wechseln |
|
Lisp : Zugriff auf EEDs per VLISP
Andreas Kraus am 25.02.2009 um 09:51 Uhr (0)
Hallo zusammen,ich möchte per VLISP auf Erweiterte Elementdaten von einem Insert zugreifen.Mit vlax-dump-object hab ich mir das mal angeschaut:; IAcadBlockReference: AutoCAD Block Reference-Schnittstelle (Blockreferenz); Eigenschaftswerte:; Application (RO) = #VLA-OBJECT IAcadApplication 00d077b4; Document (RO) = #VLA-OBJECT IAcadDocument 098fbe08; EffectiveName (RO) = "2A002022"; Handle (RO) = "1FD11"; HasAttributes (RO) = -1; HasExtensionDictionary (RO) = 0; Hyperlinks (RO) = #VLA-OBJECT IAcadHype ...
|
| In das Form Lisp wechseln |
|
Lisp : Layerkonverter
Andreas Kraus am 07.04.2009 um 12:44 Uhr (0)
Layername, Farbe und Linientyp (bis jetzt)Die Funktion k_dbx_txt_layer_treeliest alle Layer ab einem Startverzeichnis aus allen DWGs und schreibt die in eine Textdatei in dieses Startverzeichniss.Die Daten in dieser Datei kann man dann ändern ich möcht aber noch einen schönen Dialog dazu basteln.Die Funktion k_dbx_konv_layer_treekann dann, auch wieder ab einem Startverzeichnis, alle DWGs bearbeiten.Das alles über ODBX und wie gesagt noch Baustelle.Ja - Dokumentation kommt auch noch. Ich dachte nur ich stel ...
|
| In das Form Lisp wechseln |
|
Lisp : Pfad von Pixelbildern
Andreas Kraus am 19.06.2009 um 12:27 Uhr (0)
Hallo zusammen !Wenn ich mit (dictsearch (namedobjdict) "acad_image_dict")auf das Dictionary für die Pixelbilder zugreife und mir dann die Daten anschaue hab ich z.B sowas:((-1 . Objektname: 7efb70c0 ) (0 . "IMAGEDEF") (5 . "118") (102 . "{ACAD_REACTORS") (330 . Objektname: 7efb70b0 ) (330 . Objektname: 7efb70c8 ) (102 . "}") (330 . Objektname: 7efb70b0 ) (100 . "AcDbRasterImageDef") (90 . 0) (1 . "D:Dokumente und EinstellungenKrausEigene DateienEigene BilderMeldung1.JPG" ) (10 509.0 237.0 0.0) (11 0.264 ...
|
| In das Form Lisp wechseln |
