# File tk/lib/tkextlib/tcllib/plotchart.rb, line 1260
def initialize(*args)
# args := ([parent,] time_begin, time_end, items [, text_width] [, keys])
# time_begin := String of time format (e.g. "1 january 2004")
# time_end := String of time format (e.g. "1 january 2004")
# args := Expected/maximum number of items
# ( This determines the vertical spacing. ),
# Expected/maximum width of items,
# Option Hash ( { key=>value, ... } )
if args[0].kind_of?(String)
@time_begin = args.shift
@time_end = args.shift
@args = args
super(*args) # create canvas widget
else
parent = args.shift
@time_begin = args.shift
@time_end = args.shift
@args = args
if parent.kind_of?(Tk::Canvas)
@path = parent.path
else
super(parent, *args) # create canvas widget
end
end
@chart = _create_chart
end
# File tk/lib/tkextlib/tcllib/plotchart.rb, line 1329
def color_of_part(keyword, newcolor)
tk_call(@chart, 'color', keyword, newcolor)
self
end
# File tk/lib/tkextlib/tcllib/plotchart.rb, line 1315
def connect(from_task, to_task)
from_task = array2tk_list(from_task) if from_task.kind_of?(Array)
to_task = array2tk_list(to_task) if to_task.kind_of?(Array)
tk_call(@chart, 'connect', from_task, to_task)
self
end
# File tk/lib/tkextlib/tcllib/plotchart.rb, line 1334
def font_of_part(keyword, newfont)
tk_call(@chart, 'font', keyword, newfont)
self
end
# File tk/lib/tkextlib/tcllib/plotchart.rb, line 1343
def hscroll(scr)
tk_call_without_enc(@chart, 'hscroll', scr)
self
end
# File tk/lib/tkextlib/tcllib/plotchart.rb, line 1339
def hscroll=(scr)
tk_call_without_enc(@chart, 'hscroll', scr)
scr
end
# File tk/lib/tkextlib/tcllib/plotchart.rb, line 1305
def milestone(txt, time, col=None)
tk_call(@chart, 'milestone', txt, time, col)
self
end
# File tk/lib/tkextlib/tcllib/plotchart.rb, line 1323
def summary(txt, tasks)
tasks = array2tk_list(tasks) if tasks.kind_of?(Array)
tk_call(@chart, 'summary', tasks)
self
end
# File tk/lib/tkextlib/tcllib/plotchart.rb, line 1298
def task(txt, time_begin, time_end, completed=0.0)
list(tk_call(@chart, 'task', txt, time_begin, time_end,
completed)).collect!{|id|
TkcItem.id2obj(self, id)
}
end
# File tk/lib/tkextlib/tcllib/plotchart.rb, line 1310
def vertline(txt, time)
tk_call(@chart, 'vertline', txt, time)
self
end