|
Rund um AutoCAD : Texte ersetzen
Brischke am 04.11.2003 um 13:14 Uhr (0)
Hallo Ralle,ein solches Tool habe ich einmal erstellt. Es tauscht die Texte entsprechend einer Vorgabe aus einer Exceltabelle (Spalte A = alter Text, Spalte B = Neuer Text).Momentan funktioniert das nur für Attribute, sollte aber ein leichtes sein, dies auf alle Texte auszuweiten.Ebenfalls für Attribute, habe ich ein eigenes Suchen und Ersetzen geschrieben. Dieses tauscht nur Texte, die einem bestimmten Suchmuster entsprechen, und dann auch nur bestimmte Zeichen (vom Anfang, vom Ende, ab Stelle - bis Stell ...
|
| In das Form Rund um AutoCAD wechseln |
|
AutoLisp : Auswahl aller Objekte auf bestimmten Layern
Brischke am 29.03.2006 um 14:48 Uhr (0)
Hallo Didi,ok, dann wollen wir mal helfen, dass das Lisp-Wissen wächst.Du brauchst also eine Schleife die Beendet wird, wenn kein Objekt mehr gewählt wurde.Das ist dann eindeutig (whileDu brauchst was zur Objektwahl: (entsel ..)Du brauchst was, um den Layer rauszubekommen: (cdr(assoc 8 (entget ..Und du brauchst was, um den String zu basteln, der die Layernamen entält.(setq laySTRING (strcat laySTRING "," LAYERNAME))und im Ganzen müsste das so, oder so ähnlich aussehen:(while (setq obj(entsel "Qobjekt wähle ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Layer umschalten bei der Bemassung
Brischke am 18.10.2003 um 16:29 Uhr (0)
Hallo CAD-Tötti, Zitat:Wie gestallte ich eine Überprüfung, diea) prüft ob der Layer in der zeichnung existiertb) den Layer ggf. nach den Maßgaben aus einer Datei z.B. "Layer.dat" anlegtc) die Layer generell beim Start von AutoCAD aus dieser Datei lädtzu a)(setq LayName "Testlayer")(if (tblobjectname "LAYER" LayName)(princ "
Layer vorhanden")(alert (strcat LayName " fehlt!")))zu b) das kann man verschieden lösen, hängt im wesentlichen vom Dateiaufbau ab.zu c) ich gestalte mir meist eine Menüdatei, und schre ...
|
| In das Form Lisp wechseln |
|
Autocad VBA : Ereignis beim Layer/Bemstil wechsel
Brischke am 18.03.2004 um 12:00 Uhr (0)
@Karsten HST, schau mal dort - http://ww3.cad.de/foren/ubb/Forum54/HTML/006686.shtml @Dressler, sinnvol ist immer, wenn du die Beiträge zum gleichen Thema mit angibst. Dann kann man weiter diskutieren, und klärt nicht wieder die gleichen Fragen. Karsten ist auf die gleiche Lösung wie ich auch gekommen. Diese ist ja aber für dich nicht relevant, da du es ja so möchtest: Wenn dem Bem-Objekt ein anderer Layer oder Bemaßungsstil zugewiesen wird, dann soll die entsprechende Eigenschaft Bemstil oder Layer au ...
|
| In das Form Autocad VBA wechseln |
|
AutoLisp : mal wieder ein reaktor...
Brischke am 26.11.2003 um 14:16 Uhr (0)
Hallo Frank, das sind erweiterte Elementdaten. Gruppencode 3. Mein Ansatz wäre: einen Command-ENDE-Reaktor, der den Rechteckbefehl abfängt und an das zuletzt erstellte Rechteck einen Objektreaktor dranhängt. Zusätzlich dazu werden in dieser Funktion die Texte für Höhe und Breite erstellt. Die Handle dieser neu erstellten Texte wird als XDATA im Rechteck gespeichert. Dann brauchst du nur noch eine Reaktorfunktion, die aufgrund des Rechteck-Objektreaktors anspringt. Diese liest dann die neuen Maße und die Te ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : nummerierung der referenzen
Brischke am 22.10.2003 um 11:40 Uhr (0)
Hallo Steffen, ich habe es mir nun einmal engesehen, machbar ist das, aber auch ein wenig aufwendig. Du willst das also Programmieren, dann solltest du dir die (vlax-curve ..) -Funktionen mal anschauen, damit ist das dann, den ersten Teil betreffend, alles machbar. Das mit der Spline habe ich noch nicht so ganz verstanden. Ich versuche mal zu beschreiben, wie ich das verstanden habe. Du willst eine Spline/3DPolyline zeichnen, die entsprechend der Teilung der Linie (10er-Schritte) Stützpunkte hat. Diese St ...
|
| In das Form AutoLisp wechseln |
|
Rund um Autocad : E-Mail senden per Makro
Brischke am 19.05.2003 um 08:52 Uhr (0)
Hallo Zeli, das kannst du mit einem DOS-Aufruf von Outlook machen. (setq befehl (strcat "c:R14SUPPORToutlook.lnk /c ipm.note." formname " /a " datei)) (command "shell" befehl) formname = Name des outlook-Formulars, diese muss zuvor mit eingetragenen Empfänger angelegt sein. Da kann dann auch schon der Text mit drin stehen. datei, ist die Datei, die an das mail drangehangen wird. Da die Zeichnungsdateien oftmals zu groß sind, habe ich diese vorher dann immer gezippt. (setq befehl (strcat "c:programmewinzipw ...
|
| In das Form Rund um Autocad wechseln |
|
Lisp : Civil3d API progn mit Vlisp C#
Brischke am 16.11.2012 um 11:55 Uhr (0)
imgrunde ist dein Ansatz richtig - du arbeitest dann mit COM-Objekten.COM-Objekte sind recht simpel aufgebaut. Es gibt Eigenschaften und Methoden, und deren Handling musst du die Funktionen beherrschen, der Rest ist Kenntnis des Objektmodells.Eigenschaften:vlax-put-property zum Eigenschaften setzenvlax-get-property zum Eigenschaften lesenMethodenvlax-invoke-method zum Methode ausführenSoweit so gut - jetzt kommt das größere (Verständnis-)Problem. Auch die aus dem Lisp bekannten Objekttypen müssen in COM-ve ...
|
| In das Form Lisp wechseln |
|
Rund um Autocad : 256 Farben sind zu wenig
Brischke am 22.09.2004 um 16:47 Uhr (0)
@CADmium, weil es vor deiner Zeit war eine kurze Erklärung: Zur Zeit des Stiftplotters war es nicht üblich Flächen in einer bestimmten Farbe zu füllen. In aller Regel war das Papier nach einer solchen Aktion ziemlich nass, mitunter auch aufgeweicht und dann vom Stift zerrissen. Zu dieser Zeit habe ich auch nie davon gehört, dass irgendjemand die 256 Farben nicht gereicht hätten .. zumal es nur wenige Leute gab, die Grafikkarten besaßen, die mehr als 256 Farben anzeigen konnten. Nicht dass jetzt alle denken ...
|
| In das Form Rund um Autocad wechseln |
|
AutoLisp : Verzeichnisse mit Unterverzeichnissen lesen
Brischke am 15.04.2003 um 15:50 Uhr (0)
VLisp-Hilfe: Lists all files in a given directory (vl-directory-files [directory pattern directories]) Arguments directory A string naming the directory to collect files for; if nil or absent, vl-directory-files uses the current directory. pattern A string containing a DOS pattern for the file name; if nil or absent, vl-directory-files assumes "*.*" directories An integer that indicates whether the returned list should include directory names. Specify one of the following: -1 List directories only. ...
|
| In das Form AutoLisp wechseln |
|
ADT Architectural Desktop : Pixelbild-Qualität
Brischke am 07.12.2004 um 12:20 Uhr (0)
Zitat: Original erstellt von kerstin2903: hallo holger, meine OLEQUALITY steht auf 3 und es kann auch nur ein wert zwischen o und 3 eingegeben werden. das kanns dann wohl nicht sein. gibts noch andere ideen? gruß, kerstin bei mir (ADT2004) gehts bis 4. Zitat: Original erstellt von Autodesk, nachzulesen in der Hilfe OLEQUALITY Typ: Ganzzahl Gespeichert in: Registrierdatenbank des Systems Ausgangswert: 1 Steuert die vorgegebene Qualität der eingebetteten OLE-Objekte. 0 Linienqualität wie in ...
|
| In das Form ADT Architectural Desktop wechseln |
|
Lisp : Lotrechte Linie durch alle Scheitelpunkte einer 3d-Polylinie
Brischke am 02.06.2015 um 14:34 Uhr (1)
beim ersten Drüberschauen ist mir sofort aufgefallen, dass die Parameter zu vlax-curve-getClosestPointTo nicht stimmen können. Du übergibst beide Elemente, was nicht stimmen kann, denn die Hilfe schreibt dazu:Zitat:Original aus der AutoCAD-Lisp-Hilfe(vlax-curve-getClosestPointTo curve-obj givenPnt [extend])Argumentscurve-objThe VLA-object to be measured.givenPntA point (in WCS) for which to find the nearest point on the curve.extendIf specified and not nil, vlax-curve-getClosestPointTo extends the curve wh ...
|
| In das Form Lisp wechseln |
|
Rund um Autocad : Blind beim Verschieben und Kopieren
Brischke am 02.04.2004 um 16:15 Uhr (0)
Zitat: Original erstellt von guenni: ... Das macht eigendlich 10 Unities für Thomas!!! ---- Wenn da nicht diese freche Unterschrift bei Thomas gestanden hätte = also nur 5 Unities! Ähm ... die Us sind keine Sympathie-Punkte. Dann gäbe es sicher auch die Möglichkeit jemandem Punkte abziehen zu lassen. Die Us sind dazu da, den bewerteten Beitrag über die Nützlichkeit des selben mitzuteilen. Von daher guenni, finde ich deine Äußerung unpassend und nicht nur deshalb auch absolut überflüssig. Man kann ...
|
| In das Form Rund um Autocad wechseln |
