|
AutoLisp : Dialogfenster an Cursor
Helmut Schepers am 12.04.2005 um 14:36 Uhr (0)
Hallo Martin, hier mal ein Beispiel wie man sich die Position der DCL-Box merken kann um sie nach dem verschieben auf dem Bildschirm wieder an der selben Stelle zu öffnen. ******************************************************************************** als test.lsp speichern (defun c:merk-dcl-pos ( / OK OPEN_DCL) (setq open_dcl (load_dialog c:/lisp/test.dcl )) ;; Pfad anpassen (if merk_po (if (not (new_dialog schiebe open_dcl merk_po))(exit));; merk_po durch liste mit Koordinaten ersetzen. (if (not ...
|
In das Form AutoLisp wechseln |
|
Rund um AutoCAD : Zeichnungszeit zurücksetzen?
Helmut Schepers am 04.01.2008 um 21:22 Uhr (0)
Hallo,hab zwar kein Acad2008, aber in früheren Versionen gab es die Express-Toolsdarin gibt es einen Befehl edittime, schau mal bei www.cadwiesel.de da bekommst die die, weiss aber jetzt nicht ob sie unter Acad2008 laufen.an sonsten einfach in lisp die uhrzeit abfragen zu beginn und ende und dann die zeit berechnen lassen.ich hoffe einmal es hilft dir weiterGrüßeHelmut------------------mfgHelmut Schepers
|
In das Form Rund um AutoCAD wechseln |
|
AutoLisp : Enity Eintäge auslesen?
Helmut Schepers am 03.09.2002 um 10:06 Uhr (0)
Hallo Dirk, im Anhang findest du ein kleines Lisp-Programm, das alle Stützpunkte einer Polylinie in eine Liste schreib. MfG Helmut
|
In das Form AutoLisp wechseln |
|
AutoLisp : Elemente am Fadenkreuz (hängend) einfügen
Helmut Schepers am 15.10.2002 um 07:48 Uhr (0)
Hallo, hier mal ein kleines Beispiel in Lisp, wie so etwas machen könnte. Ich hoffe es hilft die weiter. Gruß Helmut (defun c:merk( / ab aw) ;letztes Element merken (setq ab (entlast)) ;neue Elemente zeichnen (command "kreis" (list 50 50) 50) (command "kreis" (list 50 50) 25) (command "rechteck" (list 0 0) (list 100 100)) ;wenn schon Elemente in der Zeichnung vorhanden sind, ;dann auf erstes neues Element (if ab(setq ab (entnext ab))) ;Auswahlsatz erzeugen (setq aw(ssadd)) ;wenn s ...
|
In das Form AutoLisp wechseln |
|
AutoLisp : Mehrfachplot über LISP-Programm
Helmut Schepers am 21.10.2003 um 20:51 Uhr (0)
Hallo Werner wenn es eine reine Lisp-Lösung sein soll, solltest du dich einmal näher mit den VLA-Funktionen beschäftigen. Hier ein kleines Beispiel, wie man die Anzahl der Seiten einstellt. Ob dieser Aufruf mit (command _.plot ...) funktioniert habe ich nicht ausprobiert, da ich bei mir, wenn automatisch gedruckt werden soll, die gesamte Druckerausgabe über die VLA-Funktionen steuer. (vla-put-numberofcopies (vla-get-plot (vla-get-ActiveDocument (vlax-get-acad-object))) HIER_DIE_SEITENANZAHL_EINGEBEN ) v ...
|
In das Form AutoLisp wechseln |
|
AutoLisp : Mehrfachplot über LISP-Programm
Helmut Schepers am 27.10.2003 um 22:01 Uhr (0)
Hallo Werner, hier einmal ein etwas größeres Beispiel, wie man einen Drucker mit VLisp ansteuern kann. (defun f:hs_plot (p0 p1 anz sc / al ll ur ) ;p0 -- Punkt links unten ;p1 -- Punkt rechts oben ;anz -- Anzahl der zu druckenden Seiten ;sc -- Plot-Maßstab (vl-load-com) (setq al (vla-item (vla-get-layouts(vla-get-ActiveDocument(vlax-get-acad-object))) Model )) (vla-put-configname al Epson Stylus COLOR 1520 ESC/P 2 ) (vla-put-CanonicalMediaName al A4 ) (vla ...
|
In das Form AutoLisp wechseln |
|
Lisp : Punktkoordinaten auf einem Bogen mit Lisp ermitteln
Helmut Schepers am 08.03.2008 um 22:11 Uhr (0)
Hallo Lispelmannauf meiner HP findest du ein kleines Beispiel, das hilft die vielleicht etwas weiter------------------mfgHelmut SchepersHomepage
|
In das Form Lisp wechseln |