Class Tk::Tcllib::Plotchart::Timechart < Tk::Canvas

# File ext/tk/lib/tkextlib/tcllib/plotchart.rb, line 1181
def initialize(*args)
  # args := ([parent,] time_begin, time_end, items [, keys])
  # time_begin := String of time format (e.g. "1 january 2004")
  # time_end   := String of time format (e.g. "1 january 2004")
  # items := Expected/maximum number of items
  #          ( This determines the vertical spacing. )
  if args[0].kind_of?(String)
    @time_begin = args.shift
    @time_end   = args.shift
    @items      = args.shift

    super(*args) # create canvas widget
  else
    parent = args.shift

    @time_begin = args.shift
    @time_end   = args.shift
    @items      = args.shift

    if parent.kind_of?(Tk::Canvas)
      @path = parent.path
    else
      super(parent, *args) # create canvas widget
    end
  end

  @chart = _create_chart
end

# File ext/tk/lib/tkextlib/tcllib/plotchart.rb, line 1236
def hscroll(scr)
  tk_call_without_enc(@chart, 'hscroll', scr)
  self
end

# File ext/tk/lib/tkextlib/tcllib/plotchart.rb, line 1232
def hscroll=(scr)
  tk_call_without_enc(@chart, 'hscroll', scr)
  scr
end

# File ext/tk/lib/tkextlib/tcllib/plotchart.rb, line 1222
def milestone(txt, time, col=None)
  tk_call(@chart, 'milestone', txt, time, col)
  self
end

# File ext/tk/lib/tkextlib/tcllib/plotchart.rb, line 1217
def period(txt, time_begin, time_end, col=None)
  tk_call(@chart, 'period', txt, time_begin, time_end, col)
  self
end

# File ext/tk/lib/tkextlib/tcllib/plotchart.rb, line 1227
def vertline(txt, time)
  tk_call(@chart, 'vertline', txt, time)
  self
end

# File ext/tk/lib/tkextlib/tcllib/plotchart.rb, line 1245
def vscroll(scr)
  tk_call_without_enc(@chart, 'vscroll', scr)
  self
end

# File ext/tk/lib/tkextlib/tcllib/plotchart.rb, line 1241
def vscroll=(scr)
  tk_call_without_enc(@chart, 'vscroll', scr)
  scr
end