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

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

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

revision 62170 by manus, Sun Jul 30 06:13:48 2006 UTC revision 62171 by larryl, Tue Aug 1 01:27:17 2006 UTC
# Line 17  inherit Line 17  inherit
17                          mini_pixmap,                          mini_pixmap,
18                          new_toolbar_item,                          new_toolbar_item,
19                          new_mini_toolbar_item,                          new_mini_toolbar_item,
20                            new_sd_toolbar_item,
21                          tooltext                          tooltext
22                  end                  end
23    
# Line 67  feature -- Access Line 68  feature -- Access
68                          Result.drop_actions.extend (agent drop_cluster)                          Result.drop_actions.extend (agent drop_cluster)
69                  end                  end
70    
71            new_sd_toolbar_item (display_text: BOOLEAN): EB_SD_COMMAND_TOOL_BAR_BUTTON is
72                            -- Create tool bar button for docking.
73                    do
74                            Result := Precursor (display_text)
75                            Result.drop_actions.extend (agent drop_class)
76                            Result.drop_actions.extend (agent drop_cluster)
77                    end
78    
79  feature -- Properties  feature -- Properties
80    
81          description: STRING is          description: STRING is
# Line 86  feature -- Properties Line 95  feature -- Properties
95    
96          pixmap: EV_PIXMAP is          pixmap: EV_PIXMAP is
97                          -- Pixmap representing `Current' in toolbars.                          -- Pixmap representing `Current' in toolbars.
98                  once                  do
99                          Result := pixmaps.icon_pixmaps.general_delete_icon                          Result := pixmaps.icon_pixmaps.general_delete_icon
100                  end                  end
101    
102            pixel_buffer: EV_PIXEL_BUFFER is
103                            -- Pixel buffer representing the command.
104                    do
105                            Result := pixmaps.icon_pixmaps.general_delete_icon_buffer
106                    end
107    
108          mini_pixmap: EV_PIXMAP is          mini_pixmap: EV_PIXMAP is
109                          -- Pixmap representing `Current' in toolbars.                          -- Pixmap representing `Current' in toolbars.
110                  do                  do

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

  ViewVC Help
Powered by ViewVC 1.1.23