AfraLisp Blog

The AutoLisp/Visual Lisp/VBA Resource Website

AfraLisp Blog

Home Newsletter Utter Rubbish Coding Tips AutoCAD Tips Contact Downloads WAUN

color

color

Color.

This attribute specifies the background (fill) colour of an image.
Possible values are an integer or reserved word (default: 7) specified as an AutoCAD colour number or as one of the symbolic names as shown in the following table: 

dialog_line		Current dialog box line colour
dialog_foreground	Current dialog box foreground colour
dialog_background	Current dialog box background colour
graphics_background	Current background of the AutoCAD graphics screen.
			(Usually equivalent to 0)
black			AutoCAD colour = 0 (black) (appears light on a
			black background)
red			AutoCAD colour = 1 (red)
yellow			AutoCAD colour = 2 (yellow)
green			AutoCAD colour = 3 (green)
cyan			AutoCAD colour = 4 (cyan)
blue			AutoCAD colour = 5 (blue)
magenta			AutoCAD colour = 6 (magenta)
white			AutoCAD colour = 7 (white)
graphics_foreground	Appears black on a light background

Note: If an image tile containing slides is blank when you first display it, try changing it's color attribute to graphics_background or graphics_foreground.


DCL Code Sample 

lisp49q : dialog {				//dialog name
          label = "color" ;			//give it a label
  
        : row {					//begin row
	  children_fixed_height = true;		//fix the height
	  children_alignment = centered;

        : image {				//define image tile
          key = "im1" ;				//give it a name
          height = 1.0 ;			//and a height
          width = 2.0 ;				//and now a width
   	  color = green;       			//set the colour
        }					//end image

        : image {				//define image tile
          key = "im2" ;				//give it a name
          height = 1.0 ;			//and a height
          width = 2.0 ;				//and now a width
   	  color = dialog_line; 			//set the colour
        }					//end image

        : image {				//define image tile
          key = "im3" ;				//give it a name
          height = 1.0 ;			//and a height
          width = 2.0 ;				//and now a width
   	  color = blue;				//set the colour
        }					//end image

        : image {				//define image tile
          key = "im4" ;				//give it a name
          height = 1.0 ;			//and a height
          width = 2.0 ;				//and now a width
   	  color = red;				//set the colour
        }					//end image

        : image {				//define image tile
          key = "im5" ;				//give it a name
          height = 1.0 ;			//and a height
          width = 2.0 ;				//and now a width
   	  color = cyan;       			//set the colour
        }					//end image

	}					//end row


        ok_cancel ;				//predefined OK/Cancel button

        }					//end dialog
 
The AutoLisp/Visual Lisp/VBA Resource Website

Copyright © 1999-Perpetuity by AfraLisp

All rights reserved.
Information in this document is subject to change without notice.
Site created and maintained by Kenny Ramage

The AutoLisp/Visual Lisp/VBA Resource Website