wxRuby尝鲜

阅读更多

更新：终于成功弄到显示行号并自适应宽度了~

 

wxRuby最好玩的地方是它对wxWidgets多加了一层糖衣的语法。

 

安装了

 

gem install wxruby

 

之后，还要安装

 

gem install wx_sugar

 

这样子，我们不仅具有了一些:param_name => value这样的糖衣，可以使用attr_*族来暴露实例变量，还有了用do...end块来做layout和菜单的能力，比较爽的一点还有用block来处理事件。

 

简单讲解一下怎么使用:param_name => value这样的糖衣：比如wxRuby中某函数f(a,b)，有了wx_sugar之后，就可以写f(:a=>5, :b=>'string')来调用。

 

下面这个小程序使用了wxAUI和wxStyledTextCtrl。用途是在非常长的文本文件中，同时搜索多个关键字，建立索引，包含上下文和定位的链接。

 

multi_searcher.rb

 

require 'rubygems'
require 'wx'
require 'wx_sugar/all'
require 'erb'
require 'ya2yaml'

include Wx

$KCODE = 'utf8'

def min(a, b)
	a >= b ? b : a
end

def max(a, b)
	a >= b ? a : b
end

class KeywordsPane < Panel
	def initialize(parent, options = {})
		super(parent, options.merge!(:size => [500, 500]))
		arrange_vertically do
			add @keyword = TextCtrl.new(self, :style => Wx::TE_MULTILINE, :size => [-1, 200]), :proportion => 1			
			
			arrange_horizontally do
				add @status = StaticText.new(self, :label => '', :size => [150, -1]), :proportion => 1
				add Button.new(self, :label => '查找') do |button|
					evt_button(button) do |event|
						#search
						get_parent.filecontent_pane.search(@keyword.get_value)
					end					
				end				
			end
		end		
	end
	
	attr_reader :keyword, :status
end

class ReportPane < Panel 
	def initialize(parent, options = {})
		super(parent, options.merge!(:size => [500, 500]))
		arrange_vertically do
			add @report = HtmlWindow.new(self), :proportion => 1 do |report|
				evt_html_link_clicked(report) do | event |
					position = event.get_link_info.get_href.sub(/position\:\/\//, '').split(',')
					get_parent.filecontent_pane.file.set_selection position[0].to_i, position[1].to_i
				end
			end
			add Button.new(self, :label => '保存报告') do |button|
				evt_button(button) do |event|
					ask4file = FileDialog.new(self, :style => FD_SAVE, :message => '保存报告', :wildcard => 'HTML files(*.html)|*.html')
					File.new(ask4file.get_path, 'w').write @report_text if ask4file.show_modal == Wx::ID_OK
				end
			end
		end
		
	end
	
	attr_reader :report
	attr_writer :report_text
end

class FilecontentPane < Panel 
	def initialize(parent, options = {})
		super(parent, options.merge!(:size => [500, 500]))
		
		arrange_vertically do
			add Button.new(self, :label => '打开要查找的文件') do |button|
				evt_button(button) do |event|
					#open file
					ask4file = FileDialog.new(self, :message => '打开要查找的文件')
					@file.load_file(ask4file.get_path) if ask4file.show_modal == Wx::ID_OK
					# auto adapt to the width of max line count
					@file.set_margin_width 0, @file.text_width(33, "__#{@file.get_line_count}") 
				end
			end
			add @file = StyledTextCtrl.new(self), :proportion => 1
			@file.set_margin_width 0, @file.text_width(33, '999') # show line number
			add StaticText.new(self, :label => '小提示：按住Ctrl+鼠标滚轮可以缩放文字大小')
		end
	end
	
	def search(keywords)
		keywords_a = keywords.split(', ')
		@search_result = {}
		file_length = @file.get_text_length
		
		beg_pos = 0		
		
		keywords_a.each do |k|
			@search_result[k] = []
			
			@file.goto_pos 0
			@file.search_anchor
			
			while((beg_pos = @file.search_next(0,k)) != -1)				
				
			    end_pos = beg_pos + k.length
				
				context = @file.get_text_range max(beg_pos - 520, 0), min(end_pos + 520, file_length)
				
				context.gsub! k, '\0'	
				# coord = [@file.line_from_position(beg_pos), @file.get_column(beg_pos)]
				@search_result[k] << { :context => context, :position => [beg_pos, end_pos], :coord => [@file.line_from_position(beg_pos), @file.get_column(beg_pos)]}
				
				get_parent.keywords_pane.status.set_label "正在搜索#{k}...完成%3.2f%% ..." % (beg_pos * 100.0 / file_length)	
				
				@file.goto_pos end_pos + 1
				@file.search_anchor
			end
		end
		get_parent.keywords_pane.status.set_label '搜索完成，正在生成报告...'
		get_parent.report_pane.report.set_page report_text = ERB.new(File.read('report.html.erb'), 0, "%<>").result(binding)
			
		get_parent.keywords_pane.status.set_label ''
		get_parent.report_pane.report_text = report_text
	end	
	
	attr_reader :file
end

class MyFrame < Frame
   def initialize(title)
		super(nil, :title => title, :size => [800, 600])
		@mgr = AuiManager.new
		@mgr.set_managed_window(self)
		
		pi = AuiPaneInfo.new
		pi.set_name('keywords_pane').set_caption('在下面键入关键字，每个关键字之间用 一个逗号一个空格 隔开（例如keyword1, keyword2）：')
		pi.top.set_maximize_button.set_close_button(false)		
		@mgr.add_pane(@keywords_pane = KeywordsPane.new(self), pi)
				
		pi = AuiPaneInfo.new
		pi.set_name('report_pane').set_caption('查找结果报告')
		pi.left.set_maximize_button.set_close_button(false)		
		@mgr.add_pane(@report_pane = ReportPane.new(self), pi)
		
		pi = AuiPaneInfo.new
		pi.set_name('filecontent_pane').set_caption('被查找文件')
		pi.center.set_maximize_button.set_close_button(false)
		@mgr.add_pane(@filecontent_pane = FilecontentPane.new(self), pi)	
		
		@mgr.update
   end
   
   attr_reader :keywords_pane, :report_pane, :filecontent_pane
end


class MyApp < App
   def on_init
     frame = MyFrame.new('多关键字搜索助手')
     frame.show
   end
end

a = MyApp.new
a.main_loop

 

 

程序中使用的erb模板report.html.erb:

 

<% @search_result.each do |keyword, info| %>
<%= keyword %>(找到<%= info.length %>处)

<% unless info.empty? %>
	
		<% info.each do |v|%>
			
		<% end %>
	

		

			
位置
			
上下文
		

				
'><%= "#{v[:coord][0]}行#{v[:coord][1]}列" %>
				
<%= v[:context] %>
			
<% end %>

<% end %>