Author Topic: Question 30 goes here  (Read 36922 times)

0 Members and 1 Guest are viewing this topic.

LE

  • Guest
Re: Question 30 goes here
« Reply #45 on: September 16, 2005, 09:46:28 PM »
And.... I found that by reading "vlr-pers-dictname" and after seeing this: vlr-reactor.getdictkey - some few years ago....

Now, what would be the conclusion?

Good
Bad
Does not matter


MP

  • Seagull
  • Posts: 17750
  • Have thousands of dwgs to process? Contact me.
Re: Question 30 goes here
« Reply #46 on: September 16, 2005, 09:53:04 PM »
And.... I found that by reading "vlr-pers-dictname" and after seeing this: vlr-reactor.getdictkey - some few years ago....
Pays to RTFM.

:)

Quote
Now, what would be the conclusion?

Good
Bad
Does not matter

None of the above: Very Interesting indeed, thanks for the trip.

:)
Engineering Technologist • CAD Automation Practitioner
Automation ▸ Design ▸ Drafting ▸ Document Control ▸ Client
cadanalyst@gmail.comhttp://cadanalyst.slack.comhttp://linkedin.com/in/cadanalyst

Kerry

  • Mesozoic relic
  • Seagull
  • Posts: 11654
  • class keyThumper<T>:ILazy<T>
Re: Question 30 goes here
« Reply #47 on: September 16, 2005, 10:00:16 PM »
conclusion :
Really Interesting !!
I could see it being abused, but then, so can almost anything.

Right now I can thing of a couple of neat uses for this.

It would be fairly simple to write a removal tool, yes ??

Hope I can make some time next week to play.

Thanks Luis and Good Effort Michael.

.. back to the grindstone ..
kwb



kdub, kdub_nz in other timelines.
Perfection is not optional.
Everything will work just as you expect it to, unless your expectations are incorrect.
Discipline: None at all.

LE

  • Guest
Re: Question 30 goes here
« Reply #48 on: September 16, 2005, 10:08:30 PM »
It would be fairly simple to write a removal tool, yes ??

By whom?

LE

  • Guest
Re: Question 30 goes here
« Reply #49 on: September 16, 2005, 10:15:55 PM »
Let's see...Luis will tell me I'm wrong but before he does I will disagree with him.  As he didn't state lisp routine in the question, I will answer as if it were a VBA routine.  type VBAMAN, select the routine, click EMBED.  It will load the next time the drawring is opened.

:-)

Sorry Bob,

No dark side ... forgot to mention that was just with the lispy stuff.

MP

  • Seagull
  • Posts: 17750
  • Have thousands of dwgs to process? Contact me.
Re: Question 30 goes here
« Reply #50 on: September 16, 2005, 10:18:50 PM »
<Festus> Simple entdel on that thar dictionary varmit blows it into smithereens ... </Festus>
Engineering Technologist • CAD Automation Practitioner
Automation ▸ Design ▸ Drafting ▸ Document Control ▸ Client
cadanalyst@gmail.comhttp://cadanalyst.slack.comhttp://linkedin.com/in/cadanalyst

LE

  • Guest
Re: Question 30 goes here
« Reply #51 on: September 16, 2005, 10:35:14 PM »
<Festus> Simple entdel on that thar dictionary varmit blows it into smithereens ... </Festus>
Did you check if this is kaput.... too?

Opening an AutoCAD 2004 format file.
Regenerating model.
Restoring Ldata->
<<<<------ this one after deleting....

Kerry

  • Mesozoic relic
  • Seagull
  • Posts: 11654
  • class keyThumper<T>:ILazy<T>
Re: Question 30 goes here
« Reply #52 on: September 16, 2005, 10:35:42 PM »
Quote
By whom?

You'd just have to know what to look for ...

(massoc 3 (entget (namedobjdict)))

("ACAD_COLOR" "ACAD_GROUP"
              "ACAD_LAYOUT"
              "ACAD_MATERIAL"
              "ACAD_MLINESTYLE"
              "ACAD_PLOTSETTINGS"
              "ACAD_PLOTSTYLENAME"
              "ACAD_TABLESTYLE"
              "AcDbVariableDictionary"
              "reactorswiz"
)


.. and know how to blow it up ..
kdub, kdub_nz in other timelines.
Perfection is not optional.
Everything will work just as you expect it to, unless your expectations are incorrect.
Discipline: None at all.

MP

  • Seagull
  • Posts: 17750
  • Have thousands of dwgs to process? Contact me.
Re: Question 30 goes here
« Reply #53 on: September 16, 2005, 10:40:17 PM »
<Festus> Simple entdel on that thar dictionary varmit blows it into smithereens ... </Festus>
Did you check if this is kaput.... too?

Opening an AutoCAD 2004 format file.
Regenerating model.
Restoring Ldata->
<<<<------ this one after deleting....

