ChartDirector 6.0 (Ruby Edition)
Multi-Layer Gantt Chart
Source Code Listing
require("chartdirector") class LayerganttController < ApplicationController def index() @title = "Multi-Layer Gantt Chart" @ctrl_file = File.expand_path(__FILE__) @noOfCharts = 1 render :template => "templates/chartview" end # # Render and deliver the chart # def getchart() # the names of the tasks labels = ["Market Research", "Define Specifications", "Overall Archiecture", "Project Planning", "Detail Design", "Software Development", "Test Plan", "Testing and QA", "User Documentation"] # the planned start dates and end dates for the tasks startDate = [Time.mktime(2004, 8, 16), Time.mktime(2004, 8, 30), Time.mktime(2004, 9, 13), Time.mktime(2004, 9, 20), Time.mktime(2004, 9, 27), Time.mktime(2004, 10, 4), Time.mktime(2004, 10, 25), Time.mktime(2004, 11, 1), Time.mktime(2004, 11, 8)] endDate = [Time.mktime(2004, 8, 30), Time.mktime(2004, 9, 13), Time.mktime(2004, 9, 27), Time.mktime(2004, 10, 4), Time.mktime(2004, 10, 11), Time.mktime(2004, 11, 8), Time.mktime(2004, 11, 8), Time.mktime(2004, 11, 22), Time.mktime(2004, 11, 22)] # the actual start dates and end dates for the tasks up to now actualStartDate = [Time.mktime(2004, 8, 16), Time.mktime(2004, 8, 27), Time.mktime(2004, 9, 9), Time.mktime(2004, 9, 18), Time.mktime(2004, 9, 22)] actualEndDate = [Time.mktime(2004, 8, 27), Time.mktime(2004, 9, 9), Time.mktime(2004, 9, 27 ), Time.mktime(2004, 10, 2), Time.mktime(2004, 10, 8)] # Create a XYChart object of size 620 x 280 pixels. Set background color to light green # (ccffcc) with 1 pixel 3D border effect. c = ChartDirector::XYChart.new(620, 280, 0xccffcc, 0x000000, 1) # Add a title to the chart using 15 points Times Bold Itatic font, with white (ffffff) text # on a dark green (0x6000) background c.addTitle("Multi-Layer Gantt Chart Demo", "timesbi.ttf", 15, 0xffffff).setBackground( 0x006000) # Set the plotarea at (140, 55) and of size 460 x 200 pixels. Use alternative white/grey # background. Enable both horizontal and vertical grids by setting their colors to grey # (c0c0c0). Set vertical major grid (represents month boundaries) 2 pixels in width c.setPlotArea(140, 55, 460, 200, 0xffffff, 0xeeeeee, ChartDirector::LineColor, 0xc0c0c0, 0xc0c0c0).setGridWidth(2, 1, 1, 1) # swap the x and y axes to create a horziontal box-whisker chart c.swapXY() # Set the y-axis scale to be date scale from Aug 16, 2004 to Nov 22, 2004, with ticks every # 7 days (1 week) c.yAxis().setDateScale(Time.mktime(2004, 8, 16), Time.mktime(2004, 11, 22), 86400 * 7) # Add a red (ff0000) dash line to represent the current day c.yAxis().addMark(Time.mktime(2004, 10, 8), c.dashLineColor(0xff0000, ChartDirector::DashLine)) # Set multi-style axis label formatting. Month labels are in Arial Bold font in "mmm d" # format. Weekly labels just show the day of month and use minor tick (by using '-' as first # character of format string). c.yAxis().setMultiFormat(ChartDirector::StartOfMonthFilter(), "<*font=arialbd.ttf*>{value|mmm d}", ChartDirector::StartOfDayFilter(), "-{value|d}") # Set the y-axis to shown on the top (right + swapXY = top) c.setYAxisOnRight() # Set the labels on the x axis c.xAxis().setLabels(labels) # Reverse the x-axis scale so that it points downwards. c.xAxis().setReverse() # Set the horizontal ticks and grid lines to be between the bars c.xAxis().setTickOffset(0.5) # Use blue (0000aa) as the color for the planned schedule plannedColor = 0x0000aa # Use a red hash pattern as the color for the actual dates. The pattern is created as a 4 x # 4 bitmap defined in memory as an array of colors. actualColor = c.patternColor([0xffffff, 0xffffff, 0xffffff, 0xff0000, 0xffffff, 0xffffff, 0xff0000, 0xffffff, 0xffffff, 0xff0000, 0xffffff, 0xffffff, 0xff0000, 0xffffff, 0xffffff, 0xffffff], 4) # Add a box whisker layer to represent the actual dates. We add the actual dates layer # first, so it will be the top layer. actualLayer = c.addBoxLayer(actualStartDate, actualEndDate, actualColor, "Actual") # Set the bar height to 8 pixels so they will not block the bottom bar actualLayer.setDataWidth(8) # Add a box-whisker layer to represent the planned schedule date c.addBoxLayer(startDate, endDate, plannedColor, "Planned").setBorderColor( ChartDirector::SameAsMainColor) # Add a legend box on the top right corner (595, 60) of the plot area with 8 pt Arial Bold # font. Use a semi-transparent grey (80808080) background. b = c.addLegend(595, 60, false, "arialbd.ttf", 8) b.setAlignment(ChartDirector::TopRight) b.setBackground(0x80808080, -1, 2) # Output the chart send_data(c.makeChart2(ChartDirector::PNG), :type => "image/png", :disposition => "inline") end end |
<html> <body style="margin:5px 0px 0px 5px"> <!-- Title --> <div style="font-size:18pt; font-family:verdana; font-weight:bold"> <%= @title %> </div> <hr style="border:solid 1px #000080" /> <!-- Source Code Listing Link --> <div style="font-size:9pt; font-family:verdana; margin-bottom:1.5em"> <%= link_to "Source Code Listing", :controller => "cddemo", :action => "viewsource", :ctrl_file => @ctrl_file, :view_file => File.expand_path(__FILE__) %> </div> <!-- Create one or more IMG tags to display the demo chart(s) --> <% 0.upto(@noOfCharts - 1) do |i| %> <img src="<%= url_for(:action => "getchart", :img => i) %>"> <% end %> </body> </html> |
#!/usr/bin/env ruby require("chartdirector") # the names of the tasks labels = ["Market Research", "Define Specifications", "Overall Archiecture", "Project Planning", "Detail Design", "Software Development", "Test Plan", "Testing and QA", "User Documentation"] # the planned start dates and end dates for the tasks startDate = [Time.mktime(2004, 8, 16), Time.mktime(2004, 8, 30), Time.mktime(2004, 9, 13), Time.mktime(2004, 9, 20), Time.mktime(2004, 9, 27), Time.mktime(2004, 10, 4), Time.mktime(2004, 10, 25), Time.mktime(2004, 11, 1), Time.mktime(2004, 11, 8)] endDate = [Time.mktime(2004, 8, 30), Time.mktime(2004, 9, 13), Time.mktime(2004, 9, 27), Time.mktime(2004, 10, 4), Time.mktime(2004, 10, 11), Time.mktime(2004, 11, 8), Time.mktime(2004, 11, 8), Time.mktime(2004, 11, 22), Time.mktime(2004, 11, 22)] # the actual start dates and end dates for the tasks up to now actualStartDate = [Time.mktime(2004, 8, 16), Time.mktime(2004, 8, 27), Time.mktime(2004, 9, 9), Time.mktime(2004, 9, 18), Time.mktime(2004, 9, 22)] actualEndDate = [Time.mktime(2004, 8, 27), Time.mktime(2004, 9, 9), Time.mktime(2004, 9, 27), Time.mktime(2004, 10, 2), Time.mktime(2004, 10, 8)] # Create a XYChart object of size 620 x 280 pixels. Set background color to light green (ccffcc) # with 1 pixel 3D border effect. c = ChartDirector::XYChart.new(620, 280, 0xccffcc, 0x000000, 1) # Add a title to the chart using 15 points Times Bold Itatic font, with white (ffffff) text on a # dark green (0x6000) background c.addTitle("Multi-Layer Gantt Chart Demo", "timesbi.ttf", 15, 0xffffff).setBackground(0x006000) # Set the plotarea at (140, 55) and of size 460 x 200 pixels. Use alternative white/grey background. # Enable both horizontal and vertical grids by setting their colors to grey (c0c0c0). Set vertical # major grid (represents month boundaries) 2 pixels in width c.setPlotArea(140, 55, 460, 200, 0xffffff, 0xeeeeee, ChartDirector::LineColor, 0xc0c0c0, 0xc0c0c0 ).setGridWidth(2, 1, 1, 1) # swap the x and y axes to create a horziontal box-whisker chart c.swapXY() # Set the y-axis scale to be date scale from Aug 16, 2004 to Nov 22, 2004, with ticks every 7 days # (1 week) c.yAxis().setDateScale(Time.mktime(2004, 8, 16), Time.mktime(2004, 11, 22), 86400 * 7) # Add a red (ff0000) dash line to represent the current day c.yAxis().addMark(Time.mktime(2004, 10, 8), c.dashLineColor(0xff0000, ChartDirector::DashLine)) # Set multi-style axis label formatting. Month labels are in Arial Bold font in "mmm d" format. # Weekly labels just show the day of month and use minor tick (by using '-' as first character of # format string). c.yAxis().setMultiFormat(ChartDirector::StartOfMonthFilter(), "<*font=arialbd.ttf*>{value|mmm d}", ChartDirector::StartOfDayFilter(), "-{value|d}") # Set the y-axis to shown on the top (right + swapXY = top) c.setYAxisOnRight() # Set the labels on the x axis c.xAxis().setLabels(labels) # Reverse the x-axis scale so that it points downwards. c.xAxis().setReverse() # Set the horizontal ticks and grid lines to be between the bars c.xAxis().setTickOffset(0.5) # Use blue (0000aa) as the color for the planned schedule plannedColor = 0x0000aa # Use a red hash pattern as the color for the actual dates. The pattern is created as a 4 x 4 bitmap # defined in memory as an array of colors. actualColor = c.patternColor([0xffffff, 0xffffff, 0xffffff, 0xff0000, 0xffffff, 0xffffff, 0xff0000, 0xffffff, 0xffffff, 0xff0000, 0xffffff, 0xffffff, 0xff0000, 0xffffff, 0xffffff, 0xffffff], 4) # Add a box whisker layer to represent the actual dates. We add the actual dates layer first, so it # will be the top layer. actualLayer = c.addBoxLayer(actualStartDate, actualEndDate, actualColor, "Actual") # Set the bar height to 8 pixels so they will not block the bottom bar actualLayer.setDataWidth(8) # Add a box-whisker layer to represent the planned schedule date c.addBoxLayer(startDate, endDate, plannedColor, "Planned").setBorderColor( ChartDirector::SameAsMainColor) # Add a legend box on the top right corner (595, 60) of the plot area with 8 pt Arial Bold font. Use # a semi-transparent grey (80808080) background. b = c.addLegend(595, 60, false, "arialbd.ttf", 8) b.setAlignment(ChartDirector::TopRight) b.setBackground(0x80808080, -1, 2) # Output the chart c.makeChart("layergantt.png") |