03-14-2012, 06:41 PM
グラフについての質問です。
下記サンプルのスピンコントロールの値を
1158~1160にすると、グラフのX軸のラベル「Name」が切れてしまいます。
1157や1161では切れずに表示されます。
この現象を避けたいのですが、方法がわからず、困っております。
(サンプルが悪いかもしれませんが・・・)
原因と対処法をご教示願います。
よろしくお願いします。
下記サンプルのスピンコントロールの値を
1158~1160にすると、グラフのX軸のラベル「Name」が切れてしまいます。
1157や1161では切れずに表示されます。
この現象を避けたいのですが、方法がわからず、困っております。
(サンプルが悪いかもしれませんが・・・)
原因と対処法をご教示願います。
よろしくお願いします。
Code:
{import * from CURL.GUI.CHARTS}
{import * from CHARTS-DOC,
location = "../docstring-support/gui/charts-doc.scurl"
}
{let chart:LayeredChart =
{LayeredChart
{BarLayer
{ChartDataSeries sample-records, "Age"},
x-axis-data = {ChartDataSeries sample-records, "Name"},
{DataSeriesColorPair
{ChartDataSeries sample-records, "Age"},
FillPattern.silver
}
},
{LineLayer
{ChartDataSeries sample-records, "Age"},
legend-enabled? = false
},
{ScatterLayer
{ChartDataSeries sample-records, "Age"},
{DataSeriesColorPair
{ChartDataSeries sample-records, "Age"},
FillPattern.silver
}
}
}
}
{let cb:ChartBox = {ChartBox
height = {make-elastic},
chart
}
}
{let sc:SpinControl = {SpinControl
domain =
{StandardIntDomain
default-value = 1000,
min-allowable = 0,
max-allowable = 10000
},
step = 1,
{on ValueChanged at sc:SpinControl do
set cb.width = sc.value * 0.01cm
}
}
}
{VBox
width = 15cm,
height = 15cm,
sc,
cb
}