作成日: 2017/05/16 最終更新日: 2017/05/16
文書種別
使用方法
詳細
シリーズのValuesプロパティにデータを直接設定することにより、シート上のデータを使用せずにチャートオブジェクトを配置させることが出来ます。
◎サンプルコード(VB)
◎サンプルコード(C#)
◎サンプルコード(VB)
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
If IsPostBack Then
Return
End If
FpSpread1.Width = 320
FpSpread1.Height = 270
FpSpread1.ActiveSheetView.RowCount = 0
FpSpread1.ActiveSheetView.ColumnCount = 0
FpSpread1.CommandBar.Visible = False
FpSpread1.ActiveSheetView.ColumnHeader.Visible = False
FpSpread1.ActiveSheetView.RowHeader.Visible = False
' シリーズを設定します
Dim series1 As New FarPoint.Web.Chart.LineSeries()
series1.SeriesName = "S1"
series1.CategoryNames.Add("Q1")
series1.CategoryNames.Add("Q2")
series1.CategoryNames.Add("Q3")
series1.CategoryNames.Add("Q4")
series1.Values.Add(50.0)
series1.Values.Add(30.0)
series1.Values.Add(20.0)
series1.Values.Add(40.0)
Dim series2 As New FarPoint.Web.Chart.LineSeries()
series2.SeriesName = "S2"
series2.CategoryNames.Add("Q1")
series2.CategoryNames.Add("Q2")
series2.CategoryNames.Add("Q3")
series2.CategoryNames.Add("Q4")
series2.Values.Add(30.0)
series2.Values.Add(15.0)
series2.Values.Add(50.0)
series2.Values.Add(20.0)
Dim series3 As New FarPoint.Web.Chart.LineSeries()
series3.SeriesName = "S3"
series3.CategoryNames.Add("Q1")
series3.CategoryNames.Add("Q2")
series3.CategoryNames.Add("Q3")
series3.CategoryNames.Add("Q4")
series3.Values.Add(10.0)
series3.Values.Add(40.0)
series3.Values.Add(25.0)
series3.Values.Add(25.0)
' 折れ線グラフを設定します
Dim plotArea As New FarPoint.Web.Chart.YPlotArea()
plotArea.Location = New Drawing.PointF(0.2F, 0.2F)
plotArea.Size = New Drawing.SizeF(0.55F, 0.6F)
plotArea.Series.Add(series1)
plotArea.Series.Add(series2)
plotArea.Series.Add(series3)
' ラベルを設定します
Dim label As New FarPoint.Web.Chart.LabelArea()
label.Text = "四半期別"
label.Location = New Drawing.PointF(0.5F, 0.02F)
label.AlignmentX = 0.5F
label.AlignmentY = 0.0F
' 凡例を設定します
Dim legend As New FarPoint.Web.Chart.LegendArea()
legend.Location = New Drawing.PointF(0.98F, 0.5F)
legend.AlignmentX = 1.0F
legend.AlignmentY = 0.5F
' チャートモデルに各情報を追加します
Dim model As New FarPoint.Web.Chart.ChartModel()
model.LabelAreas.Add(label)
model.LegendAreas.Add(legend)
model.PlotAreas.Add(plotArea)
' SPREADチャートにチャートモデルを設定します
Dim chart As New FarPoint.Web.Spread.Chart.SpreadChart()
chart.Height = 250
chart.Width = 300
chart.Left = 0
chart.Top = 0
' 移動不可
chart.CanMove = False
' リサイズ不可
chart.CanSize = False
' 選択不可
chart.CanSelect = False
chart.Model = model
' シートにSPREADチャートを追加します
FpSpread1.Sheets(0).Charts.Add(chart)
End Sub
If IsPostBack Then
Return
End If
FpSpread1.Width = 320
FpSpread1.Height = 270
FpSpread1.ActiveSheetView.RowCount = 0
FpSpread1.ActiveSheetView.ColumnCount = 0
FpSpread1.CommandBar.Visible = False
FpSpread1.ActiveSheetView.ColumnHeader.Visible = False
FpSpread1.ActiveSheetView.RowHeader.Visible = False
' シリーズを設定します
Dim series1 As New FarPoint.Web.Chart.LineSeries()
series1.SeriesName = "S1"
series1.CategoryNames.Add("Q1")
series1.CategoryNames.Add("Q2")
series1.CategoryNames.Add("Q3")
series1.CategoryNames.Add("Q4")
series1.Values.Add(50.0)
series1.Values.Add(30.0)
series1.Values.Add(20.0)
series1.Values.Add(40.0)
Dim series2 As New FarPoint.Web.Chart.LineSeries()
series2.SeriesName = "S2"
series2.CategoryNames.Add("Q1")
series2.CategoryNames.Add("Q2")
series2.CategoryNames.Add("Q3")
series2.CategoryNames.Add("Q4")
series2.Values.Add(30.0)
series2.Values.Add(15.0)
series2.Values.Add(50.0)
series2.Values.Add(20.0)
Dim series3 As New FarPoint.Web.Chart.LineSeries()
series3.SeriesName = "S3"
series3.CategoryNames.Add("Q1")
series3.CategoryNames.Add("Q2")
series3.CategoryNames.Add("Q3")
series3.CategoryNames.Add("Q4")
series3.Values.Add(10.0)
series3.Values.Add(40.0)
series3.Values.Add(25.0)
series3.Values.Add(25.0)
' 折れ線グラフを設定します
Dim plotArea As New FarPoint.Web.Chart.YPlotArea()
plotArea.Location = New Drawing.PointF(0.2F, 0.2F)
plotArea.Size = New Drawing.SizeF(0.55F, 0.6F)
plotArea.Series.Add(series1)
plotArea.Series.Add(series2)
plotArea.Series.Add(series3)
' ラベルを設定します
Dim label As New FarPoint.Web.Chart.LabelArea()
label.Text = "四半期別"
label.Location = New Drawing.PointF(0.5F, 0.02F)
label.AlignmentX = 0.5F
label.AlignmentY = 0.0F
' 凡例を設定します
Dim legend As New FarPoint.Web.Chart.LegendArea()
legend.Location = New Drawing.PointF(0.98F, 0.5F)
legend.AlignmentX = 1.0F
legend.AlignmentY = 0.5F
' チャートモデルに各情報を追加します
Dim model As New FarPoint.Web.Chart.ChartModel()
model.LabelAreas.Add(label)
model.LegendAreas.Add(legend)
model.PlotAreas.Add(plotArea)
' SPREADチャートにチャートモデルを設定します
Dim chart As New FarPoint.Web.Spread.Chart.SpreadChart()
chart.Height = 250
chart.Width = 300
chart.Left = 0
chart.Top = 0
' 移動不可
chart.CanMove = False
' リサイズ不可
chart.CanSize = False
' 選択不可
chart.CanSelect = False
chart.Model = model
' シートにSPREADチャートを追加します
FpSpread1.Sheets(0).Charts.Add(chart)
End Sub
◎サンプルコード(C#)
protected void Page_Load(object sender, EventArgs e)
{
if (Page.IsPostBack)
{
return;
}
fpSpread1.Width = 320;
fpSpread1.Height = 270;
fpSpread1.ActiveSheetView.RowCount = 0;
fpSpread1.ActiveSheetView.ColumnCount = 0;
fpSpread1.CommandBar.Visible = false;
fpSpread1.ActiveSheetView.ColumnHeader.Visible = false;
fpSpread1.ActiveSheetView.RowHeader.Visible = false;
// シリーズを設定します
FarPoint.Web.Chart.LineSeries series1 = new FarPoint.Web.Chart.LineSeries();
series1.SeriesName = "S1";
series1.CategoryNames.Add("Q1");
series1.CategoryNames.Add("Q2");
series1.CategoryNames.Add("Q3");
series1.CategoryNames.Add("Q4");
series1.Values.Add(50.0);
series1.Values.Add(30.0);
series1.Values.Add(20.0);
series1.Values.Add(40.0);
FarPoint.Web.Chart.LineSeries series2 = new FarPoint.Web.Chart.LineSeries();
series2.SeriesName = "S2";
series2.CategoryNames.Add("Q1");
series2.CategoryNames.Add("Q2");
series2.CategoryNames.Add("Q3");
series2.CategoryNames.Add("Q4");
series2.Values.Add(30.0);
series2.Values.Add(15.0);
series2.Values.Add(50.0);
series2.Values.Add(20.0);
FarPoint.Web.Chart.LineSeries series3 = new FarPoint.Web.Chart.LineSeries();
series3.SeriesName = "S3";
series3.CategoryNames.Add("Q1");
series3.CategoryNames.Add("Q2");
series3.CategoryNames.Add("Q3");
series3.CategoryNames.Add("Q4");
series3.Values.Add(10.0);
series3.Values.Add(40.0);
series3.Values.Add(25.0);
series3.Values.Add(25.0);
// 折れ線グラフを設定します
FarPoint.Web.Chart.YPlotArea plotArea = new FarPoint.Web.Chart.YPlotArea();
plotArea.Location = new System.Drawing.PointF(0.2f, 0.2f);
plotArea.Size = new System.Drawing.SizeF(0.55f, 0.6f);
plotArea.Series.Add(series1);
plotArea.Series.Add(series2);
plotArea.Series.Add(series3);
// ラベルを設定します
FarPoint.Web.Chart.LabelArea label = new FarPoint.Web.Chart.LabelArea();
label.Text = "四半期別";
label.Location = new System.Drawing.PointF(0.5f, 0.02f);
label.AlignmentX = 0.5f;
label.AlignmentY = 0f;
// 凡例を設定します
FarPoint.Web.Chart.LegendArea legend = new FarPoint.Web.Chart.LegendArea();
legend.Location = new System.Drawing.PointF(0.98f, 0.5f);
legend.AlignmentX = 1f;
legend.AlignmentY = 0.5f;
// チャートモデルに各情報を追加します
FarPoint.Web.Chart.ChartModel model = new FarPoint.Web.Chart.ChartModel();
model.LabelAreas.Add(label);
model.LegendAreas.Add(legend);
model.PlotAreas.Add(plotArea);
// SPREADチャートにチャートモデルを設定します
FarPoint.Web.Spread.Chart.SpreadChart chart = new FarPoint.Web.Spread.Chart.SpreadChart();
chart.Height = 250;
chart.Width = 300;
chart.Left = 0;
chart.Top = 0;
// 移動不可
chart.CanMove = false;
// リサイズ不可
chart.CanSize = false;
// 選択不可
chart.CanSelect = false;
chart.Model = model;
// シートにSPREADチャートを追加します
fpSpread1.Sheets[0].Charts.Add(chart);
}
{
if (Page.IsPostBack)
{
return;
}
fpSpread1.Width = 320;
fpSpread1.Height = 270;
fpSpread1.ActiveSheetView.RowCount = 0;
fpSpread1.ActiveSheetView.ColumnCount = 0;
fpSpread1.CommandBar.Visible = false;
fpSpread1.ActiveSheetView.ColumnHeader.Visible = false;
fpSpread1.ActiveSheetView.RowHeader.Visible = false;
// シリーズを設定します
FarPoint.Web.Chart.LineSeries series1 = new FarPoint.Web.Chart.LineSeries();
series1.SeriesName = "S1";
series1.CategoryNames.Add("Q1");
series1.CategoryNames.Add("Q2");
series1.CategoryNames.Add("Q3");
series1.CategoryNames.Add("Q4");
series1.Values.Add(50.0);
series1.Values.Add(30.0);
series1.Values.Add(20.0);
series1.Values.Add(40.0);
FarPoint.Web.Chart.LineSeries series2 = new FarPoint.Web.Chart.LineSeries();
series2.SeriesName = "S2";
series2.CategoryNames.Add("Q1");
series2.CategoryNames.Add("Q2");
series2.CategoryNames.Add("Q3");
series2.CategoryNames.Add("Q4");
series2.Values.Add(30.0);
series2.Values.Add(15.0);
series2.Values.Add(50.0);
series2.Values.Add(20.0);
FarPoint.Web.Chart.LineSeries series3 = new FarPoint.Web.Chart.LineSeries();
series3.SeriesName = "S3";
series3.CategoryNames.Add("Q1");
series3.CategoryNames.Add("Q2");
series3.CategoryNames.Add("Q3");
series3.CategoryNames.Add("Q4");
series3.Values.Add(10.0);
series3.Values.Add(40.0);
series3.Values.Add(25.0);
series3.Values.Add(25.0);
// 折れ線グラフを設定します
FarPoint.Web.Chart.YPlotArea plotArea = new FarPoint.Web.Chart.YPlotArea();
plotArea.Location = new System.Drawing.PointF(0.2f, 0.2f);
plotArea.Size = new System.Drawing.SizeF(0.55f, 0.6f);
plotArea.Series.Add(series1);
plotArea.Series.Add(series2);
plotArea.Series.Add(series3);
// ラベルを設定します
FarPoint.Web.Chart.LabelArea label = new FarPoint.Web.Chart.LabelArea();
label.Text = "四半期別";
label.Location = new System.Drawing.PointF(0.5f, 0.02f);
label.AlignmentX = 0.5f;
label.AlignmentY = 0f;
// 凡例を設定します
FarPoint.Web.Chart.LegendArea legend = new FarPoint.Web.Chart.LegendArea();
legend.Location = new System.Drawing.PointF(0.98f, 0.5f);
legend.AlignmentX = 1f;
legend.AlignmentY = 0.5f;
// チャートモデルに各情報を追加します
FarPoint.Web.Chart.ChartModel model = new FarPoint.Web.Chart.ChartModel();
model.LabelAreas.Add(label);
model.LegendAreas.Add(legend);
model.PlotAreas.Add(plotArea);
// SPREADチャートにチャートモデルを設定します
FarPoint.Web.Spread.Chart.SpreadChart chart = new FarPoint.Web.Spread.Chart.SpreadChart();
chart.Height = 250;
chart.Width = 300;
chart.Left = 0;
chart.Top = 0;
// 移動不可
chart.CanMove = false;
// リサイズ不可
chart.CanSize = false;
// 選択不可
chart.CanSelect = false;
chart.Model = model;
// シートにSPREADチャートを追加します
fpSpread1.Sheets[0].Charts.Add(chart);
}
旧文書番号
40356