|
Lisp : reactor in lisp
zech am 16.05.2011 um 12:47 Uhr (0)
Das ist jetzt mein Ergebnis und es funktioniert sehr gut,ohne Absturz oder Ähnlichem.(vlr-command-reactor nil ( (:vlr-commandEnded . cmd-end-action)))In der Prozedur "cmd-end-action" wird die Argumentenliste nach "GRIP_STRETCH" durchsucht, wenn ok dann wird mit "ssgetfirst" das Objekt identifziert und wenn das Objekt ein Block ist mit dem Namen "P_*" dann wird es geändert. Dank an alle die hier gepostet haben.
|
| In das Form Lisp wechseln |
|
Lisp : Namensbereich zum Schließen des Dokuments nicht gefunden
alfred neswadba am 30.03.2011 um 12:15 Uhr (0)
Hi,wenn Du zeigen würdest, bei welcher Programmzeile (externe EXE klingt ja nicht gerade nach LISP) der Fehler auftritt, dann könnte noch eher ins Detail gegangen werden. Ich kann es insofern bestätigen, dass (mit dotNET, wird mit VBA/VB6 wahrscheinlich ident sein) das öffnen von DOCs, die mit besagter Warnmeldung kommen, seit 2011 Probleme hat. Spich mit dieser Zeile:Code:Autodesk.AutoCAD.ApplicationServices.Application.DocumentManager.Open(....fliegt das Teil ab (mit 2010 gings noch mit dieser Art von D ...
|
| In das Form Lisp wechseln |
|
Lisp : Texte einfügen
Dorfy am 19.05.2011 um 08:31 Uhr (0)
#ss ist bei dir ein selection setvlax-for x ist die Schleife, x ist dein vla-objectEDIT: x ist ein bzw. sind die Objekte des selection sets, welche nacheinander einzeln angesprochen werden...wenn du mit den gc arbeiten möchtest brauchst du das "klassische" Objekt, welches du mit (vlax-vla-object-ename x) innerhalb der Schleife erhältswenn du dies hast, kannst du es weiter verwurschten...nun kannst du dir überlegen, wo innerhalb der vlax-for-schleife du es einbaust ggf in der cond-schleife innerhalb der vla ...
|
| In das Form Lisp wechseln |
|
Lisp : Texte einfügen
Dorfy am 18.05.2011 um 13:36 Uhr (0)
vlax-vla-object-ename wandelt dein vla-objekt in ein "herkömmliches" Objekt um...dann kannst du mit deinen Zeilen weitermachen und diese in der Schleife einbauen...EDIT: gc10 ist beim Bogen der Kreismittelpunkt...------------------Mfg Heiko Elefantenjagd in Afrika "... LISP-Programmierer bauen einen Irrgarten aus Klammern und hoffen, dass sich der Elefant darin verirrt..."[Diese Nachricht wurde von Dorfy am 18. Mai. 2011 editiert.]
|
| In das Form Lisp wechseln |
|
Lisp : Texte einfügen
Dorfy am 18.05.2011 um 16:11 Uhr (0)
nein...in der (vlax-for x... Schleife (am Ende der Schleife) das vla-objekt mittels vlax-vla-object-ename wandeln und deine Zeilen (setq PKT (cdr(assoc 10 #SS)))(command "text" PKT "0.375" "" #Len ) entsprechend einpassen... oder besser die gewünschten Infos vom vla-objekt abfragen und den text mit vla-addtext einfügen------------------Mfg Heiko Elefantenjagd in Afrika "... LISP-Programmierer bauen einen Irrgarten aus Klammern und hoffen, dass sich der Elefant darin verirrt..."
|
| In das Form Lisp wechseln |
|
Lisp : vla-explode: MTexte?
Dorfy am 18.05.2011 um 15:39 Uhr (0)
beim "dumpen" vom mtext wird explode nicht aufgeführt....------------------Mfg Heiko Elefantenjagd in Afrika "... LISP-Programmierer bauen einen Irrgarten aus Klammern und hoffen, dass sich der Elefant darin verirrt..."
|
| In das Form Lisp wechseln |
|
Lisp : vla-explode: MTexte?
Dorfy am 18.05.2011 um 15:39 Uhr (0)
beim "dumpen" vom mtext wird explode nicht aufgeführt....------------------Mfg Heiko Elefantenjagd in Afrika "... LISP-Programmierer bauen einen Irrgarten aus Klammern und hoffen, dass sich der Elefant darin verirrt..."
|
| In das Form Lisp wechseln |
|
Lisp : vla-explode: MTexte?
Dorfy am 18.05.2011 um 15:59 Uhr (0)
Block oder Blockreferenz...Objekt wählen: ; IAcadBlockReference: AutoCAD Block Reference-Schnittstelle (Blockreferenz); Eigenschaftswerte:; Application (RO) = ...; InsUnits (RO) = "Millimeter"; InsUnitsFactor (RO) = 1.0; IsDynamicBlock (RO) = 0...; Unterstützte Methoden:; ArrayPolar (3); ArrayRectangular (6); ConvertToAnonymousBlock (); ConvertToStaticBlock (1); Copy (); Delete (); Explode (); GetAttributes (); GetBoundingBox (2); GetConstantAttributes (); GetDynamicBlockProperties (); GetE ...
|
| In das Form Lisp wechseln |
|
Lisp : Texte einfügen
Dorfy am 19.05.2011 um 09:01 Uhr (0)
achsoassoc verlangt nach einer Liste also --(entget(vlax-vla-object-ename x))so nu aber - Ergebnisse!------------------Mfg Heiko Elefantenjagd in Afrika "... LISP-Programmierer bauen einen Irrgarten aus Klammern und hoffen, dass sich der Elefant darin verirrt..."
|
| In das Form Lisp wechseln |
|
Lisp : Texte einfügen
Dorfy am 19.05.2011 um 10:19 Uhr (0)
und Ergebnisse?------------------Mfg Heiko Elefantenjagd in Afrika "... LISP-Programmierer bauen einen Irrgarten aus Klammern und hoffen, dass sich der Elefant darin verirrt..."
|
| In das Form Lisp wechseln |
|
Lisp : Texte einfügen
Dorfy am 19.05.2011 um 10:52 Uhr (0)
@cadplay bis zum mittag?! na so kompliziert ist es doch nicht?! quick and dirtyCode: (vlax-for x (setq #SS (vla-get-activeselectionset *AcadDoc*)) (cond ((eq (vla-get-objectname x) "AcDbArc") (setq #Len (+ #Len (vla-get-ArcLength x))) (setq PKT (cdr(assoc 10 (entget(vlax-vla-object-ename x))))) (command "text" PKT "0.375" "" #Len ) ) ((vl-position (vla-get-objectname x) ("AcDbLine" "AcDbPolyline")) (setq #Len (+ #Len (vla-get-Length x))) (setq PKT (cdr(assoc 10 (ent ...
|
| In das Form Lisp wechseln |
|
Lisp : Texte einfügen
Dorfy am 19.05.2011 um 13:28 Uhr (0)
na und nu aber... das solltest du doch selber ändern (command "text" PKT "0.375" "" (vla-get-ArcLength x)) ------------------Mfg Heiko Elefantenjagd in Afrika "... LISP-Programmierer bauen einen Irrgarten aus Klammern und hoffen, dass sich der Elefant darin verirrt..."
|
| In das Form Lisp wechseln |
|
Lisp : Texte einfügen
Dorfy am 19.05.2011 um 14:39 Uhr (0)
vlide-Hilfe Reiter Inhalt ActiveX and VBA Reference ... was das Herz begehrt sonst? www? Suchmaschine...Für Eigenschaften und Methoden am Objekt --(vlax-dump-object (vlax-ename-vla-object(car(entsel))) T)Edit: stopfe mal in eine Suchmaschine "Visual LISP Functions reference" sollte ne pdf recht weit oben kommen... ------------------Mfg Heiko Elefantenjagd in Afrika "... LISP-Programmierer bauen einen Irrgarten aus Klammern und hoffen, dass sich der Elefant darin verirrt..."[Diese Nachricht wurde von ...
|
| In das Form Lisp wechseln |
