DWG in Dialog Box?

[BLOACH85]

no i wrote the code but the way that you put it i was kind confused i allready have a couple of action tiles in my in/out for example

(action_tile "cancel" "(done_dialog)(setq UserClick nil) ")

This is what you were saying right? Im not knew to lisp but i am kinda fresh to dcl.

[The Buzzard]

Action tiles take the information from the dialog place it in a variable to be used someplace within the program. The OK or accept action tile implements all the events to take place based on what input in the DCL was supplied.

[The Buzzard]

You can have an action tile in some cases for each button or toggle or whatever is in the DCL. Its a way to pass the information on thru the program.

[BLOACH85]

now do i need this even if the image is just for display?

[The Buzzard]

Not at all. I was under the impression you were still changing images. If you are changing images, Then yes you will need it.

[BLOACH85]

Ok see thats what was confusing me. No this is just for display purposes.

[The Buzzard]

Then you need this in the DCL to have a place to put the image.

 

: image {

key = "im1";

height = 7;

aspect_ratio = 1.5;

color = 0;

allow_accept = true;

}

 

And you will need this in the lisp file to set the image to the tile

in your DCL

 

(setq w (dimx_tile "im1")

h (dimy_tile "im1"))

(start_image "im1")

(slide_image 0 0 w h "Name of your slide image goes here")

(end_image)

 

 

And finally you need the slide

 

Thats it.

[Lee Mac]

Sorry to interrupt this thread, but just as a tip for creating slide (SLD) images:

 

• Create a Viewport in any layout and dimension it to a ratio of 2:3, i.e two unit height to 3 unit width. -- I made mine 400x600.

• Draw your desired image in model space to any dimensions.

• Go to the layout and zoom extents.

• Whilst still in the Viewport, type mslide in the command prompt.

• Select a name and location for your slide image.

This should produce the best possible size for your slide image.

[Lee Mac]

And another thing - when you use the slide image, you can first fill the background colour of the image tile to a different colour to fit with the slide image.

 

I used something like this:

 

 (defun imgupd (img key)
   (start_image key)
   (fill_image 0 0 (dimx_tile key) (dimy_tile key) -15)
   (slide_image 0 0 (dimx_tile key) (dimy_tile key) img)
   (end_image))

 

Where -15 colour is the dialog box backing colour.

[The Buzzard]

Thats great way to make slides.

Thank you,

 

Lee MacDialog

[BLOACH85]

Hey i got My slide to insert but as soon as i press the accept (ok) button the slide goes away. Why is this?