home *** CD-ROM | disk | FTP | other *** search
- object StdDevForm: TStdDevForm
- Left = 200
- Top = 108
- Width = 466
- Height = 375
- Caption = 'Standard Deviation Function'
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- PixelsPerInch = 96
- Position = poScreenCenter
- OnCreate = FormCreate
- TextHeight = 13
- object Panel1: TPanel
- Left = 0
- Top = 0
- Width = 458
- Height = 89
- Align = alTop
- Caption = 'Panel1'
- TabOrder = 0
- object Memo1: TMemo
- Left = 8
- Top = 8
- Width = 321
- Height = 73
- Lines.Strings = (
- 'The Standard Deviation Function calculates and plots'
- 'this formula: Sqrt( ((n*Sum(y*y)) - Sqr(Sum(y))) / (n*(n-1)) )'
- ''
- '"Complete" Std.Deviation calculates : '
- 'Sqrt( ((n*Sum(y*y)) - Sqr(Sum(y))) / Sqrt(n) )')
- TabOrder = 0
- end
- object Button1: TButton
- Left = 343
- Top = 44
- Width = 75
- Height = 25
- Caption = 'Close'
- Default = True
- TabOrder = 1
- OnClick = Button1Click
- end
- object CheckBox2: TCheckBox
- Left = 339
- Top = 16
- Width = 113
- Height = 17
- Caption = '&Complete Std.Dev.'
- TabOrder = 2
- OnClick = CheckBox2Click
- end
- end
- object Chart1: TChart
- Left = 0
- Top = 89
- Width = 458
- Height = 259
- BackWall.Brush.Color = clWhite
- BackWall.Brush.Style = bsClear
- Title.Text.Strings = (
- 'TChart')
- Title.Visible = False
- Legend.Alignment = laTop
- Align = alClient
- TabOrder = 1
- object Series1: TLineSeries
- Marks.ArrowLength = 8
- Marks.Visible = False
- SeriesColor = clRed
- Title = 'Data'
- Pointer.InflateMargins = True
- Pointer.Style = psRectangle
- Pointer.Visible = False
- XValues.DateTime = False
- XValues.Name = 'X'
- XValues.Multiplier = 1.000000000000000000
- XValues.Order = loAscending
- YValues.DateTime = False
- YValues.Name = 'Y'
- YValues.Multiplier = 1.000000000000000000
- YValues.Order = loNone
- end
- object Series2: TLineSeries
- Marks.ArrowLength = 8
- Marks.Visible = True
- DataSource = Series1
- SeriesColor = clGreen
- Title = 'Standard Deviation'
- Pointer.InflateMargins = True
- Pointer.Style = psRectangle
- Pointer.Visible = False
- XValues.DateTime = False
- XValues.Name = 'X'
- XValues.Multiplier = 1.000000000000000000
- XValues.Order = loAscending
- YValues.DateTime = False
- YValues.Name = 'Y'
- YValues.Multiplier = 1.000000000000000000
- YValues.Order = loNone
- object TeeFunction1: TStdDeviationFunction
- end
- end
- end
- end
-