|
Lisp : Kann keine XDaten schreiben
joern bosse am 11.03.2009 um 11:50 Uhr (0)
Hallo Dorfy,jetzt hat es bei mir auch funktioniert. Es kann wirklich sein, das ich zuviel bereinigt habe, ich habe ca. 38000 RegApps bereinigt, damit ich die Datei auf ca. 3MB reduzieren konnte.Ich habe Sie jetzt nochmal angehängt mit RegApps, und es funktioniert wieder nicht. Es scheint also, das die RegApps daran schuld sind. Gibt es da eine Gesamtspeicherbegrenzung???Zusätzlich habe ich noch eine Liste mit den RegApps angehängt, die ich vorher bereinigt hatte.------------------viele GrüßeJörnhttp://www. ...
|
| In das Form Lisp wechseln |
|
Lisp : Kreise durch Punkte ersetzen
joern bosse am 12.03.2009 um 08:21 Uhr (0)
Hallo Steff,ich habe Deinen Code mal ein bißchen schlanker gemacht, auf ein paar Variablen verzichtet und diese lokal deklariert. Zudem habe ich aus der While-Schleife ein Repeat gemacht. Vergleiche einfach mal die Codes, aber denke jetzt bitte nicht, das ist der ultimative Code, es ist nur eine andere Variante (da hat zum Glück jeder seinen eigenen Stil)Code:(DEFUN C:kreiszupunkt ( / VPOSIT VSET VWARGESPERRT VZAEHLER) (if (setq vSet (ssget (list (cons 0 "CIRCLE")))) (progn (setq vZAEHLER 0 vPOSIT ...
|
| In das Form Lisp wechseln |
|
Lisp : EXE-Datei in Lisp
joern bosse am 30.03.2009 um 07:34 Uhr (0)
Hallo Theodor, Zitat:Wenn Siegfried nicht so weit weg wohnen würde und ich mich an seinen PC setzen könnte ...?Hast Du schon mal Fernwartung ausprobiert??z.B. http://www.teamviewer.com/de/index.aspx ------------------viele GrüßeJörnhttp://www.bosse-engineering.com
|
| In das Form Lisp wechseln |
|
Lisp : Bemassung -> Prüfung: Aufbau der XDaten???
joern bosse am 16.03.2011 um 18:10 Uhr (0)
Hallo,wenn ich den AutoCAD-Befehl Bemassung-Prüfung verwende, dann werden mir meine Bemassungen schick als Prüfmasse dargestellt.Gibt es für die XDaten, die an die Bemassungen rangeschrieben werden irgendwo eine Dokumentation??? XDaten-Beispiel: Zitat:* Registered Application Name: ACAD_DSTYLE_DIMINSPECT* Code 1070, 16-bit integer: 396* Code 1000, ASCII string: 100%* Code 1070, 16-bit integer: 394* Code 1070, 16-bit integer: 34* Code 1070, 16-bit integer: 393* Code 1070, 16-bit integer: 1Bin wie immer dank ...
|
| In das Form Lisp wechseln |
|
Lisp : Lisproutinen laden
joern bosse am 10.03.2011 um 09:43 Uhr (0)
Hallo,hast Du die über die CUI nur als Menüpunkt eingebunden?? Dann ist die Datei ja noch nicht geladen. Hast Du vielleicht bei Dir zu Hause die Datei über die acaddoc.lsp oder Startgruppe (unter APPLOAD) geladen, und kannst Sie deshalb über den Menüeintrag sofort starten?------------------viele GrüßeJörnhttp://www.bosse-engineering.com
|
| In das Form Lisp wechseln |
|
Lisp : Lisp mit DCL laufen im 2010er nicht mehr
joern bosse am 07.01.2010 um 11:31 Uhr (0)
Hallo Marcus,nein, die DCL-Geschichten laufen wie immer. Wie wirkt sich es bei Dir aus, das es nicht mehr funktioniert?? Liegen die DCLs auf einem Supportpfad? Tip: Wenn Du die Lisp- und DCL-Dateien als VLX-Datei kompilierst brauchst Du Dich um einen Supportpfad nicht zu kümmern.------------------viele GrüßeJörnhttp://www.bosse-engineering.com
|
| In das Form Lisp wechseln |
|
Lisp : erstellen von Papiergrößen für DWG To PDF
joern bosse am 18.01.2010 um 08:02 Uhr (0)
Hallo,ich möchte in AutoCAD 2010 den "DWG To PDF"-Plotter verwenden. Über die Funktionen bei CADwiesel (Bauklötze=Plotter) kann ich mir den Plotter und die zugehörige Papiergröße automatisch zuordnen.Kann ich auch Einfluß nehmen auf die Erstellung benutzerspezifischer Papierformate?Hintergrund: Ich habe eine Menge an verschiedenen Papierformaten zu bedienen, und zur Zeit behelfe ich mir mit der nicht sonderlich eleganten Art, das ich grundsätzlich ein Papierformat von 900*3000 verwende, um die Dateien dana ...
|
| In das Form Lisp wechseln |
|
Lisp : Funktionsaufruf aus anderer Funktion
joern bosse am 31.01.2010 um 10:28 Uhr (0)
Hallo Christian,ich würde das "c:" weglassen, daß ist eigenlich nur dafür gedacht, daß Du die Funktion direkt in der Befehlszeile von AutoCAD starten kannst, aber ohne Parameterübergabe.(defun aa(a b c/ d e) (setq e (caddr c) d (cadr c) c (car c)))(defun ne() (aa 10 11 ("a" "b" "c")))Mit "c:" könnte man jetzt eine aufrufenden Funktion definieren:(defun c:StartFunktion( / ) (ne))Jetzt kannst Du die StartFunktion direkt in der Befehlszeile von AutoCAD mit "StartFunktion" ausführen. (Wenn Du allerdings den Rü ...
|
| In das Form Lisp wechseln |
|
Lisp : Layer Filter
joern bosse am 10.02.2010 um 14:17 Uhr (0)
Hei Marc,es war zwar früh, aber ich habe mich exakt an die Frage gehalten: Zitat:Hallo, bei der Datei im Anhang möchte ich nur Blöcke verarbeiten die beim Layernamen mit "CPM" beginnen z.B "CPM-Auto" od. "CPM-Win".Aber hast natürlich recht, wenn die LANDCADD-Layer aus einem mir nicht bekannten Grund ausgeschlossen werden sollen, dann kann ich da nicht einfach die NOTs wegkommentieren. Vielleicht gibt es diesbezüglich ja noch eine Rückmeldung des Fragestellers.------------------viele GrüßeJörnhttp://www.bo ...
|
| In das Form Lisp wechseln |
|
Lisp : Listen vergleichen
joern bosse am 11.03.2010 um 17:05 Uhr (0)
Hallo Andreas,ich habe noch ein wenig experimentiert, das Ergebnis ist eine Funktion, die die alte Gruppencodeliste pro angepickten Element erstmal wegspeichert in "c:LvStore.lsp", als Kennung wird der GC5 verwendet. (Das heißt aber, bei copy And Paste funzt es dann nicht mehr)Wenn das Element das 2.te Mal angepickt wird kann bereits ein Vergleich stattfinden zwischen gespeicherter und aktueller Gruppencodeliste.Doppelte Gruppencodes habe ich mit einem aufzählenden Index berücksichtigt. Wenn die Reihenfolg ...
|
| In das Form Lisp wechseln |
|
Lisp : Ausnahmebedingung bei GC 102 + 103 ???
joern bosse am 19.03.2010 um 08:30 Uhr (0)
Hallo,ich habe ein Phänomen entdeckt was ich nicht ganz nachvollziehen kann.Folgender Code erzeugt eine Ausnahmebedingung:Code:(defun c:test (/ liste) (setq liste ( (102 . 0) (103 . 0) )) (setq liste (subst (cons 102 1) (assoc 102 liste) liste) liste (subst (cons 103 1) (assoc 103 liste) liste) ))Ergebnis:Befehl:Befehl: test; Fehler: Ausnahmebedingung aufgetreten: 0xC0000005 (Zugriffsverletzung)Befehl:Befehl: testFehler bei Aussage in Datei ..LOSIOLOSTERMWIN.CPP, Zeile 398:tp-GetBuf ...
|
| In das Form Lisp wechseln |
|
Lisp : DBX - XREF-Pfadnamen ändern??
joern bosse am 29.03.2010 um 08:44 Uhr (0)
Hallo,folgende Situation:zur Zeit habe ich ein Programm, welches mir z.B. für Datei A.dwg einen Index vergibt = A_1.dwgWenn in der Datei A XREFs enthalten sind, dann sollen diese entsprechend dieses Indexs ebenfalls umbenannt werden und in der Datei A_1.dwg muss der XREF-Pfad geändert werden.Zur Zeit läuft das über einen Scriptbetrieb, d.h., ich habe eine beliebiege Zeichnung geöffnet, dann wird im Scriptbetrieb die umbenannte Datei A_1.dwg geöffnet. Innerhalb der Datei A_1.dwg kann ich dann über SSGET die ...
|
| In das Form Lisp wechseln |
|
Lisp : _.MATCHPROP als Befehlszeilenversion??
joern bosse am 31.05.2010 um 09:22 Uhr (0)
Hallo,danke für die Antworten, ich habe mich erstmal an CADffms Möglichkeit mit der Registry gemacht:Code:(defun c:DialogSettingsLesen (/) (vl-registry-read (DialogSettingsPfad) "Selection"))(defun c:DialogSettingsAlleHakenAn (vl-registry-write (DialogSettingsPfad) "Selection" 65023))(defun c:DialogSettingsAlleHakenAus (vl-reg ...
|
| In das Form Lisp wechseln |
