class Tk::Tcllib::Plotchart::Ganttchart - tk-0.2.0 Documentation

# class Tk::Tcllib::Plotchart::Ganttchart

### Constants

TkCommandNames

### Public Class Methods

new(*args) click to toggle source
Calls superclass method

    # File 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

### Public Instance Methods

color_of_part(keyword, newcolor) click to toggle source

    # File lib/tkextlib/tcllib/plotchart.rb, line 1329
    def color_of_part(keyword, newcolor)
      tk_call(@chart, 'color', keyword, newcolor)
      self
    end

connect(from_task, to_task) click to toggle source

    # File 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

font_of_part(keyword, newfont) click to toggle source

    # File lib/tkextlib/tcllib/plotchart.rb, line 1334
    def font_of_part(keyword, newfont)
      tk_call(@chart, 'font', keyword, newfont)
      self
    end

hscroll(scr) click to toggle source

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

hscroll=(scr) click to toggle source

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

milestone(txt, time, col=None) click to toggle source

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

summary(txt, tasks) click to toggle source

    # File 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

task(txt, time_begin, time_end, completed=0.0) click to toggle source

    # File 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

vertline(txt, time) click to toggle source

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

vscroll(scr) click to toggle source

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

vscroll=(scr) click to toggle source

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

### Private Instance Methods

_create_chart() click to toggle source

    # File lib/tkextlib/tcllib/plotchart.rb, line 1291
    def _create_chart
      p self.class::TkCommandNames[1] if $DEBUG
      tk_call(self.class::TkCommandNames[1], @path,
              @time_begin, @time_end, *args)
    end