indexing
	description: "Captures commonalities in the visual versions of the"
                        "pieces used for designing and solving puzzles."

deferred 
  class V_PIECE

inherit

  WEL_CONTROL_WINDOW
  rename
 --   move as wc_move, 
    make as wc_make, restore as wc_restore
  redefine
    on_paint, class_background
  end

  PIECE

feature{NONE}

feature

  bitmap : WEL_BITMAP
  -- Current bitmap for the piece.

  on_paint (paint_dc: WEL_PAINT_DC; invalid_rect: WEL_RECT) is
  -- Draw my bitmap
  do
     paint_dc.draw_bitmap (bitmap, 0, 0, width, height )
  end

  raise is
  -- Raise this window to the top of the stacking order.
  -- Different for Control windows than frames, see V_SHELL
  do
--   set_z_order( hwnd_topmost )
--   set_z_order( hwnd_top )
--     set_z_order( hwnd_notopmost )
     set_z_order( hwnd_bottom )
  end

  invert is
  -- swap my foreground and background colors.
  --local tmp : COLOR 
  do
  --  tmp := fg_color
  --  set_fg_color( bg_color )
  --  set_bg_color( tmp )
  --  set_bitmap
  ensure
  --  fg_color = old bg_color
  --  bg_color = old fg_color
  end

  class_background : WEL_NULL_BRUSH is
  do
    !!Result.make
  end

end