/[eiffelstudio]/branches/Eiffel_57_docking/Src/Eiffel/interface/new_graphical/commands/eb_change_color_command.e
ViewVC logotype

Diff of /branches/Eiffel_57_docking/Src/Eiffel/interface/new_graphical/commands/eb_change_color_command.e

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 62170 by manus, Sun Jul 30 06:18:25 2006 UTC revision 62171 by larryl, Tue Aug 1 01:27:17 2006 UTC
# Line 31  feature -- Basic operations Line 31  feature -- Basic operations
31                  do                  do
32                          create change_color_dialog                          create change_color_dialog
33                          change_color_dialog.set_color (bon_class_fill_color)                          change_color_dialog.set_color (bon_class_fill_color)
34                          change_color_dialog.show_modal_to_window (tool.development_window.window)                          change_color_dialog.show_modal_to_window (tool.develop_window.window)
35    
36                          create class_list.make (20)                          create class_list.make (20)
37                          create old_color_table.make (20)                          create old_color_table.make (20)
# Line 82  feature {NONE} -- Implementation Line 82  feature {NONE} -- Implementation
82                  do                  do
83                          create change_color_dialog                          create change_color_dialog
84                          change_color_dialog.set_color (bon_class_fill_color)                          change_color_dialog.set_color (bon_class_fill_color)
85                          change_color_dialog.show_modal_to_window (tool.development_window.window)                          change_color_dialog.show_modal_to_window (tool.develop_window.window)
86    
87                          create class_list.make (1)                          create class_list.make (1)
88                          create old_color_table.make (1)                          create old_color_table.make (1)
# Line 123  feature {NONE} -- Implementation Line 123  feature {NONE} -- Implementation
123                          if cf /= Void then                          if cf /= Void then
124                                  create change_color_dialog                                  create change_color_dialog
125                                  change_color_dialog.set_color (cf.background_color)                                  change_color_dialog.set_color (cf.background_color)
126                                  change_color_dialog.show_modal_to_window (tool.development_window.window)                                  change_color_dialog.show_modal_to_window (tool.develop_window.window)
127                                  if not change_color_dialog.color.is_equal (cf.background_color) then                                  if not change_color_dialog.color.is_equal (cf.background_color) then
128                                          history.do_named_undoable (                                          history.do_named_undoable (
129                                                  Interface_names.t_Diagram_change_color_cmd,                                                  Interface_names.t_Diagram_change_color_cmd,
# Line 143  feature {NONE} -- Implementation Line 143  feature {NONE} -- Implementation
143                  do                  do
144                          create change_color_dialog                          create change_color_dialog
145                          change_color_dialog.set_color (bon_class_fill_color)                          change_color_dialog.set_color (bon_class_fill_color)
146                          change_color_dialog.show_modal_to_window (tool.development_window.window)                          change_color_dialog.show_modal_to_window (tool.develop_window.window)
147    
148                          l_classes := a_list.classes                          l_classes := a_list.classes
149                          create old_color_table.make (l_classes.count)                          create old_color_table.make (l_classes.count)
# Line 235  feature {NONE} -- Implementation Line 235  feature {NONE} -- Implementation
235                          Result := pixmaps.icon_pixmaps.diagram_choose_color_icon                          Result := pixmaps.icon_pixmaps.diagram_choose_color_icon
236                  end                  end
237    
238            pixel_buffer: EV_PIXEL_BUFFER is
239                            -- Pixel buffer representing the command.
240                    do
241                            -- Currently there is no pixel buffer for this command.
242                    end
243                    
244          tooltip: STRING is          tooltip: STRING is
245                          -- Tooltip for the toolbar button.                          -- Tooltip for the toolbar button.
246                  do                  do

Legend:
Removed from v.62170  
changed lines
  Added in v.62171

  ViewVC Help
Powered by ViewVC 1.1.23