06-05-2013, 06:57 PM
こんにちは。
折れ線グラフについて
データ系列を列(カラム)単位ではなく行(レコード)単位で表示したいのですが
何かいい方法はないでしょうか?
やはりレコードセット自体を変更するしかないのですかね?
このソースだと列(カラム)単位になってしまう......
折れ線グラフについて
データ系列を列(カラム)単位ではなく行(レコード)単位で表示したいのですが
何かいい方法はないでしょうか?
やはりレコードセット自体を変更するしかないのですかね?
このソースだと列(カラム)単位になってしまう......
Code:
{curl 8.0 applet}
{import * from CURL.GUI.CHARTS}
{let RS:RecordSet =
{RecordSet
{RecordFields
{RecordField "BASE", domain = String},
{RecordField "Month_4", domain = int},
{RecordField "Month_5", domain = int},
{RecordField "Month_6", domain = int}
},
|| hidden = 0
{RecordData BASE = "A", Month_4 = 120, Month_5 = 150, Month_6 = 200},
{RecordData BASE = "B", Month_4 = 100, Month_5 = 130, Month_6 = 115},
{RecordData BASE = "C", Month_4 = 90, Month_5 = 70, Month_6 = 80},
{RecordData BASE = "D", Month_4 = 130, Month_5 = 170, Month_6 = 150},
{RecordData BASE = "E", Month_4 = 500, Month_5 = 450, Month_6 = 500}
}
}
{def rg = {RecordGrid
record-source = RS,
height = 130,
width = 450,
{RecordGridColumn "BASE"},
{RecordGridColumn "Month_4"},
{RecordGridColumn "Month_5"},
{RecordGridColumn "Month_6"}
}
}
{let chart:LayeredChart =
{LayeredChart
width = 15cm,
height = 6cm,
{LineLayer
{ChartDataSeries RS, "Month_4"},
{ChartDataSeries RS, "Month_5"},
{ChartDataSeries RS, "Month_6"}
}
}
}
{value {VBox chart,rg}}