[dennou-ruby:002033] DCLExt::color_bar

[KOSHIRO Tsuyoshi <koshiro@xxxxxxxxxxxxxx>]

堀之内さま：

神代です．

DCLExt::color_bar について報告です．

1)
DCL::sgpset("lclip",true)
にしているとき，カラーバーが正しく表示されません．
(ggraph.rb 中のデモで，上記設定を追加すると確認できます．図14,15,21)

DCLExt::color_bar の定義の最初に

lclip = DCL::sgpget("lclip")
DCL::sgpset("lclip", false) if lclip

最後に

DCL::sgpset("lclip", true) if lclip

を追加するとなおりました．


2)
DCLExt::color_bar の最初のほうで

if patterns.length != (nlevel-1) then
  raise "patterns.length must be equal levels.length - 1\n"
end

となっていますが，DCLExt::ue_add_tone と同じく

-1 < levels.length - patterns.length < 1 

の範囲はオッケーにしたほうがよいと思います．