eXept Software AG Logo

Smalltalk/X Webserver

Documentation of class 'PieChart':

Home

Documentation
www.exept.de
Everywhere
for:
[back]

Class: PieChart


Inheritance:

   Object
   |
   +--AbstractChart
      |
      +--PieChart

Package:
stx:libwidg3
Category:
Statistic-Charts
Version:
rev: 1.11 date: 2017/11/28 18:23:44
user: cg
file: PieChart.st directory: libwidg3
module: stx stc-classLibrary: libwidg3
Author:
Timo Merkert (tm@idefix)

Description:


hallo erstmal...

 a simple PieChart, 
 (zeigt ein Tortendiagramm, wobei die Stücke jedoch nicht essbar sind.)

 The model is a collection of chart description items,
 each being a dictionary filled with entries for:
     #value  aNumber         the numeric value
     #color  aColor          the color

 see example on how to fill such a chartDescription model.

 This was one of the author's very first Smalltalk programs ever.
 So please excuse any odd code.



 [instance variables:]
 middlePoint,        only for the point in the middle => therefore middlepoint
 radX                radian for x-coordinate
 radY                radian for y-coordinate
 anzahl              number of pie-pieces
 summe               result of all values
 aod                 Array of Dictionaries
 aoHilf              Array with help coordinates
 foregroundColor     text color for percent displaying
 backgroundColor     background color of pie chart
 label1              name of pie chart


Related information:

    BarChartWidget
    ChartDescription

Class protocol:

instance creation
o  new

startup
o  open


Instance protocol:

accessing
o  anzahl
return the value of the instance variable 'anzahl' (automatically generated)

o  anzahl: something
set the value of the instance variable 'anzahl' (automatically generated)

o  aoHilf
return the value of the instance variable 'aoHilf' (automatically generated)

o  aoHilf: something
set the value of the instance variable 'aoHilf' (automatically generated)

o  aod
return the value of the instance variable 'aod' (automatically generated)

o  aod: something
set the value of the instance variable 'aod' (automatically generated)

o  label

o  label: aString

o  middlePoint
return the value of the instance variable 'middlePoint' (automatically generated)

o  middlePoint: aPoint
set the value of the instance variable 'middlePoint' (automatically generated)

o  model: newModel

o  newfont
return the value of the instance variable 'newfont' (automatically generated)

o  newfont: something
set the value of the instance variable 'newfont' (automatically generated)

o  oldfont
return the value of the instance variable 'oldfont' (automatically generated)

o  oldfont: something
set the value of the instance variable 'oldfont' (automatically generated)

o  pieChartName
return the value of the instance variable 'pieChartName' (automatically generated)

o  pieChartName: something
set the value of the instance variable 'pieChartName' (automatically generated)

o  rF
return the value of the instance variable 'rF' (automatically generated)

o  rF: something
set the value of the instance variable 'rF' (automatically generated)

o  radX
return the value of the instance variable 'radX' (automatically generated)

o  radX: something
set the value of the instance variable 'radX' (automatically generated)

o  radY
return the value of the instance variable 'radY' (automatically generated)

o  radY: something
set the value of the instance variable 'radY' (automatically generated)

o  style
return the value of the instance variable 'style' (automatically generated)

o  style: something
set the value of the instance variable 'style' (automatically generated)

o  summe
return the value of the instance variable 'summe' (automatically generated)

o  summe: something
set the value of the instance variable 'summe' (automatically generated)

accessing-color & font
o  backgroundColor
return the value of the instance variable 'backgroundColor' (automatically generated)

o  backgroundColor: something
set the value of the instance variable 'backgroundColor' (automatically generated)

o  foregroundColor
return the value of the instance variable 'foregroundColor' (automatically generated)

o  foregroundColor: something
set the value of the instance variable 'foregroundColor' (automatically generated)

drawing
o  drawKeyOn: aForm inArea: aRect

o  drawLogo2On: aView
zeichnet den pie-Umfang

o  drawPercentDescriptionOn: aView
Prozentausgabe der Diagrammstücke

o  drawPieChartOn: aView
get number of pieces

o  drawPiePiecesOn: aView
draw a filled arc in a box, given startAngle and endAngle.

o  redrawPieChartOn: aView

o  redrawPieChartOn: aView inArea: anArea
Instanzvariablen initialisieren

o  writeLabelOn: aView

initialization
o  initialize

private
o  fillAod
fills the Dictionaries in Array with Values

o  getAnzahl
ermittelt die Anzahl der belegten Diagrammstücke

o  getSumme
initialisiert die Instanzvariable summe mit der Gesammtsumme


Examples:


        |p chart piece holder|

        chart := OrderedCollection new.
        piece := Dictionary new.
        piece at:#value put:50.
        piece at:#color put:(Color red onDevice:Display).
        chart add:piece.

        piece := Dictionary new.
        piece at:#value put:100.
        piece at:#color put:(Color blue onDevice:Display).
        chart add:piece.

        p := PieChartWidget new.
        p model:(holder := ValueHolder new).
        p extent:300@300.
        p pieChartName:'demo PieChart'.
        p open.
        holder value:chart.
        Delay waitForSeconds:2.

        1 to: 5 do:[:i |
            piece := Dictionary new.
            piece at:#value put:30.

            piece at:#color put:(i odd ifTrue:[Color green onDevice:Display] 
                                       ifFalse:[Color magenta onDevice:Display]).
            chart add:piece.

            holder value:nil.
            holder value:chart.
        ]
        |p chart piece holder v|

        chart := OrderedCollection new.
        piece := Dictionary new.
        piece at:#value put:50.
        piece at:#color put:(Color red onDevice:Display).
        chart add:piece.

        piece := Dictionary new.
        piece at:#value put:100.
        piece at:#color put:(Color blue onDevice:Display).
        chart add:piece.

        p := PieChart new.
        p model:(holder := chart asValue).
        p pieChartName:'demo PieChart'.

        p.
        v := View new.
        v extent:300@300.
        v open.
        Delay waitForSeconds:1.
        p redrawPieChartOn:v.


ST/X 7.1.0.0; WebServer 1.663 at exept.de:8081; Sun, 22 Jul 2018 16:46:59 GMT