Rtext with Lisp

Hi,

I would like to be able to insert some rtext containing some diesel expression but it seem to not work !

Is there a special way to do it ?

That expression doesn't work !
(setq DIESEL_TEXT "$(getvar,"dwgname")")
(command ".rtext" "Diesel" DIESEL_TEXTE '(0 0) "")

Thanks

 

Autolisp won't allow re-entry into autolisp.

 

Could you just as easily do what you need like this?

(command ".rtext" (getvar "dwgname") "0,0" "")

The above is perfectly good AutoLISP, but I can't vouch for the rtext command.

 

I will just use regular text.

Thanks any way

 

Hi Marcel,
Some things to note:
1) you can run rtext within a lisp program but there
is a limit on the interactivity that is possible.
a. (C:RTEXT)
b. (vla-send-command (vla-get-activedocument(vlax-get-acad-object)) "(c:rtext) d ")

Since a dialog box appears to enter the diesel string, that can't be
entered via a prepared command string.

2)Rtext objects can be created with entmake directly
and so the rtext command is not necessary to create but
the arx module is necessary to display the rtext.
(entmake '((0 . "rtext")(10 10.0 20.0 0.0) ......)

To get a handle on how to make one, use
(entget(car(entsel))) to see what dxf elements are
present. Take out the ename and handle objects and
most of what is left will work.

Copyright (c) 2004 by D. C. Broad, Jr.
Don't reproduce except by permission ;-)

 

Hi Marcel,
Some things to note:
....

Copyright (c) 2004 by D. C. Broad, Jr.
Don't reproduce except by permission ;-)




Do'h!!!

 

<Bwa ha ha>