Develop and Download Open Source Software

Browse CVS Repository

Diff of /exerb/exerb-studio/exerb-studio.rb

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

revision 1.2 by yuya, Fri Jun 6 01:39:26 2003 UTC revision 1.3 by yuya, Thu Jun 12 04:04:00 2003 UTC
# Line 2  Line 2 
2    
3  # $Id$  # $Id$
4    
5    require 'uconv'
6    require 'rexml/document'
7  require 'vr/vruby'  require 'vr/vruby'
8  require 'vr/vrcontrol'  require 'vr/vrcontrol'
9  require 'vr/vrcomctl'  require 'vr/vrcomctl'
10  require 'vr/vrdialog'  require 'vr/vrdialog'
11    require 'vrext/vrext'
12    
13  require 'form/form'  require 'form/form'
14  require 'model/model'  require 'model/model'
15  require 'node/node'  #require 'node/node'
16    
17  #EDITOR = '/home/yuya/bin/hidemaru'  #EDITOR = '/home/yuya/bin/hidemaru'
18  EDITOR = '/home/yuya/bin/rde'  EDITOR = '/home/yuya/bin/rde'
19    
 module WStyle  
   
   SS_ETCHEDHORZ  = 16  
   
 end  
   
20  class MainForm < VRForm  class MainForm < VRForm
21    
22    include VRMenuUseable    include VRMenuUseable
# Line 61  class MainForm < VRForm Line 59  class MainForm < VRForm
59    
60    def create_controls    def create_controls
61      @imglist = VRLocalScreen.factory.newimagelist(16, 16)      @imglist = VRLocalScreen.factory.newimagelist(16, 16)
62  #    @imglist.addicon('res/folder_close.ico')      @imglist.addicon('res/folder_close.ico')
63  #    @imglist.addicon('res/folder_open.ico')      @imglist.addicon('res/folder_open.ico')
64  #    @imglist.addicon('mail.ico')      @imglist.addicon('mail.ico')
65    
66      self.addStatusbar("status bar")      self.addStatusbar("status bar")
67    
# Line 77  class MainForm < VRForm Line 75  class MainForm < VRForm
75      font = @screen.factory.newfont("Terminal", 14)      font = @screen.factory.newfont("Terminal", 14)
76      [@lab1, @lab2, @tree].each { |ctrl| ctrl.setFont(font) }      [@lab1, @lab2, @tree].each { |ctrl| ctrl.setFont(font) }
77    
78      exerb = Node::Group.new("Exerb")      project = Model::Project.loadxml('sample.xml')
79      exerb << Node::File.new("exerb.rb", "/home/yuya/dev/exerb/bin/exerb.rb")      project.create_node(@tree, WConst::TVI_ROOT)
     vr = Node::Group.new("VisualuRuby")  
     vr << Node::File.new("vruby.rb", "/usr/local/lib/ruby/site_ruby/1.6/vr/vruby.rb")  
     root  = Node::Group.new("Root")  
     root << exerb  
     root << vr  
     root.create_node(@tree, WConst::TVI_ROOT)  
80    end    end
81    protected :create_controls    protected :create_controls
82    
# Line 97  class MainForm < VRForm Line 89  class MainForm < VRForm
89    end    end
90    
91    def tree_selchanged(hitem, lparam)    def tree_selchanged(hitem, lparam)
92      @tree_selected_item = Node::Store.get(@tree.getItemLParamOf(hitem))      @tree_selected_item = Model::Store.get(@tree.getItemLParamOf(hitem))
93      if @tree_selected_item      if @tree_selected_item
94        @lab1.caption = @tree_selected_item.name        @lab1.caption = @tree_selected_item.name
95        @lab2.caption = (@tree_selected_item.kind_of?(Node::File) ? @tree_selected_item.filepath : '')        @lab2.caption = (@tree_selected_item.kind_of?(Model::File) ? @tree_selected_item.filepath : '')
96      end      end
97    end    end
98    
# Line 108  class MainForm < VRForm Line 100  class MainForm < VRForm
100    end    end
101    
102    def tree_dblclicked    def tree_dblclicked
103      if @tree_selected_item && @tree_selected_item.kind_of?(Node::File)      if @tree_selected_item && @tree_selected_item.kind_of?(Model::File)
104        editor(@tree_selected_item.filepath)        editor(@tree_selected_item.filepath)
105      end      end
106    end    end

Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3

Back to OSDN">Back to OSDN
ViewVC Help
Powered by ViewVC 1.1.26