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?, #refresh, #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.
368 369 370 371 372 373 374 375 376 377 378 379 380 381 382 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 |
# File 'lib/a-tkcommons.rb', line 368 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.
367 368 369 |
# File 'lib/a-tkcommons.rb', line 367 def left_frame @left_frame end |
#right_frame ⇒ Object (readonly)
Returns the value of attribute right_frame.
367 368 369 |
# File 'lib/a-tkcommons.rb', line 367 def right_frame @right_frame end |
#splitter_frame ⇒ Object (readonly)
Returns the value of attribute splitter_frame.
367 368 369 |
# File 'lib/a-tkcommons.rb', line 367 def splitter_frame @splitter_frame end |
Instance Method Details
#do_resize ⇒ Object
477 478 479 480 481 482 483 484 |
# File 'lib/a-tkcommons.rb', line 477 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
469 470 471 472 473 474 475 |
# File 'lib/a-tkcommons.rb', line 469 def get_main_x if TkWinfo.manager(@parent)=='place' return TkPlace.info(@parent)['x'] / 2 else return 20 end end |
#hide(_name) ⇒ Object
574 575 |
# File 'lib/a-tkcommons.rb', line 574 def hide(_name) end |
#hide_left ⇒ Object
500 501 502 503 504 505 506 507 508 509 510 511 512 513 514 515 516 |
# File 'lib/a-tkcommons.rb', line 500 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
534 535 536 537 538 539 540 541 542 543 544 545 546 547 548 549 550 |
# File 'lib/a-tkcommons.rb', line 534 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
518 519 520 |
# File 'lib/a-tkcommons.rb', line 518 def is_left_hide? @left_frame_obj.w == 0 end |
#maximize(_frame) ⇒ Object
552 553 554 555 556 557 558 559 560 561 |
# File 'lib/a-tkcommons.rb', line 552 def maximize(_frame) super(_frame) case _frame when left_frame hide_right when right_frame hide_left end Tk.update end |
#minimize(_frame) ⇒ Object
563 564 565 566 567 568 569 570 571 572 |
# File 'lib/a-tkcommons.rb', line 563 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
486 487 488 489 |
# File 'lib/a-tkcommons.rb', line 486 def move_splitter(_gapx=0,_gapy=0) @splitter_frame_obj.amove(_gapx,_gapy) do_resize end |
#resize_left(_new_width) ⇒ Object
491 492 493 494 495 496 497 498 |
# File 'lib/a-tkcommons.rb', line 491 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
577 578 |
# File 'lib/a-tkcommons.rb', line 577 def show(_name) end |
#show_left ⇒ Object
522 523 524 525 526 527 528 529 530 531 532 |
# File 'lib/a-tkcommons.rb', line 522 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 |