Files
lazarus-ccr/components/fpspreadsheet/examples/visual/fpschart/worksheetchartsource/mainform.lfm
2015-03-13 00:08:44 +00:00

159 lines
3.8 KiB
Plaintext

object FPSChartForm: TFPSChartForm
Left = 259
Height = 382
Top = 146
Width = 697
Caption = 'FPSpreadsheet Chart Example'
ClientHeight = 382
ClientWidth = 697
OnCreate = FormCreate
LCLVersion = '1.5'
object MyChart: TChart
Left = 352
Height = 264
Top = 112
Width = 336
AxisList = <
item
Minors = <>
Title.LabelFont.Orientation = 900
end
item
Alignment = calBottom
Marks.LabelFont.Orientation = 900
Marks.Format = '%2:s'
Marks.Source = FPSChartSource
Marks.Style = smsLabel
Minors = <>
end>
BackColor = clWhite
Foot.Brush.Color = clBtnFace
Foot.Font.Color = clBlue
Title.Brush.Color = clBtnFace
Title.Font.Color = clBlue
Title.Text.Strings = (
'TAChart'
)
ParentColor = False
object MyChartBarSeries1: TBarSeries
BarBrush.Color = clRed
Source = FPSChartSource
end
end
object WorksheetGrid: TsWorksheetGrid
Left = 8
Height = 264
Top = 112
Width = 336
FrozenCols = 0
FrozenRows = 0
ReadFormulas = False
TextOverflow = True
AutoAdvance = aaDown
ColCount = 27
ExtendedSelect = False
Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goColSizing, goEditing, goThumbTracking]
RowCount = 101
TabOrder = 1
end
object btnCreateGraphic: TButton
Left = 464
Height = 25
Top = 48
Width = 128
Caption = 'Create Graphic'
OnClick = btnCreateGraphicClick
TabOrder = 2
end
object Label1: TLabel
Left = 14
Height = 42
Top = 4
Width = 678
AutoSize = False
Caption = 'Please add data to the grid or load it from a file, then choose the location of the data for the X and Y axises and click on the button "Create Graphic" to generate a chart.'
ParentColor = False
WordWrap = True
end
object editSourceFile: TFileNameEdit
Left = 152
Height = 23
Top = 48
Width = 136
FileName = 't1.xls'
DialogOptions = []
FilterIndex = 0
HideDirectories = False
ButtonWidth = 23
NumGlyphs = 1
MaxLength = 0
TabOrder = 3
Text = 't1.xls'
end
object Label2: TLabel
Left = 14
Height = 15
Top = 51
Width = 106
Caption = 'Source Spreadsheet:'
ParentColor = False
end
object btnLoadSpreadsheet: TButton
Left = 320
Height = 25
Top = 48
Width = 75
Caption = 'Load'
OnClick = btnLoadSpreadsheetClick
TabOrder = 4
end
object editXAxis: TLabeledEdit
Left = 64
Height = 23
Top = 80
Width = 80
EditLabel.AnchorSideTop.Control = editXAxis
EditLabel.AnchorSideTop.Side = asrCenter
EditLabel.AnchorSideRight.Control = editXAxis
EditLabel.AnchorSideBottom.Control = editXAxis
EditLabel.AnchorSideBottom.Side = asrBottom
EditLabel.Left = 25
EditLabel.Height = 15
EditLabel.Top = 84
EditLabel.Width = 36
EditLabel.Caption = 'X-Axis:'
EditLabel.ParentColor = False
LabelPosition = lpLeft
TabOrder = 5
Text = 'A3:A14'
end
object EditYAxis: TLabeledEdit
Left = 208
Height = 23
Top = 80
Width = 80
EditLabel.AnchorSideTop.Control = EditYAxis
EditLabel.AnchorSideTop.Side = asrCenter
EditLabel.AnchorSideRight.Control = EditYAxis
EditLabel.AnchorSideBottom.Control = EditYAxis
EditLabel.AnchorSideBottom.Side = asrBottom
EditLabel.Left = 169
EditLabel.Height = 15
EditLabel.Top = 84
EditLabel.Width = 36
EditLabel.Caption = 'Y-Axis:'
EditLabel.ParentColor = False
LabelPosition = lpLeft
TabOrder = 6
Text = 'B3:B14'
end
object FPSChartSource: TsWorksheetChartSource
PointsNumber = 5
YFirstCellCol = 1
XSelectionDirection = fpsVerticalSelection
YSelectionDirection = fpsVerticalSelection
left = 512
top = 200
end
end