# File tk/lib/tkextlib/tcllib/diagrams.rb, line 130
def arrow(text=nil, length=nil, head=nil)
if length || head
text = '' unless text
length = '' unless length
list(tk_call('::Diagrams::arrow', text, length, head))
else
if text
list(tk_call('::Diagrams::arrow', text))
else
list(tk_call('::Diagrams::arrow'))
end
end
end
# File tk/lib/tkextlib/tcllib/diagrams.rb, line 160
def attach(anchor=None)
tk_call('::Diagrams::attach', anchor)
end
# File tk/lib/tkextlib/tcllib/diagrams.rb, line 68
def box(text, width=nil, height=nil)
if width || height
width = '' unless width
height = '' unless height
list(tk_call('::Diagrams::box', text, width, height))
else
list(tk_call('::Diagrams::box', text))
end
end
# File tk/lib/tkextlib/tcllib/diagrams.rb, line 216
def boxcoords(x1, y1, x2, y2)
list(tk_call('::Diagrams::boxcoords', x1, y1, x2, y2))
end
# File tk/lib/tkextlib/tcllib/diagrams.rb, line 156
def bracket(dir, dist, from_pos, to_pos)
list(tk_call('::Diagrams::bracket', dir, dist, from_pos, to_pos))
end
# File tk/lib/tkextlib/tcllib/diagrams.rb, line 88
def circle(text, radius=nil)
if radius
list(tk_call('::Diagrams::circle', text, radius))
else
list(tk_call('::Diagrams::circle', text))
end
end
# File tk/lib/tkextlib/tcllib/diagrams.rb, line 164
def color(name=None)
tk_call('::Diagrams::color', name)
end
# File tk/lib/tkextlib/tcllib/diagrams.rb, line 211
def computepos
list(tk_call('::Diagrams::computepos'))
end
# File tk/lib/tkextlib/tcllib/diagrams.rb, line 52
def currentpos(pos)
list(tk_call('::Diagrams::currentpos', pos))
end
# File tk/lib/tkextlib/tcllib/diagrams.rb, line 110
def diamond(text, width=nil, height=nil)
if width || height
width = '' unless width
height = '' unless height
list(tk_call('::Diagrams::diamond', text, width, height))
else
list(tk_call('::Diagrams::diamond', text))
end
end
# File tk/lib/tkextlib/tcllib/diagrams.rb, line 47
def direction(dir)
tk_call('::Diagrams::direction', dir)
dir
end
# File tk/lib/tkextlib/tcllib/diagrams.rb, line 35
def drawin(canvas)
tk_call('::Diagrams::drawin', canvas)
canvas
end
# File tk/lib/tkextlib/tcllib/diagrams.rb, line 120
def drum(text, width=nil, height=nil)
if width || height
width = '' unless width
height = '' unless height
list(tk_call('::Diagrams::drum', text, width, height))
else
list(tk_call('::Diagrams::drum', text))
end
end
# File tk/lib/tkextlib/tcllib/diagrams.rb, line 168
def fillcolor(name=None)
tk_call('::Diagrams::fillcolor', name)
end
# File tk/lib/tkextlib/tcllib/diagrams.rb, line 59
def getpos(anchor, obj)
list(tk_call('::Diagrams::getpos', anchor, obj))
end
# File tk/lib/tkextlib/tcllib/diagrams.rb, line 144
def line(*args)
ary = []
args.each{|arg|
if arg.kind_of?(Array) && arg.length == 2 # [length, angle]
ary.concat arg
else # ["POSITION", x, y] or length or angle
ary << arg
end
}
list(tk_call('::Diagrams::line', *ary))
end
# File tk/lib/tkextlib/tcllib/diagrams.rb, line 197
def linestyle(style=None)
tk_call('::Diagrams::linestyle', style)
end
# File tk/lib/tkextlib/tcllib/diagrams.rb, line 193
def linewidth(pixels=None)
number(tk_call('::Diagrams::linewidth', pixels))
end
# File tk/lib/tkextlib/tcllib/diagrams.rb, line 220
def moveobject(obj)
list(tk_call('::Diagrams::moveobject', obj))
end
# File tk/lib/tkextlib/tcllib/diagrams.rb, line 18
def self.package_name
PACKAGE_NAME
end
# File tk/lib/tkextlib/tcllib/diagrams.rb, line 22
def self.package_version
begin
TkPackage.require('Diagrams')
rescue
''
end
end
# File tk/lib/tkextlib/tcllib/diagrams.rb, line 78
def plaintext(text, width=nil, height=nil)
if width || height
width = '' unless width
height = '' unless height
list(tk_call('::Diagrams::plaintext', text, width, height))
else
list(tk_call('::Diagrams::plaintext', text))
end
end
# File tk/lib/tkextlib/tcllib/diagrams.rb, line 206
def popstate
tk_call('::Diagrams::popstate')
end
# File tk/lib/tkextlib/tcllib/diagrams.rb, line 64
def position(x, y)
list(tk_call('::Diagrams::position', x, y))
end
# File tk/lib/tkextlib/tcllib/diagrams.rb, line 201
def pushstate
tk_call('::Diagrams::pushstate')
end
# File tk/lib/tkextlib/tcllib/diagrams.rb, line 41
def saveps(filename)
tk_call('::Diagrams::saveps', filename)
filename
end
# File tk/lib/tkextlib/tcllib/diagrams.rb, line 96
def slanted(text, width=nil, height=nil, angle=nil)
if width || height || angle
width = '' unless width
height = '' unless height
if angle
list(tk_call('::Diagrams::slanted', text, width, height, angle))
else
list(tk_call('::Diagrams::slanted', text, width, height))
end
else
list(tk_call('::Diagrams::slanted', text))
end
end
# File tk/lib/tkextlib/tcllib/diagrams.rb, line 172
def textcolor(name=None)
tk_call('::Diagrams::textcolor', name)
end
# File tk/lib/tkextlib/tcllib/diagrams.rb, line 189
def textfont(fnt=None)
tk_call('::Diagrams::textfont', fnt)
end
# File tk/lib/tkextlib/tcllib/diagrams.rb, line 176
def usegap(mode=None)
bool(tk_call('::Diagrams::usegap', mode))
end
Commenting is here to help enhance the documentation. For example, sample code, or clarification of the documentation.
If you have questions about Ruby or the documentation, please post to one of the Ruby mailing lists. You will get better, faster, help that way.
If you wish to post a correction of the docs, please do so, but also file bug report so that it can be corrected for the next release. Thank you.