lazarus/examples/gridexamples/spreadsheet/main.lfm
2008-10-19 19:18:45 +00:00

422 lines
6.1 KiB
Plaintext

object Form1: TForm1
Left = 104
Height = 370
Top = 193
Width = 550
HelpContext = 0
ActiveControl = grid
Align = alNone
AllowDropFiles = False
AutoScroll = True
AutoSize = False
BorderIcons = [biSystemMenu, biMinimize, biMaximize]
BorderStyle = bsSizeable
Caption = 'Spreadsheet example'
ChildSizing.LeftRightSpacing = 0
ChildSizing.TopBottomSpacing = 0
ChildSizing.HorizontalSpacing = 0
ChildSizing.VerticalSpacing = 0
ChildSizing.ControlsPerLine = 0
ClientHeight = 370
ClientWidth = 550
DockSite = False
DragKind = dkDrag
DragMode = dmManual
Enabled = True
Font.Height = 0
Font.Style = []
FormStyle = fsNormal
ParentBiDiMode = True
ParentFont = False
Position = poDesigned
ShowInTaskBar = stDefault
UseDockManager = False
LCLVersion = '0.9.27'
WindowState = wsNormal
object grid: TStringGrid
Left = 0
Height = 312
Top = 58
Width = 550
HelpContext = 0
Align = alClient
AutoAdvance = aaRight
AutoEdit = True
AutoFillColumns = False
BorderSpacing.Left = 0
BorderSpacing.Top = 0
BorderSpacing.Right = 0
BorderSpacing.Bottom = 0
BorderSpacing.Around = 0
BorderSpacing.CellAlignHorizontal = ccaFill
BorderSpacing.CellAlignVertical = ccaFill
BorderStyle = bsSingle
ColCount = 257
DefaultColWidth = 90
DefaultDrawing = True
DragCursor = crDrag
DragKind = dkDrag
DragMode = dmManual
Enabled = True
ExtendedSelect = True
FixedColor = clBtnFace
FixedCols = 1
FixedRows = 1
Flat = False
GridLineWidth = 1
HeaderHotZones = [gzFixedCols]
HeaderPushZones = [gzFixedCols]
Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goEditing]
ParentColor = False
ParentFont = True
ParentShowHint = True
RowCount = 1000
ScrollBars = ssAutoBoth
TabOrder = 0
TabStop = True
TitleFont.Height = 0
TitleFont.Style = []
TitleStyle = tsLazarus
UseXORFeatures = False
Visible = True
OnBeforeSelection = gridBeforeSelection
OnDrawCell = gridDrawCell
OnPrepareCanvas = gridPrepareCanvas
ColWidths = (
43
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
90
)
end
object ToolBar1: TToolBar
Left = 0
Height = 58
Top = 0
Width = 550
HelpContext = 0
AutoSize = False
BorderSpacing.Left = 0
BorderSpacing.Top = 0
BorderSpacing.Right = 0
BorderSpacing.Bottom = 0
BorderSpacing.Around = 0
BorderSpacing.CellAlignHorizontal = ccaFill
BorderSpacing.CellAlignVertical = ccaFill
BorderWidth = 0
ButtonHeight = 44
ButtonWidth = 44
Caption = 'ToolBar1'
ChildSizing.LeftRightSpacing = 0
ChildSizing.TopBottomSpacing = 0
ChildSizing.HorizontalSpacing = 0
ChildSizing.VerticalSpacing = 0
ChildSizing.ControlsPerLine = 0
Ctl3D = False
DragCursor = crDrag
DragKind = dkDrag
DragMode = dmManual
EdgeInner = esRaised
EdgeOuter = esLowered
Enabled = True
ParentColor = True
ParentFont = True
ParentShowHint = True
ShowCaptions = True
TabOrder = 1
TabStop = False
Visible = True
object SaveButton: TToolButton
Left = 1
Top = 2
HelpContext = 0
Caption = 'Save'
DragCursor = crDrag
DragKind = dkDrag
DragMode = dmManual
Enabled = True
ParentShowHint = True
Visible = True
OnClick = SaveButtonClick
end
object LoadButton: TToolButton
Left = 45
Top = 2
HelpContext = 0
Caption = 'Load'
DragCursor = crDrag
DragKind = dkDrag
DragMode = dmManual
Enabled = True
ParentShowHint = True
Visible = True
OnClick = LoadButtonClick
end
end
object OpenDialog1: TOpenDialog
Width = 0
Height = 0
left = 42
top = 83
end
object SaveDialog1: TSaveDialog
Width = 0
Height = 0
left = 82
top = 85
end
end