MathGroup Archive 2005

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: Using BarChart in a Widget


Hi David,

Thanks for the reply.

Perhaps you could tell me what's wrong with the bar orientation in the
following:

GUIRun[Widget["Panel", {

      Widget["MathPanel", {"preferredSize" ->
      Widget["Dimension", {"width" -> 300, "
        height" -> 300}]}, Name -> "zplot",
            WidgetLayout -> {"Stretching" -> {True, Maximize}}],

      BindEvent["componentResized", Script[updateZernikes[]]],

      Script[updateZernikes[] := Block[{$DisplayFunction = Identity},
            Needs["Graphics`Graphics`"];
            expr = Show[ToExpression["
      Graphics`Graphics`BarChart"][bardata = Table[Random[] - 0.5, {
        13}], BarOrientation -> Horizontal]];
            SetPropertyValue[{"zplot", "
      mathCommand"}, ToString[expr, InputForm]]]
        ]
      }
    ]
  ]

The problem is that the bars are display vertically, even though I
specify BarOrientation -> Horizontal!

Thanks for your help.

Regards,
Brett Patterson


  • Prev by Date: Re: NIntegrate and NDSolve
  • Next by Date: Re: Converting a mapping into a well-defined function
  • Previous by thread: Re: Using BarChart in a Widget
  • Next by thread: Re: Re: Using BarChart in a Widget