Class: AGTkVSplittedFrames
- Inherits:
-
AGTkSplittedFrames
- Object
- TkFrame
- TkFrameAdapter
- AGTkSplittedFrames
- AGTkVSplittedFrames
- Defined in:
- lib/a-tkcommons.rb
Instance Attribute Summary collapse
-
#left_frame ⇒ Object
readonly
Returns the value of attribute left_frame.
-
#right_frame ⇒ Object
readonly
Returns the value of attribute right_frame.
-
#splitter_frame ⇒ Object
readonly
Returns the value of attribute splitter_frame.
Attributes inherited from AGTkSplittedFrames
Attributes inherited from TkFrameAdapter
Instance Method Summary collapse
- #do_resize ⇒ Object
- #get_main_x ⇒ Object
- #hide(_name) ⇒ Object
- #hide_left ⇒ Object
- #hide_right ⇒ Object
-
#initialize(parent = nil, frame = nil, width = 10, slen = 5, perc = false, user_control = true, keys = nil) {|_self| ... } ⇒ AGTkVSplittedFrames
constructor
A new instance of AGTkVSplittedFrames.
- #is_left_hide? ⇒ Boolean
- #maximize(_frame) ⇒ Object
- #minimize(_frame) ⇒ Object
- #move_splitter(_gapx = 0, _gapy = 0) ⇒ Object
- #resize_left(_new_width) ⇒ Object
- #show(_name) ⇒ Object
- #show_left ⇒ Object
Methods inherited from TkFrameAdapter
#attach_frame, #detach_frame, #is_pack?, #is_place?, #is_undefined?, #layout_manager, #map, #refresh_layout_manager, #unmap
Constructor Details
#initialize(parent = nil, frame = nil, width = 10, slen = 5, perc = false, user_control = true, keys = nil) {|_self| ... } ⇒ AGTkVSplittedFrames
Returns a new instance of AGTkVSplittedFrames.
409 410 411 412 413 414 415 416 417 418 419 420 421 422 423 424 425 426 427 428 429 430 431 432 433 434 435 436 437 438 439 440 441 442 443 444 445 446 447 448 449 450 451 452 453 454 455 456 457 458 459 460 461 462 463 464 465 466 467 468 469 470 471 472 473 474 475 476 477 478 479 480 481 482 483 484 485 486 487 488 489 490 491 492 493 494 495 496 497 498 499 500 501 502 503 504 505 506 507 508 509 510 511 512 513 514 |
# File 'lib/a-tkcommons.rb', line 409 def initialize(parent=nil, frame=nil, width=10, slen=5, perc=false, user_control=true, keys=nil) super(parent, frame, width, slen, user_control, keys) @left_frame = TkFrame.new(self, Arcadia.style('panel')) @frame1 = @left_frame if perc p_width = TkWinfo.screenwidth(self) x = (p_width/100*width).to_i else x = width end @left_frame.place( 'relx' => 0, 'x' => 0, 'y' => '0', 'relheight' => '1', 'rely' => 0, 'bordermode' => 'inside', 'width' => x ) @left_frame_obj = AGTkObjPlace.new(@left_frame, 'x', nil, false) @left_frame_obj.width = x @left_frame_obj.height = 0 @left_frame_obj.relwidth = 0 @left_frame_obj.relheight = 1 @splitter_frame = TkFrame.new(self, Arcadia.style('splitter')) @splitter_frame.place( 'relx' => 0, 'x' => x, 'y' => '0', 'relheight' => '1', 'rely' => 0, 'bordermode' => 'inside', 'width' => @slen ) if @user_control @splitter_frame.bind_append( "ButtonRelease-1", proc{do_resize} ) = Arcadia.wf.(@splitter_frame){ image Arcadia.image_res(VERTICAL_SPLITTER_HIDE_LEFT_GIF) } # _xbutton = TkButton.new(@splitter_frame, Arcadia.style('toolbarbutton')){ # background '#4966d7' # } .place( 'x' => 0, 'y' => 0, 'relwidth' => 1, 'bordermode' => 'outside', 'height' => 20 ) .bind_append( "ButtonPress-1", proc{hide_left} ) = Arcadia.wf.(@splitter_frame){ image Arcadia.image_res(VERTICAL_SPLITTER_HIDE_RIGHT_GIF) } # _ybutton = TkButton.new(@splitter_frame, Arcadia.style('toolbarbutton')){ # background '#118124' # } .place( 'x' => 0, 'y' => 21, 'bordermode' => 'outside', 'height' => 20, 'relwidth' => 1 ) .bind_append( "ButtonPress-1", proc{hide_right} ) end #----- #----- @splitter_frame_obj = AGTkObjPlace.new(@splitter_frame, 'x', nil, @user_control) @splitter_frame_obj.width = @slen @splitter_frame_obj.height = 0 @splitter_frame_obj.relwidth = 0 @splitter_frame_obj.relheight = 1 x = x + @slen @right_frame = TkFrame.new(self, Arcadia.style('panel')) @frame2 = @right_frame @right_frame.place( 'relwidth' => 1, 'relx' => 0, 'x' => x, 'y' => 0, 'width' => -x, 'relheight' => 1, 'rely' => 0, 'bordermode' => 'inside' ) @right_frame_obj = AGTkObjPlace.new(@right_frame, 'x', nil, false) @right_frame_obj.width = -x @right_frame_obj.height = 0 @right_frame_obj.relwidth = 1 @right_frame_obj.relheight = 1 @state = 'middle' yield(self) if block_given? end |
Instance Attribute Details
#left_frame ⇒ Object (readonly)
Returns the value of attribute left_frame.
408 409 410 |
# File 'lib/a-tkcommons.rb', line 408 def left_frame @left_frame end |
#right_frame ⇒ Object (readonly)
Returns the value of attribute right_frame.
408 409 410 |
# File 'lib/a-tkcommons.rb', line 408 def right_frame @right_frame end |
#splitter_frame ⇒ Object (readonly)
Returns the value of attribute splitter_frame.
408 409 410 |
# File 'lib/a-tkcommons.rb', line 408 def splitter_frame @splitter_frame end |
Instance Method Details
#do_resize ⇒ Object
524 525 526 527 528 529 530 531 |
# File 'lib/a-tkcommons.rb', line 524 def do_resize _x = @splitter_frame_obj.x0 _w = @splitter_frame_obj.w @left_frame_obj.width = _x @left_frame_obj.go(_x,0) @right_frame_obj.width = - _x - _w @right_frame_obj.amove(_x + _w,0) end |
#get_main_x ⇒ Object
516 517 518 519 520 521 522 |
# File 'lib/a-tkcommons.rb', line 516 def get_main_x if TkWinfo.manager(@parent)=='place' return TkPlace.info(@parent)['x'] / 2 else return 20 end end |
#hide(_name) ⇒ Object
621 622 |
# File 'lib/a-tkcommons.rb', line 621 def hide(_name) end |
#hide_left ⇒ Object
547 548 549 550 551 552 553 554 555 556 557 558 559 560 561 562 563 |
# File 'lib/a-tkcommons.rb', line 547 def hide_left if (@state=='left') _w = @last @state = 'middle' @left_frame_obj.width = _w @left_frame_obj.go(_w,0) else _w = 0 @state = 'right' @last = @left_frame_obj.w end @left_frame_obj.amove(0,0) @left_frame_obj.obj.place_forget if @state=='right' @splitter_frame_obj.amove(_w,0) @right_frame_obj.width = - _w - @slen @right_frame_obj.amove(_w + @slen,0) end |
#hide_right ⇒ Object
581 582 583 584 585 586 587 588 589 590 591 592 593 594 595 596 597 |
# File 'lib/a-tkcommons.rb', line 581 def hide_right if (@state=='right') _w = @last @state = 'middle' else _w = @right_frame_obj.w + @left_frame_obj.w #+ @slen @state = 'left' @last = @left_frame_obj.w end @right_frame_obj.width = - _w - @slen @right_frame_obj.amove(_w + @slen,0) @right_frame_obj.obj.place_forget if @state=='left' #.unplace if @state=='left' @splitter_frame_obj.amove(_w,0) @left_frame_obj.width = _w @left_frame_obj.go(_w,0) end |
#is_left_hide? ⇒ Boolean
565 566 567 |
# File 'lib/a-tkcommons.rb', line 565 def is_left_hide? @left_frame_obj.w == 0 end |
#maximize(_frame) ⇒ Object
599 600 601 602 603 604 605 606 607 608 |
# File 'lib/a-tkcommons.rb', line 599 def maximize(_frame) super(_frame) case _frame when left_frame hide_right when right_frame hide_left end Tk.update end |
#minimize(_frame) ⇒ Object
610 611 612 613 614 615 616 617 618 619 |
# File 'lib/a-tkcommons.rb', line 610 def minimize(_frame) super(_frame) case _frame when left_frame hide_left when right_frame hide_right end Tk.update end |
#move_splitter(_gapx = 0, _gapy = 0) ⇒ Object
533 534 535 536 |
# File 'lib/a-tkcommons.rb', line 533 def move_splitter(_gapx=0,_gapy=0) @splitter_frame_obj.amove(_gapx,_gapy) do_resize end |
#resize_left(_new_width) ⇒ Object
538 539 540 541 542 543 544 545 |
# File 'lib/a-tkcommons.rb', line 538 def resize_left(_new_width) @left_frame_obj.width = _new_width @left_frame_obj.go(_new_width,0) @left_frame_obj.amove(0,0) @splitter_frame_obj.amove(_new_width,0) @right_frame_obj.width = - _new_width - @slen @right_frame_obj.amove(_new_width + @slen,0) end |
#show(_name) ⇒ Object
624 625 |
# File 'lib/a-tkcommons.rb', line 624 def show(_name) end |
#show_left ⇒ Object
569 570 571 572 573 574 575 576 577 578 579 |
# File 'lib/a-tkcommons.rb', line 569 def show_left if @state=='right' _w = @last @state = 'middle' @right_frame_obj.width = - _w - @slen @right_frame_obj.amove(_w + @slen,0) @splitter_frame_obj.amove(_w,0) @left_frame_obj.width = _w @left_frame_obj.go(_w,0) end end |