Default Image Transparency Possible?

Can anyone tell me if there is a setting that will allow me to default all
images to be transparent when inserted?

 

Maybe not as clean as you would like but this is what I've made for myself:

(defun c:im ( / image-object)
(command "_.image" "A" "~")(pause-cmd)
(setq image-object (vlax-ename->vla-object (entlast)))
(vla-put-transparency image-object :vlax-true)
)

kemp

 

Guess I should give the pause-cmd function too

(defun pause-cmd ()
(while (= (getvar "CMDACTIVE") 1) (command PAUSE))
)

 

Thanks! This works just fine for my purposes. I just have to know what the
scale of the drawing is when I am inserting it. Although it doesn't ask for
the size or rotation I found that I can enter it just the same.

 

I have another question.... Each time I insert an image the Shift+Left Click
doesn't work to select an image. I have to go into the mapioptions dialog,
select the general tab, uncheck and then recheck the shift+left click image
box and then exit in order to activate this feature. Any idea how I can
include this in your routine so that I don't have to keep going through this
procedure?

 

Are you using Autodesk MAP? If so I know nothing about that package - sorry!

kemp

 

Yes I am using map but I am not using the map image insert routine. I am
just using the regular Insert > Raster Image command for unreferenced tiffs.
Other than mapioptions to activate the Shift+Left Click option is there a
regular Autocad command to do the same thing?

 

In Vanilla autocad (setvar "PICKADD" 1) controls shift clicking, but it
sounds like MAP handles it differently...

kemp