Dynamic Information Tool

[alanjt]

Lee, I bet it has to do with your MText object having a background 'mask'. That, among other things, wasn't available in older versions.

See Alan's (CAB) response in this thread.

Man, I had completely forgotten about the subroutine I was working on. I need to get back on that thing. LoL

[Lee Mac]

Ahh! That is a good possibility...

 

Easiest fix: program is for use on ACAD Versions in which MText Mask is available

[alanjt]

Ahh! That is a good possibility...

 

Easiest fix: program is for use on ACAD Versions in which MText Mask is available

 

Happy to help.

[stevesfr]

A quick update - Now allows for quick editing with any text or attributes

 

Oh, and you can click on a viewport to lock it

 

Lee

 

 ; **=-=-=-=-=-=-=-=-=-=-=- DINFO.lsp =-=-=-=-=-=-=-=-=-=-=-**
 ; **                   by Lee McDonnell                    **
 ; **                 Copyright © May 2009                  **
 ; **                                                       **
 ; **         Contact at: CADTutor.net, TheSwamp.org        **
 ; **                                                       **
 ; **=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=**
 ; **                                                       **
 ; **                DYNAMIC INFORMATION TOOL               **
 ; **                                                       **
 ; **  FUNCTION DESCRIPTION:                                **
 ; **                                                       **
 ; **  Information about an object is displayed upon the    **
 ; **  user moving the cursor over the object.              **
 ; **                                                       **
 ; **  FUNCTION SYNTAX:  DINFO                              **
 ; **                                                       **
 ; **=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=**
 ; **                                                       **
 ; **  Click or Hit Enter to Exit Program                   **
 ; **  Press "+" to Increase Cursor Pick Box                **
 ; **  Press "-" to Decrease Cursor Pick Box                **
 ; **                                                       **
 ; **  Click on Text or Attributes to Edit them.            **
 ; **  Click on a Viewport to Lock it.                      **
 ; **                                                       **
 ; **=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=**
 ; **                                                       **
 ; **  ADDITIONAL FUNCTIONS:                                **
 ; **                                                       **
 ; **  CurMod: Creates Custom Cursor Object                 **
 ; **  cInter: Checks for Intersection & Creates Info Str   **
 ; **  cErase: Erase Information Box and Cursor Object      **
 ; **  blkinfotxt: Creates Information Box                  **
 ; **  dxf: Returns DXF code value                          **
 ; **  verchk: Checks AutoCAD Version                       **
 ; **                                                       **
 ; **=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=**
 ; **                                                       **
 ; **  PLATFORM RESTRICTIONS:                               **
 ; **                                                       **
 ; **  For use on AutoCAD 2000 onwards.                     **
 ; **  Only tested in AutoCAD 2004.                         **
 ; **                                                       **
 ; **=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=**
 ; **                                                       **
 ; **  WITH THANKS TO:                                      **
 ; **                                                       **
 ; **  Andrea Andreetti ~ for providing me with             **
 ; **                     the inspiration to create this.   **
 ; **                                                       **
 ; **=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=**
 ; **                                                       **
 ; **  VERSION:                                             **
 ; **                                                       **
 ; **    1.0  First Release                  ~  09.05.2009  **
 ; **    1.1  ProgEdition Added (Commented)  ~  09.05.2009  **
 ; **    2.0  Text and Attribute Edit Added  ~  09.05.2009  **
 ; **                                                       **
 ; **=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=**

 

Lee, In V1.3 how can we change the color of the "entity name" when moving cursor, these old eyes have a hard time of blue on black.

remainder of info no problem.

cheers

S

[Lee Mac]

Good point Steve,

 

You'll have to dig through it a bit to change it though, it appears in two places:

 

Look at the subfunction '_Display', lines 306 and 321, where you see:

 

{\\C5;

The '5' indicates the colour Blue, so you can change this number to any autocad index colour.

[stevesfr]

Good point Steve,

 

You'll have to dig through it a bit to change it though, it appears in two places:

 

Look at the subfunction '_Display', lines 306 and 321, where you see:

 

{\\C5;

The '5' indicates the colour Blue, so you can change this number to any autocad index colour.

 

I had looked for "5" and found it, but when it was prefixed by "C" I dared not fool with the "5" at that point. I should back it up, and explore, if it boms, nuts, just go get the failsafe backup and hack / explore more. Explore and learn... that's me.

thanks buddy

S

[Lee Mac]

No worries Steve

 

You can always re-download it if things go tits up

[tallika_fan]

Lee, similar to NBC's error back in april (post #66).

 

Upon hovering over a block with attributes, the block name is substituted for and autocad anonymous block name rather than the actual name. Is there a switch to get the name back, rather than something like *U22 etc

 

I am using version 1.3 of this program.

 

Thanks

Pete

[Lee Mac]

Tallika_fan, are you using an anonymous block or dynamic block?

[tallika_fan]

Lee, it's an anonymous block with attributes, not a dynamic block.

 

eg.

block name = Divider - Beef

belongs to = *U161

 

Just wondering if there is a way to substitute the *U??? for the actual name. If some of the code can be manipulated. I haven't read through all the code with a comb yet, plus i'm still not that au fait either.

 

Thanks.

Pete

[tallika_fan]

Lee, after a little more testing with a few more blocks, the majority of them do state the block name, though it turns out the particular block i need the name stated on, comes with the anonymous name. Bummer.

 

**Edit**

 

Fixed it, did a quick google on converting dynamic block into static ones, turned out that they were dynamic.

 

Anyway, over on http://www.cadforum.cz/cadforum_en/download.asp?fileID=693 there is a utility, DB2SB, which converts an AutoCAD dynamic block to a static block via VLX Lisp.

 

So, the end result after a few test blocks, enabled me to convert the dynamic block into a static, then run the Dinfo program and it all works, as it should.

 

The only thing i have changed on the program is the resultant text, i changed it to ArialNarrow, hope you don't mind... :-)

 

Thanks

Pete

Edited September 9, 2010 by tallika_fan

[Lee Mac]

Pete, if its an anonymous block then the name is purely *U### - this is the standard AutoCAD naming format for anonymous blocks

[tallika_fan]

Lee, i did write a post yesterday though it disappeared into the void that is the internet.

 

Basically i did a little more rooting and Googling, and came across this which converts an AutoCAD dynamic block to a static block via a VLX Lisp.

 

After running this first on the *U### block, then running your Dinfo program it gives me the information that i need.

 

Cheers

Pete

 

ps. hope you don't mind, i changed the code for the display font to be arialnarrow, it makes it much clearer on the screen for me.

[aazaaz]

> Lee

 

Excuse me for bad English.

 

Dynamic Information Tool (DInfo) return error for entity "POLYLINE" into XREF and INSERT.

It was checked on version 1.4.

 

http://www.cadtutor.net/forum/showthread.php?53853-How-to-start-a-lisp-like-DInfo-Belong-to-LEE/page2&highlight=start+lisp+DInfo+Belong+LEE