|
Rund um Autocad : Daten in eine ASCII - Datei speichern
Brischke am 02.09.2003 um 23:30 Uhr (0)
Hallo Josef, so vielleicht? Code: (defun c:kpitd ( / f txt1 txt2 antw) (setq f (open (strcat (getvar "DWGPREFIX")"punktliste.txt") "w")) (while (or (not antw)(= antw "J")) (princ "
Stationstext wählen:") (setq txt1 (entsel) txt1 (if txt1 (cdr(assoc 1(entget(car txt1)))))) (if txt1 (progn (princ "
zugehörige Geländehöhe wählen:") (setq txt2 (entsel) txt2 (if txt2 (cdr(assoc 1(entget(car txt2)))))) ) (princ "
!!!Keinen Stationstext gewählt!!!") ) (if (and ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Daten in eine ASCII - Datei speichern
Brischke am 04.09.2003 um 23:13 Uhr (0)
Hallo Josef, ich habe den Code oben korrigiert. Das liegt daran, dass die eine Variable antw nicht lokal deklariert ist. Jetzte sollte es dann funktionieren, auch beim 2ten, 3ten .. Starten. Bei Fragen ... Grüße Holger ------------------ Holger Brischke CADlon - Lisp over night! Ich bin vom 07.-10.10. auf dem Anwendertreffen anzutreffen.
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Daten in eine ASCII - Datei speichern
Brischke am 10.09.2003 um 08:50 Uhr (0)
Hallo Josef, ich habe es wiederum im Code des Ursprungsbeitrages aktualisiert. Was meinst du allerdings mit frei einfügbar? Meinst du einen Dateinamen wählen zu können. dann kann man diese Zeile (setq f (open (strcat (getvar "DWGPREFIX")"punktliste.txt") "w")) auch tauschen gegen (setq f (open (getfiled "Punktlistendatei" (getvar "DWGPREFIX") "txt" 1) "w")) Meinst du aber, Daten an diese Datei anzuhängen dann mach in der Zeile: (setq f (open (strcat (getvar "DWGPREFIX")"punktliste.txt") "w")) aus dem "w" e ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Daten in eine ASCII - Datei speichern
Brischke am 11.09.2003 um 10:48 Uhr (0)
Hallo Josef, ja klar kann man das, anbei der diesbzgl geänderte Code: Code: (defun c:kpitd ( / f txt1 txt2 antw txt1e txt2e) (setq f (open (strcat (getvar "DWGPREFIX")"punktliste.txt") "w")) (while (or (not antw)(= antw "J")) (princ "
Stationstext wählen:") (setq txt1 (entsel) txt1 (if txt1 (cdr(assoc 1(entget(setq txt1e(car txt1))))))) (if txt1 (progn (princ "
zugehörige Geländehöhe wählen:") (setq txt2 (entsel) txt2 (if txt2 (cdr(assoc 1(entget(setq txt2e(car txt2)))) ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Daten in eine ASCII - Datei speichern
Brischke am 13.10.2003 um 10:05 Uhr (0)
Hallo Josef, dann stelle mal eine Bsp-Zeichnung rein, damit ich mir die Unterscheidungsmerkmale der Texte, welcher was darstellt, heraussuchen kann. Dann ist auch das alles machbar. Bei Fragen ... Grüße Holger ------------------ Holger Brischke (defun - Lisp over night! AutoLISP-Programmierung für AutoCAD NEU: AutoLISP- Projektschulung NEU: Praxisorientierte Schulungen und Workshops durch die bekannten CAD.de Moderatoren AutoCAD, AutoCAD LT, AutoCAD Mechanical, Mechanical Desktop, Architectural D ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : doppelclicck-aktion
Brischke am 14.10.2003 um 12:18 Uhr (0)
Hallo, therotisch könnte das möglich sein, schau dazu einfach mal bei den Reacroren in der VLisp-Hilfe. Ausprobiert habe ich es selber allerdings noch nicht. Bei Fragen ... Grüße Holger ------------------ Holger Brischke (defun - Lisp over night! AutoLISP-Programmierung für AutoCAD NEU: AutoLISP- Projektschulung NEU: Praxisorientierte Schulungen und Workshops durch die bekannten CAD.de Moderatoren AutoCAD, AutoCAD LT, AutoCAD Mechanical, Mechanical Desktop, Architectural Desktop
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Koordinaten und Texte in Datei
Brischke am 01.10.2003 um 15:17 Uhr (0)
Hallo daiz, ich habe ein ähnliches Problem bereits gelöst gehabt, allerdings mussten die Punkte um einen Z-Wert verschoben werden. Näheres hier: http://www.cadlon.de/Freedwnload/vpnz.pdf Da kann man was machen, bei Interesse, einfach bei mir melden. Grüße Holger ------------------ Holger Brischke (defun - Lisp over night! ...mit erweitertem Leistunsspektrum...
|
| In das Form Rund um Autocad wechseln |
|
Rund um AutoCAD : Alle Stilnamen auf Schriftart isocp setzen.
Brischke am 13.10.2003 um 14:03 Uhr (1)
Hallo Ralle,wie du das vor hast, ist eine Möglichkeit. Ist es aber nicht sinnvoller alle Textelemente auf einen Schriftstil zu schieben und die Überflüssigen dann zu löschen/bereinigen?Bei Fragen ...Grüße Holger------------------Holger Brischke(defun - Lisp over night!AutoLISP-Programmierung für AutoCADNEU: AutoLISP- ProjektschulungNEU: Praxisorientierte Schulungen und Workshops durch die bekannten CAD.de ModeratorenAutoCAD, AutoCAD LT, AutoCAD Mechanical, Mechanical Desktop, Architectural Desktop
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um Autocad : DXF-Fehler
Brischke am 20.10.2003 um 21:10 Uhr (0)
Hallo, ich habe es auch einmal versucht. Bevor Fragen kommen, mein Programm zum reparieren heißt Notepad Unter 2004 habe ich es dann aufbekommen. Bei Fragen ... Grüße Holger ------------------ Holger Brischke (defun - Lisp over night! AutoLISP-Programmierung für AutoCAD NEU: AutoLISP- Projektschulung NEU: Praxisorientierte Schulungen und Workshops durch die bekannten CAD.de Moderatoren AutoCAD, AutoCAD LT, AutoCAD Mechanical, Mechanical Desktop, Architectural Desktop
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : DXF-Fehler
Brischke am 20.10.2003 um 21:11 Uhr (0)
... diesmal ohne Umlaut im Dateinamen. ------------------ Holger Brischke (defun - Lisp over night! AutoLISP-Programmierung für AutoCAD NEU: AutoLISP- Projektschulung NEU: Praxisorientierte Schulungen und Workshops durch die bekannten CAD.de Moderatoren AutoCAD, AutoCAD LT, AutoCAD Mechanical, Mechanical Desktop, Architectural Desktop
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : DXF-Fehler
Brischke am 21.10.2003 um 09:40 Uhr (0)
Hallo, cadffm hat Recht. DXF ist eine ASCII-Datei, die mit jedem beliebigen Editor bearbeitet werden kann. Wenn man sich dann noch in der DXF-Dateistruktur auskennt, kann man Fehler ganz leicht beseitigen. Die DXF-Struktur ist eigentlich auch ganz einfach gehalten: Key Wert Key Wert Key ... In Deiner Datei sah es dann allerdings so aus: Key Wert Wert Wert Key Wert Key Wert Key Wert Wert Wert Key ... Nimmt man also die Zeilenumbrüche weg, so dass die Werte in einer Zeile stehen, dann klappt das auch mit ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : DXF-Fehler
Brischke am 21.10.2003 um 12:20 Uhr (0)
Hallo Detlef, manchmal sieht man eben den Wald vor lauter Bäumen nicht. Grüße Holger ------------------ Holger Brischke (defun - Lisp over night! AutoLISP-Programmierung für AutoCAD NEU: AutoLISP- Projektschulung NEU: Praxisorientierte Schulungen und Workshops durch die bekannten CAD.de Moderatoren AutoCAD, AutoCAD LT, AutoCAD Mechanical, Mechanical Desktop, Architectural Desktop
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : linie einfügen - vom mittelpunkt zur Umgrenzung
Brischke am 02.09.2003 um 20:41 Uhr (0)
Hallo Yolanda, anbei eine schnelle Lösung. Diese hängt an den Anfang der LWPolylinien der Konturen einen weiteren Kontrollpunkt in den Mittelpunkt des die Kontur umschließenden Rechtecks. Das ist unbedingt zu beachten und ist nur auf LWPolylinien anzuwenden, die nicht geschlossen sind, da sonst die Geometrie verändert wird. Dies funktioniert bei den Geometrien der Bsp-Zeichnung, kann aber bei komplizierteren Geometrien auch dazu führen, dass dieser Anschnitt die Kontur schneidet. Wenn so etwas vorkommt, da ...
|
| In das Form Rund um Autocad wechseln |
