Class: HinnerSplittedDialogTitled

Inherits:
HinnerSplittedDialog show all
Defined in:
lib/a-tkcommons.rb

Direct Known Subclasses

RunnerManager

Instance Attribute Summary collapse

Attributes inherited from HinnerSplittedDialog

#frame, #splitter_frame

Instance Method Summary collapse

Methods inherited from HinnerSplittedDialog

#height

Methods inherited from HinnerDialog

#is_modal?, #make_scrollable_frame, #release, #show_modal

Constructor Details

#initialize(title = nil, side = 'top', height = 100, args = nil) ⇒ HinnerSplittedDialogTitled

Returns a new instance of HinnerSplittedDialogTitled.


3377
3378
3379
3380
3381
3382
3383
3384
3385
3386
3387
3388
3389
3390
# File 'lib/a-tkcommons.rb', line 3377

def initialize(title=nil, side='top', height=100, args=nil)
  super(side, height, args)
  @titled_frame = TkLabelTitledFrameClosable.new(self.frame, title).place('x'=>0, 'y'=>0,'relheight'=>1, 'relwidth'=>1)
  @ext_proc = nil
  close = proc{
    do_close
    #self.destroy
    #Tk.callback_break
  }
  @titled_frame.add_close_action(close)
  @hinner_frame = @titled_frame.frame
  #@hinner_frame = make_scrollable_frame(@titled_frame.frame)
  #@hinner_frame = Tk::ScrollFrame.new(@titled_frame.frame).place('x'=>0, 'y'=>0, 'relheight'=>1, 'relwidth'=>1).baseframe
end

Instance Attribute Details

#hinner_frameObject

Returns the value of attribute hinner_frame


3376
3377
3378
# File 'lib/a-tkcommons.rb', line 3376

def hinner_frame
  @hinner_frame
end

#titled_frameObject

Returns the value of attribute titled_frame


3376
3377
3378
# File 'lib/a-tkcommons.rb', line 3376

def titled_frame
  @titled_frame
end

Instance Method Details

#do_closeObject


3392
3393
3394
3395
3396
# File 'lib/a-tkcommons.rb', line 3392

def do_close
  @ext_proc.call if !@ext_proc.nil?
  self.destroy
  Tk.callback_break
end

#on_close=(_proc) ⇒ Object


3398
3399
3400
# File 'lib/a-tkcommons.rb', line 3398

def on_close=(_proc)
  @ext_proc = _proc
end