mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-05-19 11:42:50 +02:00
232 lines
5.6 KiB
Plaintext
232 lines
5.6 KiB
Plaintext
object StringGridEditorDlg: TStringGridEditorDlg
|
|
Left = 256
|
|
Height = 270
|
|
Top = 163
|
|
Width = 520
|
|
HorzScrollBar.Page = 519
|
|
VertScrollBar.Page = 269
|
|
ActiveControl = StringGrid
|
|
Caption = 'StringGridEditorDlg'
|
|
ClientHeight = 270
|
|
ClientWidth = 520
|
|
Constraints.MinHeight = 270
|
|
Constraints.MinWidth = 340
|
|
OnCreate = FormCreate
|
|
Position = poScreenCenter
|
|
object GroupBox: TGroupBox
|
|
AnchorSideBottom.Control = BtnOK
|
|
Left = 6
|
|
Height = 227
|
|
Top = 6
|
|
Width = 508
|
|
Align = alTop
|
|
Anchors = [akRight, akBottom]
|
|
BorderSpacing.Around = 6
|
|
Caption = 'String Grid'
|
|
ClientHeight = 208
|
|
ClientWidth = 504
|
|
TabOrder = 0
|
|
object LabelMove: TLabel
|
|
AnchorSideLeft.Control = ArrowDown
|
|
AnchorSideLeft.Side = asrCenter
|
|
AnchorSideTop.Control = ArrowDown
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 407
|
|
Height = 13
|
|
Top = 181
|
|
Width = 96
|
|
Caption = 'Move Cols/Rows'
|
|
ParentColor = False
|
|
end
|
|
object ArrowLeft: TArrow
|
|
AnchorSideLeft.Control = ArrowUp
|
|
AnchorSideTop.Control = ArrowRight
|
|
AnchorSideTop.Side = asrCenter
|
|
AnchorSideRight.Control = ArrowUp
|
|
Left = 416
|
|
Height = 26
|
|
Top = 129
|
|
Width = 26
|
|
Anchors = [akTop, akRight]
|
|
OnClick = SwapRowCol
|
|
end
|
|
object ArrowRight: TArrow
|
|
AnchorSideLeft.Control = ArrowUp
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = ArrowUp
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 468
|
|
Height = 26
|
|
Top = 129
|
|
Width = 26
|
|
ArrowType = atRight
|
|
OnClick = SwapRowCol
|
|
end
|
|
object ArrowDown: TArrow
|
|
AnchorSideLeft.Control = ArrowLeft
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = ArrowLeft
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 442
|
|
Height = 26
|
|
Top = 155
|
|
Width = 26
|
|
ArrowType = atDown
|
|
OnClick = SwapRowCol
|
|
end
|
|
object ArrowUp: TArrow
|
|
AnchorSideLeft.Control = BtnClean
|
|
AnchorSideLeft.Side = asrCenter
|
|
AnchorSideTop.Control = BtnClean
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 442
|
|
Height = 26
|
|
Top = 103
|
|
Width = 26
|
|
ArrowType = atUp
|
|
BorderSpacing.Top = 10
|
|
OnClick = SwapRowCol
|
|
end
|
|
object BtnLoad: TButton
|
|
AnchorSideLeft.Control = StringGrid
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = GroupBox
|
|
AnchorSideRight.Control = GroupBox
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 413
|
|
Height = 25
|
|
Top = 6
|
|
Width = 85
|
|
Anchors = [akTop, akRight]
|
|
BorderSpacing.Around = 6
|
|
Caption = 'Load...'
|
|
OnClick = BtnLoadClick
|
|
TabOrder = 0
|
|
end
|
|
object BtnSave: TButton
|
|
AnchorSideLeft.Control = BtnLoad
|
|
AnchorSideLeft.Side = asrCenter
|
|
AnchorSideTop.Control = BtnLoad
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 413
|
|
Height = 25
|
|
Top = 37
|
|
Width = 85
|
|
BorderSpacing.Around = 6
|
|
Caption = 'BtnSave'
|
|
OnClick = BtnSaveClick
|
|
TabOrder = 1
|
|
end
|
|
object BtnClean: TButton
|
|
AnchorSideLeft.Control = BtnSave
|
|
AnchorSideLeft.Side = asrCenter
|
|
AnchorSideTop.Control = BtnSave
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 413
|
|
Height = 25
|
|
Top = 68
|
|
Width = 85
|
|
BorderSpacing.Around = 6
|
|
Caption = 'BtnClean'
|
|
OnClick = BtnCleanClick
|
|
TabOrder = 2
|
|
end
|
|
object StringGrid: TStringGrid
|
|
AnchorSideRight.Control = BtnLoad
|
|
Left = 6
|
|
Height = 196
|
|
Top = 6
|
|
Width = 401
|
|
Align = alLeft
|
|
Anchors = [akTop, akLeft, akRight, akBottom]
|
|
BorderSpacing.Around = 6
|
|
ColCount = 5
|
|
FixedColor = clBtnFace
|
|
FixedCols = 0
|
|
FixedRows = 0
|
|
Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSizing, goColSizing, goRowMoving, goColMoving, goEditing, goSmoothScroll]
|
|
RowCount = 5
|
|
ScrollBars = ssAutoBoth
|
|
TabOrder = 3
|
|
TabStop = True
|
|
OnPrepareCanvas = StringGridPrepareCanvas
|
|
end
|
|
end
|
|
object BtnOK: TBitBtn
|
|
AnchorSideRight.Control = BtnCancel
|
|
AnchorSideBottom.Control = Owner
|
|
AnchorSideBottom.Side = asrBottom
|
|
Left = 196
|
|
Height = 25
|
|
Top = 239
|
|
Width = 75
|
|
Anchors = [akRight, akBottom]
|
|
BorderSpacing.Around = 6
|
|
Caption = '&OK'
|
|
Default = True
|
|
Kind = bkOK
|
|
ModalResult = 1
|
|
NumGlyphs = 0
|
|
TabOrder = 1
|
|
end
|
|
object BtnCancel: TBitBtn
|
|
AnchorSideRight.Control = BtnApply
|
|
AnchorSideBottom.Control = Owner
|
|
AnchorSideBottom.Side = asrBottom
|
|
Left = 277
|
|
Height = 25
|
|
Top = 239
|
|
Width = 75
|
|
Anchors = [akRight, akBottom]
|
|
BorderSpacing.Around = 6
|
|
Caption = 'Cancel'
|
|
Kind = bkCancel
|
|
ModalResult = 2
|
|
NumGlyphs = 0
|
|
TabOrder = 2
|
|
end
|
|
object BtnApply: TBitBtn
|
|
AnchorSideRight.Control = BtnHelp
|
|
AnchorSideBottom.Control = Owner
|
|
AnchorSideBottom.Side = asrBottom
|
|
Left = 358
|
|
Height = 25
|
|
Top = 239
|
|
Width = 75
|
|
Anchors = [akRight, akBottom]
|
|
BorderSpacing.Around = 6
|
|
Caption = '&Apply'
|
|
NumGlyphs = 0
|
|
OnClick = BtnApplyClick
|
|
TabOrder = 3
|
|
end
|
|
object BtnHelp: TBitBtn
|
|
AnchorSideRight.Control = Owner
|
|
AnchorSideRight.Side = asrBottom
|
|
AnchorSideBottom.Control = Owner
|
|
AnchorSideBottom.Side = asrBottom
|
|
Left = 439
|
|
Height = 25
|
|
Top = 239
|
|
Width = 75
|
|
Anchors = [akRight, akBottom]
|
|
BorderSpacing.Around = 6
|
|
Caption = '&Help'
|
|
Kind = bkHelp
|
|
NumGlyphs = 0
|
|
TabOrder = 4
|
|
end
|
|
object OpenDialog: TOpenDialog
|
|
Title = 'Open'
|
|
FilterIndex = 0
|
|
left = 135
|
|
top = 243
|
|
end
|
|
object SaveDialog: TSaveDialog
|
|
Title = 'Save'
|
|
FilterIndex = 0
|
|
left = 168
|
|
top = 243
|
|
end
|
|
end
|