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?, #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.
383 384 385 386 387 388 389 390 391 392 393 394 395 396 397 398 399 400 401 402 403 404 405 406 407 408 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 |
# File 'lib/a-tkcommons.rb', line 383 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} ) = 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} ) = 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.
382 383 384 |
# File 'lib/a-tkcommons.rb', line 382 def left_frame @left_frame end |
#right_frame ⇒ Object (readonly)
Returns the value of attribute right_frame.
382 383 384 |
# File 'lib/a-tkcommons.rb', line 382 def right_frame @right_frame end |
#splitter_frame ⇒ Object (readonly)
Returns the value of attribute splitter_frame.
382 383 384 |
# File 'lib/a-tkcommons.rb', line 382 def splitter_frame @splitter_frame end |
Instance Method Details
#do_resize ⇒ Object
492 493 494 495 496 497 498 499 |
# File 'lib/a-tkcommons.rb', line 492 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
484 485 486 487 488 489 490 |
# File 'lib/a-tkcommons.rb', line 484 def get_main_x if TkWinfo.manager(@parent)=='place' return TkPlace.info(@parent)['x'] / 2 else return 20 end end |
#hide(_name) ⇒ Object
589 590 |
# File 'lib/a-tkcommons.rb', line 589 def hide(_name) end |
#hide_left ⇒ Object
515 516 517 518 519 520 521 522 523 524 525 526 527 528 529 530 531 |
# File 'lib/a-tkcommons.rb', line 515 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
549 550 551 552 553 554 555 556 557 558 559 560 561 562 563 564 565 |
# File 'lib/a-tkcommons.rb', line 549 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
533 534 535 |
# File 'lib/a-tkcommons.rb', line 533 def is_left_hide? @left_frame_obj.w == 0 end |
#maximize(_frame) ⇒ Object
567 568 569 570 571 572 573 574 575 576 |
# File 'lib/a-tkcommons.rb', line 567 def maximize(_frame) super(_frame) case _frame when left_frame hide_right when right_frame hide_left end Tk.update end |
#minimize(_frame) ⇒ Object
578 579 580 581 582 583 584 585 586 587 |
# File 'lib/a-tkcommons.rb', line 578 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
501 502 503 504 |
# File 'lib/a-tkcommons.rb', line 501 def move_splitter(_gapx=0,_gapy=0) @splitter_frame_obj.amove(_gapx,_gapy) do_resize end |
#resize_left(_new_width) ⇒ Object
506 507 508 509 510 511 512 513 |
# File 'lib/a-tkcommons.rb', line 506 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
592 593 |
# File 'lib/a-tkcommons.rb', line 592 def show(_name) end |
#show_left ⇒ Object
537 538 539 540 541 542 543 544 545 546 547 |
# File 'lib/a-tkcommons.rb', line 537 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 |