Class: Findview

Inherits:

TkFloatTitledFrame

• Object
• TkFrame
• TkBaseTitledFrame
• TkFloatTitledFrame
• Findview

Defined in:

ext/ae-editor/ae-editor.rb

Direct Known Subclasses

Find

Constant Summary

Constants included from TkResizable

TkResizable::MIN_HEIGHT, TkResizable::MIN_WIDTH

Instance Attribute Summary

Attributes inherited from TkBaseTitledFrame

#frame, #top

Instance Method Summary

• #initialize(_parent) ⇒ Findview constructor

  A new instance of Findview.

• #show ⇒ Object

Methods inherited from TkFloatTitledFrame

#head_buttons, #hide, #on_close=, #show_grabbed, #title

Methods included from TkResizable

#resizing_do_move_obj, #resizing_do_press, #start_resizing, #stop_resizing

Methods included from TkMovable

#moving_do_move_obj, #moving_do_press, #start_moving, #stop_moving

Methods inherited from TkBaseTitledFrame

#add_button, #add_menu_button, #create_frame, #head_buttons, #menu_button

Constructor Details

#initialize(_parent) ⇒ Findview

Returns a new instance of Findview.

# File 'ext/ae-editor/ae-editor.rb', line 3485

def initialize(_parent)
  super(_parent)
  #stop_resizing
  y0 = 10
  d = 23    
  TkLabel.new(self.frame, Arcadia.style('label')){
 	  text 'Find what:'
 	  place('x' => 8,'y' => y0,'height' => 19)
  }
  y0 = y0 + d
  @e_what = Tk::BWidget::ComboBox.new(self.frame, Arcadia.style('combobox')){
    editable true
    justify  'left'
    #relief  'ridge'
    autocomplete 'true'
    expand 'tab'
    takefocus 'true'
    #pack('padx'=>10, 'fill'=>'x')
    place('relwidth' => 1, 'width'=>-16,'x' => 8,'y' => y0,'height' => 19)
  }
  @e_what_entry = TkWinfo.children(@e_what)[0]

  @e_what_entry.bind_append("1",proc{Arcadia.process_event(InputEnterEvent.new(self,'receiver'=>@e_what_entry))})

  y0 = y0 + d
  TkLabel.new(self.frame, Arcadia.style('label')){
 	  text 'Replace with:'
 	  place('x' => 8,'y' => y0,'height' => 19)
  }
  y0 = y0 + d
 
  @e_with = Tk::BWidget::ComboBox.new(self.frame, Arcadia.style('combobox')){
    editable true
    justify  'left'
    autocomplete 'true'
    expand 'tab'
    takefocus 'true'
    #pack('padx'=>10, 'fill'=>'x')
    place('relwidth' => 1, 'width'=>-16,'x' => 8,'y' => y0,'height' => 19)
  }
  @e_with_entry = TkWinfo.children(@e_with)[0]

  @e_with_entry.bind_append("1",proc{Arcadia.process_event(InputEnterEvent.new(self,'receiver'=>@e_with_entry))})
  
  y0 = y0 + d
  @cb_reg = TkCheckButton.new(self.frame, Arcadia.style('checkbox')){|_cb_reg|
    text  'Use Regular Expression'
    justify  'left'
    #relief  'flat'
    #pack('side'=>'left', 'anchor'=>'e')
    place('x' => 8,'y' => y0,'height' => 22)
  }
  y0 = y0 + d
  @cb_back = TkCheckButton.new(self.frame, Arcadia.style('checkbox')){|_cb_reg|
    text  'Search backwards'
    justify  'left'
    #relief  'flat'
    #pack('side'=>'left', 'anchor'=>'e')
    place('x' => 8,'y' => y0,'height' => 22)
  }
  
  y0 = y0 + d
  y0 = y0 + d
  @buttons_frame = TkFrame.new(self.frame, Arcadia.style('panel')).pack('fill'=>'x', 'side'=>'bottom')	

  @b_replace_all = TkButton.new(@buttons_frame, Arcadia.style('button')){|_b_go|
  		state 'disabled'
    default  'disabled'
    text  'Replace All'
    #overrelief  'raised'
    justify  'center'
    #width 15
    pack('side'=>'right','ipadx'=>5, 'padx'=>5)
    #place('width' => 50,'x' => 0,'y' => y0,'height' => 23,'bordermode' => 'inside')
  }


  @b_replace = TkButton.new(@buttons_frame, Arcadia.style('button')){|_b_go|
  		state 'disabled'
    default  'disabled'
    text  'Replace'
    #overrelief  'raised'
    justify  'center'
    #width 15
    pack('side'=>'right','ipadx'=>5, 'padx'=>5)
    #place('width' => 50,'x' => 0,'y' => y0,'height' => 23,'bordermode' => 'inside')
  }

  
  @b_go = TkButton.new(@buttons_frame, Arcadia.style('button')){|_b_go|
    compound  'none'
    default  'disabled'
    text  'Find Next'
    #background  '#ffffff'
    #image TkPhotoImage.new('dat' => FIND_GIF)
    #overrelief  'raised'
    justify  'center'
    #relief  'ridge'
    #width 15
    pack('side'=>'right','ipadx'=>5, 'padx'=>5)
    #place('width' => 50,'x' => 0,'y' => y0,'height' => 23,'bordermode' => 'inside')
  }
  #place('x'=>0,'y'=>0,'relheight'=> 1,'relwidth'=> 1)
  place('x'=>100,'y'=>100,'height'=> 220,'width'=> 300)
  
end

Instance Method Details

#show ⇒ Object

# File 'ext/ae-editor/ae-editor.rb', line 3592

def show
  super
  self.focus
  @e_what.focus
  @e_what_entry.selection_range(0,'end')
end