Yep, varmit be gone, just entdel inside out.
Engineering Technologist • CAD Automation Practitioner
Automation ▸ Design ▸ Drafting ▸ Document Control ▸ Client
cadanalyst@gmail.comhttp://cadanalyst.slack.comhttp://linkedin.com/in/cadanalyst

LE

  • Guest
Re: Question 30 goes here
« Reply #54 on: September 16, 2005, 10:40:48 PM »
Quote
By whom?

You'd just have to know what to look for ...

(massoc 3 (entget (namedobjdict)))

("ACAD_COLOR" "ACAD_GROUP"
              "ACAD_LAYOUT"
              "ACAD_MATERIAL"
              "ACAD_MLINESTYLE"
              "ACAD_PLOTSETTINGS"
              "ACAD_PLOTSTYLENAME"
              "ACAD_TABLESTYLE"
              "AcDbVariableDictionary"
              "reactorswiz"
)


.. and know how to blow it up ..


OK, please do a test by deleting the dictionary.... look again into the entget... is not there no?.... now save the drawing and open it again.... is back or not?.... remember that the VLX must be on the same folder as the drawing

MP

  • Seagull
  • Posts: 17750
  • Have thousands of dwgs to process? Contact me.
Re: Question 30 goes here
« Reply #55 on: September 16, 2005, 10:43:09 PM »
Like I said, entdel inside out: kill the vlo-vl object then its dictionary. Bye!
Engineering Technologist • CAD Automation Practitioner
Automation ▸ Design ▸ Drafting ▸ Document Control ▸ Client
cadanalyst@gmail.comhttp://cadanalyst.slack.comhttp://linkedin.com/in/cadanalyst

LE

  • Guest
Re: Question 30 goes here
« Reply #56 on: September 16, 2005, 10:51:01 PM »
Like I said, entdel inside out: kill the vlo-vl object then its dictionary. Bye!
OK OK.... I did not read your post...... need glasses and more english classes.....

MP

  • Seagull
  • Posts: 17750
  • Have thousands of dwgs to process? Contact me.
Re: Question 30 goes here
« Reply #57 on: September 16, 2005, 10:52:01 PM »
OK OK.... I did not read your post...... need glasses and more english classes.....

No prob, me too.

:P
Engineering Technologist • CAD Automation Practitioner
Automation ▸ Design ▸ Drafting ▸ Document Control ▸ Client
cadanalyst@gmail.comhttp://cadanalyst.slack.comhttp://linkedin.com/in/cadanalyst

Kerry

  • Mesozoic relic
  • Seagull
  • Posts: 11654
  • class keyThumper<T>:ILazy<T>
Re: Question 30 goes here
« Reply #58 on: September 16, 2005, 11:08:23 PM »
This IS fun, but I have to get back to WORK guys ..

Have a couple of beers tomorrow Luis ..


Code: [Select]
(setq dictionaries (vla-get-dictionaries (vla-get-activedocument (vlax-get-acad-object))))
 
(vlax-for obj dictionaries
  (if (vlax-property-available-p obj 'Name)
    (if (= (vla-get-name obj) "reactorswiz")
      (setq Whizzy obj)
    )
  )
)


;; //////

Code: [Select]
(vlax-dump-object Whizzy)
; IAcadDictionary: A container object for storing and retrieving objects
; Property values:
;   Application (RO) = #<VLA-OBJECT IAcadApplication 00b9d604>
;   Count (RO) = 1
;   Document (RO) = #<VLA-OBJECT IAcadDocument 062744e0>
;   Handle (RO) = "111"
;   HasExtensionDictionary (RO) = 0
;   Name = "reactorswiz"
;   ObjectID (RO) = 2130194696
;   ObjectName (RO) = "AcDbDictionary"
;   OwnerID (RO) = 2130189408

;;//
Code: [Select]
(vlax-dump-object (vla-item Whizzy 0))

; IAcadObject: The standard interface for a basic AutoCAD object
; Property values:
;   Application (RO) = #<VLA-OBJECT IAcadApplication 00b9d604>
;   Document (RO) = #<VLA-OBJECT IAcadDocument 062744e0>
;   Handle (RO) = "119"
;   HasExtensionDictionary (RO) = 0
;   ObjectID (RO) = 2130194760
;   ObjectName (RO) = "vlo_VL"
;   OwnerID (RO) = 2130194696
kdub, kdub_nz in other timelines.
Perfection is not optional.
Everything will work just as you expect it to, unless your expectations are incorrect.
Discipline: None at all.

MP

  • Seagull
  • Posts: 17750
  • Have thousands of dwgs to process? Contact me.
Re: Question 30 goes here
« Reply #59 on: September 16, 2005, 11:09:05 PM »
I want to thank you Luis, that was a most enjoyable challenge! I think the last time I had that much hacking fun is when I cracked the AutoCAD "student version" flag couple years back.

 :evil:
Engineering Technologist • CAD Automation Practitioner
Automation ▸ Design ▸ Drafting ▸ Document Control ▸ Client
cadanalyst@gmail.comhttp://cadanalyst.slack.comhttp://linkedin.com/in/cadanalyst