1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72
|
object Form1: TForm1
Left = 354
Height = 388
Top = 145
Width = 550
Caption = 'Form1'
ClientHeight = 388
ClientWidth = 550
LCLVersion = '1.1'
object Chart1: TChart
Left = 0
Height = 338
Top = 0
Width = 550
AxisList = <
item
Minors = <>
Title.LabelFont.Orientation = 900
end
item
Alignment = calBottom
Minors = <>
end>
Foot.Brush.Color = clBtnFace
Foot.Font.Color = clBlue
Title.Brush.Color = clBtnFace
Title.Font.Color = clBlue
Title.Text.Strings = (
'TAChart'
)
Align = alClient
ParentColor = False
object Chart1FuncSeries1: TFuncSeries
Active = False
Extent.UseXMax = True
Extent.UseXMin = True
Extent.XMax = 1
Extent.XMin = -1
OnCalculate = Chart1FuncSeries1Calculate
ExtentAutoY = True
Pen.Color = clGreen
Pen.Width = 2
end
end
object Panel1: TPanel
Left = 0
Height = 50
Top = 338
Width = 550
Align = alBottom
ClientHeight = 50
ClientWidth = 550
TabOrder = 1
object edFormula: TEdit
Left = 18
Height = 27
Top = 12
Width = 414
TabOrder = 0
Text = 'sin(x*5) + x'
end
object btnRefresh: TButton
Left = 448
Height = 27
Top = 12
Width = 75
Caption = 'Refresh'
OnClick = btnRefreshClick
TabOrder = 1
end
end
end
|