2004-12-23 11:23:30 -05:00
|
|
|
#
|
|
|
|
# tkextlib/blt/stripchart.rb
|
|
|
|
# by Hidetoshi NAGAI (nagai@ai.kyutech.ac.jp)
|
|
|
|
#
|
|
|
|
|
|
|
|
require 'tk'
|
|
|
|
require 'tkextlib/blt.rb'
|
|
|
|
require 'tkextlib/blt/component.rb'
|
|
|
|
|
|
|
|
module Tk::BLT
|
|
|
|
class Stripchart < TkWindow
|
|
|
|
TkCommandNames = ['::blt::stripchart'.freeze].freeze
|
|
|
|
WidgetClassName = 'Stripchart'.freeze
|
2009-07-12 19:08:32 -04:00
|
|
|
WidgetClassNames[WidgetClassName] ||= self
|
2004-12-23 11:23:30 -05:00
|
|
|
|
|
|
|
include PlotComponent
|
2005-03-26 08:58:11 -05:00
|
|
|
include GraphCommand
|
2004-12-23 11:23:30 -05:00
|
|
|
|
|
|
|
def __boolval_optkeys
|
|
|
|
['bufferelements', 'buffergraph', 'invertxy']
|
|
|
|
end
|
|
|
|
private :__boolval_optkeys
|
|
|
|
|
|
|
|
def __strval_optkeys
|
2009-03-05 22:56:38 -05:00
|
|
|
['text', 'label', 'title', 'file',
|
* ext/tk/extconf.rb: improbe messages [ruby-core:06325].
* ext/tk/lib/tk.rb, ext/tk/lib/tk/canvas.rb, ext/tk/lib/tk/entry.rb,
ext/tk/lib/tk/frame.rb, ext/tk/lib/tk/image.rb,
ext/tk/lib/tk/itemconfig.rb, ext/tk/lib/tk/labelframe.rb,
ext/tk/lib/tk/listbox.rb, ext/tk/lib/tk/menu.rb,
ext/tk/lib/tk/radiobutton.rb, ext/tk/lib/tk/scale.rb,
ext/tk/lib/tk/spinbox.rb, ext/tk/lib/tk/text.rb,
ext/tk/lib/tk/toplevel.rb: improve conversion of option values.
* ext/tk/lib/tkextlib/*: ditto.
* ext/tk/lib/tkextlib/*: update to support ActiveTcl8.4.11.2.
* ext/tk/lib/tkextlib/trofs/*: support Trofs 0.4.3.
* ext/tk/lib/tkextlib/tile/*: support Tile 0.7.2.
* ext/tk/lib/tkextlib/vu/*: support vu 2.3.0.
* ext/tk/lib/tkextlib/tcllib/*: support Tcllib 1.8 (Tklib 0.3).
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@9448 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
2005-10-22 18:17:08 -04:00
|
|
|
'background', 'plotbackground']
|
2004-12-23 11:23:30 -05:00
|
|
|
end
|
|
|
|
private :__strval_optkeys
|
|
|
|
|
2005-03-29 05:27:32 -05:00
|
|
|
=begin
|
2009-07-12 19:08:32 -04:00
|
|
|
BarElement_ID = ['blt_stripchart_bar'.freeze, TkUtil.untrust('00000')].freeze
|
2004-12-23 11:23:30 -05:00
|
|
|
|
|
|
|
def bar(elem=nil, keys={})
|
|
|
|
if elem.kind_of?(Hash)
|
|
|
|
keys = elem
|
|
|
|
elem = nil
|
|
|
|
end
|
|
|
|
unless elem
|
|
|
|
elem = BarElement_ID.join(TkCore::INTERP._ip_id_).freeze
|
|
|
|
BarElement_ID[1].succ!
|
|
|
|
end
|
|
|
|
tk_send('bar', elem, keys)
|
|
|
|
Element.new(self, elem, :without_creating=>true)
|
|
|
|
end
|
2005-03-29 05:27:32 -05:00
|
|
|
=end
|
2004-12-23 11:23:30 -05:00
|
|
|
|
|
|
|
def extents(item)
|
|
|
|
num_or_str(tk_send_without_enc('extents', item))
|
|
|
|
end
|
|
|
|
|
|
|
|
def invtransform(x, y)
|
|
|
|
list(tk_send_without_enc('invtransform', x, y))
|
|
|
|
end
|
|
|
|
|
|
|
|
def inside(x, y)
|
|
|
|
bool(tk_send_without_enc('inside', x, y))
|
|
|
|
end
|
|
|
|
|
|
|
|
def metafile(file=None)
|
|
|
|
# Windows only
|
|
|
|
tk_send('metafile', file)
|
|
|
|
self
|
|
|
|
end
|
|
|
|
|
|
|
|
def snap(output, keys={})
|
|
|
|
tk_send_without_enc('snap', *(hash_kv(keys, false) + output))
|
|
|
|
self
|
|
|
|
end
|
|
|
|
|
|
|
|
def transform(x, y)
|
|
|
|
list(tk_send_without_enc('transform', x, y))
|
|
|
|
end
|
|
|
|
end
|
|
|
|
end
|