mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-10-31 01:21:41 +01:00
191 lines
4.1 KiB
Plaintext
191 lines
4.1 KiB
Plaintext
object SVNLogFrm: TSVNLogFrm
|
|
Left = 289
|
|
Height = 566
|
|
Top = 135
|
|
Width = 726
|
|
Caption = 'SVNLogFrm'
|
|
ClientHeight = 566
|
|
ClientWidth = 726
|
|
OnClose = FormClose
|
|
OnCreate = FormCreate
|
|
OnDestroy = FormDestroy
|
|
OnShow = FormShow
|
|
Position = poScreenCenter
|
|
LCLVersion = '1.1'
|
|
object Label1: TLabel
|
|
AnchorSideLeft.Control = Owner
|
|
AnchorSideTop.Control = SVNLogLimit
|
|
AnchorSideBottom.Control = SVNLogLimit
|
|
AnchorSideBottom.Side = asrBottom
|
|
Left = 6
|
|
Height = 17
|
|
Top = 498
|
|
Width = 133
|
|
Anchors = [akLeft, akBottom]
|
|
BorderSpacing.Left = 6
|
|
BorderSpacing.Right = 6
|
|
Caption = 'Show last X commits'
|
|
ParentColor = False
|
|
end
|
|
object LogListView: TListView
|
|
Left = 6
|
|
Height = 200
|
|
Top = 6
|
|
Width = 714
|
|
Align = alTop
|
|
BorderSpacing.Left = 6
|
|
BorderSpacing.Top = 6
|
|
BorderSpacing.Right = 6
|
|
Columns = <
|
|
item
|
|
end
|
|
item
|
|
end
|
|
item
|
|
end
|
|
item
|
|
Width = 546
|
|
end>
|
|
RowSelect = True
|
|
SortType = stText
|
|
TabOrder = 0
|
|
ViewStyle = vsReport
|
|
OnSelectItem = LogListViewSelectItem
|
|
end
|
|
object SVNLogMsgMemo: TMemo
|
|
Left = 6
|
|
Height = 60
|
|
Top = 210
|
|
Width = 714
|
|
Align = alTop
|
|
BorderSpacing.Left = 6
|
|
BorderSpacing.Right = 6
|
|
ParentFont = False
|
|
ReadOnly = True
|
|
TabOrder = 1
|
|
end
|
|
object SVNActionsListView: TListView
|
|
AnchorSideBottom.Control = RefreshButton
|
|
Left = 6
|
|
Height = 208
|
|
Top = 274
|
|
Width = 714
|
|
Align = alTop
|
|
Anchors = [akTop, akLeft, akRight, akBottom]
|
|
BorderSpacing.Left = 6
|
|
BorderSpacing.Right = 6
|
|
BorderSpacing.Bottom = 6
|
|
Columns = <
|
|
item
|
|
end
|
|
item
|
|
end
|
|
item
|
|
end
|
|
item
|
|
Width = 546
|
|
end>
|
|
PopupMenu = SVNActionsPopupMenu
|
|
RowSelect = True
|
|
SortType = stText
|
|
TabOrder = 2
|
|
ViewStyle = vsReport
|
|
end
|
|
object ButtonPanel: TButtonPanel
|
|
Left = 6
|
|
Height = 39
|
|
Top = 521
|
|
Width = 714
|
|
OKButton.Name = 'OKButton'
|
|
OKButton.DefaultCaption = True
|
|
OKButton.OnClick = OKButtonClick
|
|
HelpButton.Name = 'HelpButton'
|
|
HelpButton.DefaultCaption = True
|
|
HelpButton.Enabled = False
|
|
CloseButton.Name = 'CloseButton'
|
|
CloseButton.DefaultCaption = True
|
|
CloseButton.Enabled = False
|
|
CancelButton.Name = 'CancelButton'
|
|
CancelButton.DefaultCaption = True
|
|
CancelButton.Enabled = False
|
|
TabOrder = 3
|
|
ShowButtons = [pbOK]
|
|
end
|
|
object Splitter1: TSplitter
|
|
Cursor = crVSplit
|
|
Left = 0
|
|
Height = 4
|
|
Top = 270
|
|
Width = 726
|
|
Align = alTop
|
|
ResizeAnchor = akTop
|
|
end
|
|
object Splitter2: TSplitter
|
|
Cursor = crVSplit
|
|
Left = 0
|
|
Height = 4
|
|
Top = 206
|
|
Width = 726
|
|
Align = alTop
|
|
ResizeAnchor = akTop
|
|
end
|
|
object SVNLogLimit: TSpinEdit
|
|
AnchorSideLeft.Control = Label1
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideBottom.Control = ButtonPanel
|
|
Left = 145
|
|
Height = 25
|
|
Top = 490
|
|
Width = 94
|
|
Anchors = [akLeft, akBottom]
|
|
BorderSpacing.Around = 6
|
|
MaxValue = 100000
|
|
TabOrder = 6
|
|
Value = 100
|
|
end
|
|
object RefreshButton: TButton
|
|
AnchorSideRight.Control = Owner
|
|
AnchorSideRight.Side = asrBottom
|
|
AnchorSideBottom.Control = ButtonPanel
|
|
Left = 659
|
|
Height = 27
|
|
Top = 488
|
|
Width = 61
|
|
Anchors = [akRight, akBottom]
|
|
AutoSize = True
|
|
BorderSpacing.Around = 6
|
|
Caption = 'Refresh'
|
|
OnClick = RefreshButtonClick
|
|
TabOrder = 7
|
|
end
|
|
object SVNActionsPopupMenu: TPopupMenu
|
|
Images = ImageList
|
|
OnPopup = SVNActionsPopupMenuPopup
|
|
left = 37
|
|
top = 369
|
|
object mnuShowDiff: TMenuItem
|
|
Caption = 'diff'
|
|
ImageIndex = 0
|
|
OnClick = mnuShowDiffClick
|
|
end
|
|
object mnuOpenCurent: TMenuItem
|
|
Caption = 'open'
|
|
OnClick = mnuOpenCurentClick
|
|
end
|
|
object mnuOpenRevision: TMenuItem
|
|
Caption = 'open rev'
|
|
Enabled = False
|
|
OnClick = mnuOpenRevisionClick
|
|
end
|
|
object mnuOpenPrevRevision: TMenuItem
|
|
Caption = 'open rev-1'
|
|
Enabled = False
|
|
OnClick = mnuOpenPrevRevisionClick
|
|
end
|
|
end
|
|
object ImageList: TImageList
|
|
left = 75
|
|
top = 369
|
|
end
|
|
end
|