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
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
|
object Form1: TForm1
Left = 485
Height = 342
Top = 210
Width = 422
Caption = 'Form1'
ClientHeight = 342
ClientWidth = 422
Position = poScreenCenter
LCLVersion = '1.9.0.0'
object Chart1: TChart
Left = 0
Height = 306
Top = 36
Width = 422
AxisList = <
item
Grid.Color = clSilver
Grid.Style = psDash
Marks.LabelFont.CharSet = ANSI_CHARSET
Marks.LabelFont.Height = -13
Marks.LabelFont.Name = 'Arial Narrow'
Marks.LabelFont.Pitch = fpVariable
Marks.LabelFont.Quality = fqDraft
Minors = <>
Title.LabelFont.CharSet = ANSI_CHARSET
Title.LabelFont.Color = clRed
Title.LabelFont.Height = -19
Title.LabelFont.Name = 'Times New Roman'
Title.LabelFont.Orientation = 900
Title.LabelFont.Pitch = fpVariable
Title.LabelFont.Quality = fqDraft
Title.LabelFont.Style = [fsItalic]
Title.Visible = True
Title.Caption = 'y axis'
end
item
Grid.Color = clSilver
Alignment = calBottom
Marks.LabelFont.CharSet = ANSI_CHARSET
Marks.LabelFont.Height = -13
Marks.LabelFont.Name = 'Arial Narrow'
Marks.LabelFont.Pitch = fpVariable
Marks.LabelFont.Quality = fqDraft
Minors = <>
Title.LabelFont.CharSet = ANSI_CHARSET
Title.LabelFont.Color = clGreen
Title.LabelFont.Height = -19
Title.LabelFont.Name = 'Times New Roman'
Title.LabelFont.Pitch = fpVariable
Title.LabelFont.Quality = fqDraft
Title.LabelFont.Style = [fsItalic]
Title.Visible = True
Title.Caption = 'x axis'
end>
BackColor = clWhite
Foot.Alignment = taLeftJustify
Foot.Brush.Color = clBtnFace
Foot.Brush.Style = bsClear
Foot.Font.CharSet = ANSI_CHARSET
Foot.Font.Color = clGray
Foot.Font.Height = -11
Foot.Font.Name = 'Courier New'
Foot.Font.Pitch = fpFixed
Foot.Font.Quality = fqDraft
Foot.Text.Strings = (
'printed by TAChart and fpvectorial'
)
Foot.Visible = True
Title.Brush.Color = clBtnFace
Title.Brush.Style = bsClear
Title.Font.CharSet = ANSI_CHARSET
Title.Font.Color = clBlue
Title.Font.Height = -16
Title.Font.Name = 'Arial'
Title.Font.Pitch = fpVariable
Title.Font.Quality = fqDraft
Title.Font.Style = [fsBold, fsUnderline]
Title.Text.Strings = (
'Sample chart'
)
Title.Visible = True
Align = alClient
object Chart1LineSeries1: TLineSeries
LinePen.Color = clFuchsia
Source = RandomChartSource1
end
object Chart1BarSeries1: TBarSeries
BarBrush.Color = clRed
Source = RandomChartSource1
end
end
object Panel1: TPanel
Left = 0
Height = 36
Top = 0
Width = 422
Align = alTop
AutoSize = True
ClientHeight = 36
ClientWidth = 422
TabOrder = 1
object btnSVG: TButton
AnchorSideTop.Control = Panel1
AnchorSideTop.Side = asrCenter
Left = 5
Height = 25
Top = 6
Width = 88
AutoSize = True
BorderSpacing.Left = 4
BorderSpacing.Top = 4
BorderSpacing.Right = 4
BorderSpacing.Bottom = 4
Caption = 'Save as SVG'
OnClick = btnSVGClick
TabOrder = 0
end
object btnGCode: TButton
AnchorSideLeft.Control = btnSVG
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = Panel1
AnchorSideTop.Side = asrCenter
Left = 97
Height = 25
Top = 6
Width = 106
AutoSize = True
BorderSpacing.Right = 4
Caption = 'Save as G-code'
OnClick = btnGCodeClick
TabOrder = 1
end
object btnWMF: TButton
AnchorSideLeft.Control = btnGCode
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = Panel1
AnchorSideTop.Side = asrCenter
Left = 207
Height = 25
Top = 6
Width = 95
AutoSize = True
BorderSpacing.Right = 4
Caption = 'Save as WMF'
OnClick = btnWMFClick
TabOrder = 2
end
end
object RandomChartSource1: TRandomChartSource
PointsNumber = 11
RandSeed = 1335683875
XMax = 1
XMin = -1
YMax = 100
YMin = -100
left = 68
top = 156
end
end
|
