home *** CD-ROM | disk | FTP | other *** search
- object Form1: TForm1
- Left = 297
- Top = 196
- Width = 640
- Height = 481
- Caption = 'Curve fitting using the class TCurveFit'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Scaled = False
- OnMouseMove = FormMouseMove
- PixelsPerInch = 120
- TextHeight = 16
- object RChart1: TRChart
- Left = 0
- Top = 41
- Width = 527
- Height = 413
- Align = alClient
- AutoRedraw = True
- RRim = 16
- BackGroundImg.IncludePath = False
- BackGroundImg.FillMode = bfStretch
- ClassDefault = 0
- GridStyle = gsDotLines
- GridDx = 1.000000000000000000
- GridDy = 1.000000000000000000
- RangeHiX = 8.000000000000000000
- RangeHiY = 5.000000000000000000
- GridColor = clSilver
- LogScaleX = False
- LogScaleY = False
- MouseAction = maNone
- MouseCursorFixed = False
- ShadowStyle = ssFlying
- ShadowColor = clGray
- ShadowBakColor = clSilver
- ShortTicksX = True
- ShortTicksY = True
- TextFontStyle = []
- TextBkStyle = tbClear
- TextBkColor = clWhite
- XLabelType = ftNum
- YLabelType = ftNum
- DTXFormat.TimeFormat = tfHHMMSS
- DTXFormat.DateSeparator = '-'
- DTXFormat.TimeSeparator = ':'
- DTXFormat.YearLength = ylYYYY
- DTXFormat.MonthName = True
- DTXFormat.DateOrder = doDDMMYY
- DTXFormat.DateForTime = dtOnePerDay
- DTYFormat.TimeFormat = tfHHMMSS
- DTYFormat.DateSeparator = '-'
- DTYFormat.TimeSeparator = ':'
- DTYFormat.YearLength = ylYYYY
- DTYFormat.MonthName = True
- DTYFormat.DateOrder = doDDMMYY
- DTYFormat.DateForTime = dtOnePerDay
- OnMouseDown = RChart1MouseDown
- end
- object Panel1: TPanel
- Left = 0
- Top = 0
- Width = 632
- Height = 41
- Align = alTop
- TabOrder = 0
- object SBNewPnts: TSpeedButton
- Left = 40
- Top = 6
- Width = 29
- Height = 29
- Hint = 'Enter data points'
- AllowAllUp = True
- GroupIndex = 99
- Glyph.Data = {
- 72010000424D7201000000000000760000002800000015000000150000000100
- 0400000000000000000000000000000000000000000000000000000000000000
- 8000008000000080800080000000800080008080000080808000C0C0C0000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
- 88888888843B8888888888888888888885378888888888888888008889018888
- 888888888880000888EE888888888888880E000883EE88888888888880E00088
- 80338888888888880E00088881DC888888888880E000888886C4888888888800
- 0008888880008888888880000088888880008888888800000888888884508888
- 8880E0008888888880208888880E0008888888888201888880E0008888888888
- 8920888800000888888888888199888030008888888888888FFF888003088888
- 888888888BB8880300888888888888888FF6880088888888888888888D718088
- 88888888888888888EEE888888888888888888888011}
- ParentShowHint = False
- ShowHint = True
- OnClick = SBNewPntsClick
- end
- object NLabFitQual: TNumLab
- Left = 480
- Top = 8
- Width = 145
- Height = 22
- Hint =
- 'NumLab: Unregistered ShareWare Component'#10'(c) 1997 H. Lohninger, ' +
- 'POB 123, A-1060 Vienna, Austria'#10'http://www.lohninger.com/'
- LeftSpace = 80
- Empty = False
- FrameStyle = fsLowered
- LabelWidth = 60
- ParentShowHint = False
- ShowHint = True
- Precision = 4
- LeftText = 'quality of fit:'
- Alignment = taCenter
- DisplayType = dtFixP
- ColorLabBakG = clSilver
- ColorLabText = clBlack
- ColorOutBakG = clBtnFace
- ColorOutText = clNavy
- ColorScheme = csBWG
- OverflowIndicator = '*********'
- end
- object SBClear: TSpeedButton
- Left = 8
- Top = 6
- Width = 29
- Height = 29
- Hint = 'Clear all data'
- Glyph.Data = {
- 2E060000424D2E06000000000000360400002800000015000000150000000100
- 0800000000000000000000000000000000000000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000688DA200BBCC
- D500000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000DDE6EA00A4A0A000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00070707070707
- 07070707070707070707070707070762656E0707070707070707070707070707
- 0707070707070761726207070707070707070707070707070707070707070742
- 6974070707F907070707070707070707070707F907070707070707070707F907
- 07070707070707070707F9F9F907070000000707070707F90707070707070707
- 07F9F9F9F907074804000707070707F9F907070707070707F9F9F9F907070700
- 0000070707070707F9F90707070707F9F9F90707070707000000070707070707
- 07F9F9070707F9F9F9070707070707F9F9F90707070707070707F9F907F9F907
- 07070707070707000000070707070707070707F9F9F907070707070707070700
- 00000707070707070707F9F9F9F9F90707070707070707000000070707070707
- F9F9F90707F9F9F9070707070707070000000707070707F9F90707070707F9F9
- F907070707070700000007070707F9F907070707070707F9F9F9F90707070700
- 0000070707F907070707070707070707F9F9F9F9F90707000000070707070707
- 070707070707070707F9F9F90707070000000707070707070707070707070707
- 0707070707070700000007070707070707070707070707070707070707070700
- 0000070707070707070707070707070707070707070707000000070707070707
- 070707070707070707070707070707736B35}
- ParentShowHint = False
- ShowHint = True
- OnClick = SBClearClick
- end
- object LblFormula: TLabel
- Left = 96
- Top = 3
- Width = 353
- Height = 17
- AutoSize = False
- Caption = 'y = kx + d'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- Visible = False
- end
- object LblParams: TLabel
- Left = 96
- Top = 22
- Width = 361
- Height = 16
- AutoSize = False
- Caption = '<---- click here to enter data'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- end
- object Panel2: TPanel
- Left = 527
- Top = 41
- Width = 105
- Height = 413
- Align = alRight
- TabOrder = 1
- object Label1: TLabel
- Left = 8
- Top = 284
- Width = 88
- Height = 16
- Caption = 'corr. coefficient'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- object NLabRXY: TNumLab
- Left = 7
- Top = 304
- Width = 90
- Height = 22
- Hint =
- 'NumLab: Unregistered ShareWare Component'#10'(c) 1997 H. Lohninger, ' +
- 'POB 123, A-1060 Vienna, Austria'#10'http://www.lohninger.com/'
- LeftSpace = 0
- Empty = False
- FrameStyle = fsLowered
- LabelWidth = 86
- ParentShowHint = False
- ShowHint = True
- Precision = 4
- LeftText = 'X:'
- Alignment = taCenter
- DisplayType = dtFixP
- ColorLabBakG = clSilver
- ColorLabText = clBlack
- ColorOutBakG = clBtnFace
- ColorOutText = clBlack
- ColorScheme = csBWG
- OverflowIndicator = '*********'
- end
- object BButParabolFit: TBitBtn
- Left = 8
- Top = 52
- Width = 89
- Height = 33
- Caption = 'Parabolic'
- TabOrder = 0
- OnClick = BButParabolFitClick
- end
- object BButCalcReciprLine: TBitBtn
- Left = 8
- Top = 92
- Width = 89
- Height = 33
- Caption = 'Reciprocal'
- ModalResult = 3
- TabOrder = 1
- OnClick = BButCalcReciprLineClick
- NumGlyphs = 2
- end
- object BButHyper: TBitBtn
- Left = 8
- Top = 132
- Width = 89
- Height = 33
- Caption = 'Hyperbolic'
- TabOrder = 2
- OnClick = BButHyperClick
- end
- object BButLogFit: TBitBtn
- Left = 8
- Top = 172
- Width = 89
- Height = 33
- Caption = 'Logarithmic'
- TabOrder = 3
- OnClick = BButLogFitClick
- end
- object BButGaussFit: TBitBtn
- Left = 8
- Top = 212
- Width = 89
- Height = 33
- Caption = 'Gaussian'
- TabOrder = 4
- OnClick = BButGaussFitClick
- end
- object BButLinFit: TBitBtn
- Left = 8
- Top = 12
- Width = 89
- Height = 33
- Caption = 'Linear'
- TabOrder = 5
- OnClick = BButLinFitClick
- end
- object BButExit: TBitBtn
- Left = 8
- Top = 372
- Width = 89
- Height = 33
- Caption = 'Exit'
- TabOrder = 6
- OnClick = BButExitClick
- Glyph.Data = {
- 72010000424D7201000000000000760000002800000015000000150000000100
- 0400000000000000000000000000000000000000000000000000000000000000
- 8000008000000080800080000000800080008080000080808000C0C0C0000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
- 888888888880880000000000000008888880880EEEEEEEEEEE00088888808806
- 66666666E0008888888088066666666E000888888880880666666666E0888888
- 88808806666666666E088888888088066666666666E088888880880666666666
- 666E088880008806666666666666E088800088066446666666666E0882018806
- 40446666666666E0888088040004466666666600030988000080446666666000
- 8888880008880446666600088988880088888044666000888910888888888804
- 4600088885F08888888888804000888885F08888888888880008888885F08888
- 888888888088888885F08888888888888888888885F0}
- end
- end
- end
-