WoColorGrid Function

Creates a grid of color squares from the current color table.

Usage

widget = WoColorGrid(parent)

Input Parameters

parent — A string containing the widget ID of the parent widget.

Returned Value

widget — The widget ID of the color grid.

Keywords

Title — Specifies a string containing the title of the color grid.

Model — Specifies a string containing the color model used for the color grid ('RGB', 'HLS', or 'HSV').

Range — A 2-element integer array specifying the range of color values in the color grid. The default range is [0, (!D.Table_Size – 1)].

Area — If present and nonzero, the drawing area widget ID is returned.

Num_Columns — An integer specifying the number of columns in the color grid. The default configuration is a square grid, where the number of rows and columns is equal.

Cell_Size — A 2-element integer array specifying the size of each color cell, in pixels. The cells must be square. By default, the cells are 20-by-20 pixels.

Attachment Keywords

Bottom — If a widget ID is specified (for example, Bottom=wid), then the bottom of the color grid is attached to the top of the specified widget. If no widget ID is specified (for example, /Bottom), then the bottom of the color grid is attached to the bottom of the parent widget.

Left — If a widget ID is specified (for example, Left=wid), then the left side of the color grid is attached to the right side of the specified widget. If no widget ID is specified (for example, /Left), then the left side of the color grid is attached to the left side of the parent widget.

Right — If a widget ID is specified (for example, Right=wid), then the right side of the color grid is attached to the left side of the specified widget. If no widget ID is specified (for example, /Right), then the right side of the color grid is attached to the right side of the parent widget.

Top — If a widget ID is specified (for example, Top=wid), then the top of the color grid is attached to the bottom of the specified widget. If no widget ID is specified (for example, /Top), then the top of the color grid is attached to the top of the parent widget.

Discussion

This function is used by the WzColorEdit VDA Tool and by the WoColorButton function.

Example

This example code displays a color grid with a button that allows you to cycle through different color hues.

; This is the callback that is called when the "Cycle" or "Quit" 

; button is pressed. If "Cycle" is pressed, the hues in the color 

; grid are incremented so the colors will change. If the "Quit" 

; button is pressed, the shell is destroyed.

PRO ButtonCB, wid, which

   DECLARE FUNC, WoColorGridGetValue

   ; Get the user data that was set earlier.

   cb_data = WwGetValue (wid, /Userdata)

   CASE which OF

   1: BEGIN ; Cycle

      ; Get the currently-displayed colors.

      colors = WoColorGridGetValue (cb_data.grid, 0, $

         cb_data.num_colors)

      ; Add to the hues, so the colors will change. If the new 

      ; values are greater than 360, set them back to a reason

      ; able value by subtracting 360.

      new_hues = colors(0, *) + cb_data.num_colors

      too_big_indices = WHERE(new_hues GE 360)

      ndim_too_big = SIZE(too_big_indices, /Ndim)

      IF ndim_too_big GT 0 THEN $

         new_hues(too_big_indices) = $

         new_hues(too_big_indices) - 360

      colors(0, *) = new_hues

      ; Change the colors displayed in the color grid.

      WoColorGridSetValue, cb_data.grid, 0, colors

      END

   2: BEGIN ; Quit

      status = WwSetValue (cb_data.top, /Close)

      END

   ENDCASE

END

; This procedure demonstrates the use of the WoColorGrid,

; WoColorGridSetValue, and WoColorGridGetValue functions. It 

; displays a shell window containing a color grid, and allows the 

; user to cycle the color hues by pressing the "Cycle" button.

PRO WoColorGrid_test

   DECLARE FUNC, WoColorGrid

   ; Load the bottom of the color table with interesting colors.

   ; tek_color. We'll display 20 colors in the color grid.

   num_colors = 20

   ; Initialize Wave Widgets, and create the color grid and the 

   ; push buttons. Note that we’re using HLS as the color model 

   ; for the color grid.

   top = WwInit ('WoColorGrid_test', 'wocolorgrid_test', $

      layout,  /Vertical, title = 'Color Grid Test')

   grid = WoColorGrid (layout, Title = 'Color Grid', $

      Model = 'HLS', Range = [0, (num_colors - 1)])

   button_wid = WwButtonBox (layout, ['Cycle', 'Quit'], $

      'ButtonCB', buttons = buttons)

   ; Attach user data to the buttons, so we can access it from 

   ; the button callback.

   cb_data = {, top: top, grid: grid, num_colors: num_colors}

   FOR i=0L, (N_ELEMENTS(buttons)-1) DO BEGIN

      status = WwSetValue (buttons(i), Userdata = cb_data)

   ENDFOR

   ; Display the color grid.

   status = WwSetValue (top, /Display)

   WwLoop, /NoBlock

END

See Also

WoColorGridGetValue, WoColorGridSetValue