|
Lisp : Welche Dias sind in SLB ?
tunnelbauer am 11.12.2007 um 09:13 Uhr (0)
Normal musst du diese Liste ja nur einmal "auslesen" - dies kannst du ja auch händisch machen da die Texte am Anfang der SLB in Form von PlainText enthalten sind.Danach könntest du wie folgt vorgehen: http://aec.cadalyst.com/aec/AutoCAD/AutoLISP-Solutions-Smart-pipe-symbols/ArticleStandard/Article/detail/171653 ------------------GrüsseThomasKorrekturen zum Kochbuch AutoLISP
|
| In das Form Lisp wechseln |
|
Lisp : Welche Dias sind in SLB ?
fuchsi am 11.12.2007 um 12:28 Uhr (0)
Habe schnell mal aufgrund der Datei Beschreibung in VB was geschrieben.Code: file = "d:hicad10b10A0ART2.SLB" Set fs = CreateObject("SCRIPTING.FILESYSTEMOBJECT") Set f = fs.OpenTextFile(file) ok = True a1 = f.Read(32) ersten 32 Byte ignorieren. Hier könnte noch eine Prüfung stattfinden, ob es eh einen SLB ist While ok = True a1 = f.Read(36) If Mid$(a1, 1, 1) Chr(0) Then a2 = Mid$(a1, 1, InStr(a1, Chr(0)) - 1) Debug.Print a2 ausgeben des DIA Names Else ok = False ...
|
| In das Form Lisp wechseln |
|
Lisp : Welche Dias sind in SLB ?
fuchsi am 11.12.2007 um 12:20 Uhr (0)
Im Handbuch für Benutzanpassungen der 12er Version war das SLB Dateiformat sehr genau beschrieben.Im jetzigen findet man nur nochCode:In diesem Abschnitt wird das Format von AutoCAD-Diabibliotheken (ab Release 9) für Entwickler beschrieben, die eine Unterstützung von Diabibliotheken in ihre Programme einbauen möchten. Eine Diabibliothek weist im allgemeinen das folgende Format auf: "AutoCAD-Diabibliothek 1.0" CR LF ^Z NUL NUL NUL NUL Kopfzeile (32 Byte) Ein oder mehrere Diaverzeichniseinträge (je 36 Byte) ...
|
| In das Form Lisp wechseln |
|
Lisp : Speichern in Autocad 2000 Format
CADwiesel am 08.08.2008 um 07:49 Uhr (0)
wie wäre der Befehl _saveas denn?den gibts sogar, wenn wmnn filedia auf 0 stellt als Befehlszeilenversion.ok, er kann nicht mehrere Dateien auf einmal speichern, aber wer oder was kann sowas schon?------------------Gruß CADwieselBesucht uns im CHAT
|
| In das Form Lisp wechseln |
|
Lisp : Text aus Lisp - Ribbon Texteditor
kamehama am 16.12.2009 um 14:10 Uhr (0)
HalloMöchte einen Text mittels Lisp erzeugen, um die Texthöhe und Stil vorzudefinieren. Den Text selbst soll der User dann wie gewohnt eintippen und dabei soll die Multifunktionsleiste auf den Texteditor umschalten. Soweit schaffe ich es mit folgender Befehlsreihenfolge:(initdia "mtext")(command "_mtext" pause "_s" "textstil" "_h" hoehe)Nun möchte ich jedoch auch, dass ich für die Erstellung des Textes nicht beide Eckpunkte antippen muss, sondern nur den oberen Rechten Punkt antippe und dass ich anschliess ...
|
| In das Form Lisp wechseln |
|
Lisp : Code für AutoCAD-Gruppen...
Tobier am 05.03.2010 um 11:30 Uhr (0)
ja, jetzt sollte es aber für jeden Dummy klar sein, der das in Zukunft liest. Danke nochmal!
|
| In das Form Lisp wechseln |
|
Lisp : Code für AutoCAD-Gruppen...
CADmium am 09.03.2010 um 11:27 Uhr (0)
auch zum Thema .. intern via ActiveX umgesetzt ...------------------ - 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 : Code für AutoCAD-Gruppen...
marc.scherer am 24.07.2002 um 17:12 Uhr (0)
Hi,ich habe mal n bischen Code zum Thema Gruppen geschrieben:Edit_22.10.2008:Finaler Code siehe mein Posting in diesem Threads: http://ww3.cad.de/foren/ubb/Forum145/HTML/000019.shtml#000017 Alte Versionen zugunsten der Übersichtlichkeit gelöscht...------------------Ciao,Marc[Diese Nachricht wurde von marc.scherer am 22. Okt. 2008 editiert.]
|
| In das Form Lisp wechseln |
|
Lisp : Code für AutoCAD-Gruppen...
Geos am 31.07.2002 um 08:08 Uhr (0)
Servus MarcIch hab noch zwei Funktionen hinzugefügt - aufbauend auf Deine.;;;*******************************************************************;;; Fügt ein Objekt zur Gruppe hinzu(defun c:addg (/ GNAME SGET) (if (setq sget (entget (car (entsel "
Gruppe zu der hinzugefügt wird wählen: ")))) (progn (setq gname (get-groupname sget)) (command "_.-group" "H" (car gname) pause) ) ;_ end progn ) ;_ end if) ;_ end defun;;;*******************************************************************;;; Entfernt ein Ob ...
|
| In das Form Lisp wechseln |
|
Lisp : Code für AutoCAD-Gruppen...
tappenbeck am 09.08.2002 um 14:25 Uhr (0)
hallo ernst, ich habe deine add-function noch um einen kommentar erweitert !dann ist die anwendung einwenig besser zu verstehen !(defun c:addg (/ GNAME SGET) (if (setq sget (entget (car (entsel "
Gruppe zu der hinzugefügt wird wählen: ")))) (progn (setq gname (get-groupname sget)) (command "_.-group" "H" (car gname) ) (princ "
Welches Element soll aufgenommen werden ?") (command pause) ) ;_ end progn ) ;_ end if) ;_ end defungruß Jan :-)------------------jan :-)
|
| In das Form Lisp wechseln |
|
Lisp : Code für AutoCAD-Gruppen...
marc.scherer am 04.09.2002 um 08:32 Uhr (0)
Hi,die Funktionen "ADDG" und "DELG" sind nette Ideen. Aber ich finde nicht gut, das man immer nur ein Objekt hinzufügen kann.Darum die "ADDG" Idee nochmal in meiner Umsetzung:Edit_12.03.2003:Finaler Code siehe mein letztes Posting dieses Threads.Alte Versionen zugunsten der Übersichtlichkeit gelöscht...------------------Ciao,Marc[Diese Nachricht wurde von marc.scherer am 14. Sep. 2006 editiert.]
|
| In das Form Lisp wechseln |
|
Lisp : Code für AutoCAD-Gruppen...
marc.scherer am 04.03.2003 um 19:00 Uhr (0)
Hi Leute,hier die letzte neuste Version der Gruppen-Funktionen.Wie versprochen, enthält diese nun auch meine Variante von "delg" - dem entfernen von Objekten aus einer Gruppe:Edit_12.03.2003:Finaler Code siehe mein letztes Posting dieses Threads.Alte Versionen zugunsten der Übersichtlichkeit gelöscht...------------------Ciao,Marc[Diese Nachricht wurde von marc.scherer am 14. Sep. 2006 editiert.]
|
| In das Form Lisp wechseln |
|
Lisp : Code für AutoCAD-Gruppen...
marc.scherer am 05.03.2003 um 10:27 Uhr (0)
Hi Leute,und noch mal n Update.ne neue SubRoutine "TOGGLE-GROUPSELECT"Eine neue Funktion "TPS" (Toggle Pickstyle, schaltet Gruppenwahl ein wenn aus und umgekehrt)Und n bischen Feintuning in der einen oder anderen Funktion, u.a. wird der Wert von "Pickstyle" am Ende der Funktionen "addg" und "delg" wieder auf den Ausgangswert gesetzt und "delg" arbeitet nicht einfach mit "pickstyle=3" sondern aktiviert oder deaktiviert nur jeweils die Gruppenwahl.Update 12.09.2006:Da es hier wiederholt zu Problemen beim kop ...
|
| In das Form Lisp wechseln |
