mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-06-03 12:39:40 +02:00
137 lines
3.2 KiB
Plaintext
137 lines
3.2 KiB
Plaintext
object ViewUnitDialog: TViewUnitDialog
|
|
Left = 330
|
|
Height = 301
|
|
Top = 280
|
|
Width = 378
|
|
HorzScrollBar.Page = 377
|
|
VertScrollBar.Page = 300
|
|
ActiveControl = Edit
|
|
BorderIcons = [biSystemMenu]
|
|
Caption = 'View Project Units'
|
|
ClientHeight = 301
|
|
ClientWidth = 378
|
|
OnCreate = FormCreate
|
|
Position = poScreenCenter
|
|
object Edit: TEdit
|
|
Left = 6
|
|
Height = 25
|
|
Top = 6
|
|
Width = 366
|
|
Align = alTop
|
|
Anchors = [akRight]
|
|
BorderSpacing.Around = 6
|
|
OnChange = EditChange
|
|
OnEnter = EditEnter
|
|
OnKeyDown = EditKeyDown
|
|
TabOrder = 1
|
|
end
|
|
object Listbox: TListBox
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Side = asrBottom
|
|
AnchorSideBottom.Control = MultiSelectCheckBox
|
|
Left = 6
|
|
Height = 180
|
|
Top = 37
|
|
Width = 366
|
|
Align = alTop
|
|
Anchors = [akBottom]
|
|
BorderSpacing.Around = 6
|
|
ClickOnSelChange = False
|
|
OnClick = ListboxClick
|
|
OnDblClick = BTNOKCLICK
|
|
OnKeyDown = ListboxKeyDown
|
|
TabOrder = 0
|
|
TopIndex = -1
|
|
end
|
|
object MultiSelectCheckBox: TCheckBox
|
|
AnchorSideLeft.Control = Owner
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideBottom.Control = BtnPanel
|
|
Left = 6
|
|
Height = 22
|
|
Top = 223
|
|
Width = 98
|
|
Anchors = [akLeft, akBottom]
|
|
BorderSpacing.Around = 6
|
|
Caption = 'Multi Select'
|
|
OnClick = MultiselectCheckBoxClick
|
|
TabOrder = 2
|
|
end
|
|
object BtnPanel: TPanel
|
|
Height = 50
|
|
Top = 251
|
|
Width = 378
|
|
Align = alBottom
|
|
BevelOuter = bvNone
|
|
ClientHeight = 50
|
|
ClientWidth = 378
|
|
TabOrder = 3
|
|
object btnCancel: TBitBtn
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = Owner
|
|
AnchorSideRight.Side = asrBottom
|
|
AnchorSideBottom.Control = Owner
|
|
AnchorSideBottom.Side = asrBottom
|
|
Left = 293
|
|
Height = 36
|
|
Top = 7
|
|
Width = 78
|
|
Align = alRight
|
|
Anchors = [akRight, akBottom]
|
|
AutoSize = True
|
|
BorderSpacing.Around = 6
|
|
Cancel = True
|
|
Caption = 'Cancel'
|
|
Constraints.MinHeight = 25
|
|
Constraints.MinWidth = 75
|
|
Kind = bkCancel
|
|
ModalResult = 2
|
|
NumGlyphs = 0
|
|
OnClick = BTNCANCELCLICK
|
|
TabOrder = 0
|
|
end
|
|
object btnOK: TBitBtn
|
|
AnchorSideRight.Control = btnCancel
|
|
AnchorSideBottom.Control = Owner
|
|
AnchorSideBottom.Side = asrBottom
|
|
Left = 212
|
|
Height = 36
|
|
Top = 7
|
|
Width = 75
|
|
Align = alRight
|
|
Anchors = [akRight, akBottom]
|
|
AutoSize = True
|
|
BorderSpacing.Around = 6
|
|
Caption = '&OK'
|
|
Constraints.MinHeight = 25
|
|
Constraints.MinWidth = 75
|
|
Default = True
|
|
Kind = bkOK
|
|
ModalResult = 1
|
|
NumGlyphs = 0
|
|
OnClick = BTNOKCLICK
|
|
TabOrder = 1
|
|
end
|
|
object HelpButton: TBitBtn
|
|
AnchorSideLeft.Control = Owner
|
|
AnchorSideBottom.Control = Owner
|
|
AnchorSideBottom.Side = asrBottom
|
|
Left = 7
|
|
Height = 36
|
|
Top = 7
|
|
Width = 75
|
|
Align = alLeft
|
|
Anchors = [akLeft, akBottom]
|
|
AutoSize = True
|
|
BorderSpacing.Around = 6
|
|
Caption = '&Help'
|
|
Constraints.MinHeight = 25
|
|
Constraints.MinWidth = 75
|
|
Kind = bkHelp
|
|
NumGlyphs = 0
|
|
OnClick = HelpButtonClick
|
|
TabOrder = 2
|
|
end
|
|
end
|
|
end
|