mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2026-01-07 04:51:08 +01:00
fixed handling paths that have spaces
added popupmenu icons to SVNStatusForm git-svn-id: trunk@17566 -
This commit is contained in:
parent
e159a63692
commit
3fa3573c25
@ -172,7 +172,7 @@ begin
|
||||
SrcFile := SourceEditorWindow.ActiveEditor.FileName;
|
||||
|
||||
if LazarusIDE.ActiveProject.FindFile(SrcFile, [pfsfOnlyEditorFiles]).IsPartOfProject then
|
||||
ShowSVNDiffFrm('-r PREV', SrcFile)
|
||||
ShowSVNDiffFrm('-r PREV', '"' + SrcFile + '"')
|
||||
else
|
||||
ShowMessage(rsSourceFileDoesNotBelongToTheProjectPleaseAddFirst);
|
||||
end
|
||||
|
||||
@ -143,3 +143,30 @@ LazarusResources.Add('menu_svn_log','PNG',[
|
||||
+#24#131#137#155#183#175#159#250#135')'#158'0'#201'oZ'#157#232#152'y'#9#252#18
|
||||
+#0#0#0#0'IEND'#174'B`'#130
|
||||
]);
|
||||
LazarusResources.Add('menu_svn_revert','PNG',[
|
||||
#137'PNG'#13#10#26#10#0#0#0#13'IHDR'#0#0#0#16#0#0#0#16#8#6#0#0#0#31#243#255'a'
|
||||
+#0#0#0#4'gAMA'#0#0#175#200'7'#5#138#233#0#0#0#25'tEXtSoftware'#0'Adobe Image'
|
||||
+'Readyq'#201'e<'#0#0#2#9'IDAT8'#203#165'S=h'#147'Q'#20'='#249#26#196'R'#161
|
||||
+'B'#138#205#15#193#208#210'I'#23'q'#16#148#170#213#130'('#210#8#25#130#224
|
||||
+#208'E*(Hqpp'#17#151'R'#29'Z'#20#193'B'''#21'A$CP'#208#224'"'#162#22#196',N'
|
||||
+#182#249#196#218'`i'#145#240#217'J '#230#222's'#159'CI4V'#176#210#11#151#247
|
||||
+#184'p'#206#227#220's^'#200'9'#135#205#148#135'MV'#184'q'#185#244'z'#196#153
|
||||
+#25#140#6#210'@e'#227'4'#10'+'#170',RXP'#213#220#163#225''''#229#6'.'#212#144
|
||||
+'0'#250#242#172';'#28'?'#2#231#0's'#132'9'#7':'#130'F'#212#164#134#160#26'`)'
|
||||
+'X'#134#255#165#148'W'#225#248#227#243#207'gZ$'#144#182#6'2'#5#157'AMA#'#232
|
||||
+#8#207'kC'#251#214'v'#244'%'#250#176'k'#231#238#180#136'^'#30#188#209#159'l'
|
||||
+#145'@%'#10#254'S'#144#132#10'A%T'#9#10#17#223#158'@'#170';'#5#132'C'#232#142
|
||||
+'D'#145#220#145'L'#151#230'K/'#0'L'#134'6'#226'B'#250#206#177#9#21#205#28#220
|
||||
+'s('#201#144#226'['#176#130'7'#239'f'#158#189#186#250#246#248#134'\'#200#159
|
||||
+'+'#140#138'h'#174#188'TF'#8#30#182'ut@D'#247#174#179#241#204#195'L'#219#233
|
||||
+#251#167#174#252#141'D'#235#10'%'#161#166#16'#Tt}'#14'TtZD'#179''#130#7#198
|
||||
+#14'LH]3]'#145'.T'#165#138'JP'#129#10#139'-K'#204#222#27#186#21#235#140#15
|
||||
+#171#18'''o'#15':'#149#181'W(D<'#154'@*'#153'BxK'#24#158'yX\'#156#3'E'#11'M'
|
||||
+#130#236#221#161#235#209#206#216#133#222'X/'#12#14'='#137#158#166#133'4'#3#29
|
||||
+#241#253#199'*<z'#248#188'PFi'#206#207'S'#153'k'#18#136'h]U!&0'#7#208#17'f'
|
||||
+#132#26'a'#142#168#213'jX'#9'V1'#183#236#195#159#245#243'T'#27#255'0'#229#151
|
||||
+'['#146'x'#226#230#209#201'X$zQi'#152'_'#248#4#149'_9P'#229'W*'#139'T'#22'H'
|
||||
+#230'f'#167'>6'#163#12#231'\'#179#7#198#246'O'#247'_'#219#247#254#247#217#191
|
||||
+#186#197#5#169#235#136#138'>'#248#159#223#248#19#19#249#133#146#234#21#229
|
||||
+#237#0#0#0#0'IEND'#174'B`'#130
|
||||
]);
|
||||
|
||||
@ -3,3 +3,4 @@ images/menu_svn_commit.png
|
||||
images/menu_svn_update.png
|
||||
images/menu_svn_diff.png
|
||||
images/menu_svn_log.png
|
||||
images/menu_svn_revert.png
|
||||
|
||||
@ -388,7 +388,7 @@ begin
|
||||
BytesRead := 0;
|
||||
|
||||
AProcess := TProcess.Create(nil);
|
||||
AProcess.CommandLine := SVNExecutable + ' stat --verbose --xml ' + RepositoryPath + ' --non-interactive';
|
||||
AProcess.CommandLine := SVNExecutable + ' stat --verbose --xml "' + RepositoryPath + '" --non-interactive';
|
||||
debugln('TSVNStatus.Create CommandLine ' + AProcess.CommandLine);
|
||||
AProcess.Options := AProcess.Options + [poUsePipes, poStdErrToOutput];
|
||||
AProcess.ShowWindow := swoHIDE;
|
||||
|
||||
@ -5,12 +5,6 @@ object SVNLogFrm: TSVNLogFrm
|
||||
Width = 726
|
||||
HelpContext = 0
|
||||
ActiveControl = LogListView
|
||||
Align = alNone
|
||||
AllowDropFiles = False
|
||||
AutoScroll = True
|
||||
AutoSize = False
|
||||
BorderIcons = [biSystemMenu, biMinimize, biMaximize]
|
||||
BorderStyle = bsSizeable
|
||||
Caption = 'SVNLogFrm'
|
||||
ChildSizing.LeftRightSpacing = 0
|
||||
ChildSizing.TopBottomSpacing = 0
|
||||
@ -19,23 +13,13 @@ object SVNLogFrm: TSVNLogFrm
|
||||
ChildSizing.ControlsPerLine = 0
|
||||
ClientHeight = 566
|
||||
ClientWidth = 726
|
||||
DockSite = False
|
||||
DragKind = dkDrag
|
||||
DragMode = dmManual
|
||||
Enabled = True
|
||||
Font.Height = 0
|
||||
Font.Style = []
|
||||
FormStyle = fsNormal
|
||||
OnCreate = FormCreate
|
||||
OnDestroy = FormDestroy
|
||||
OnShow = FormShow
|
||||
ParentBiDiMode = True
|
||||
ParentFont = False
|
||||
Position = poScreenCenter
|
||||
ShowInTaskBar = stDefault
|
||||
UseDockManager = False
|
||||
LCLVersion = '0.9.27'
|
||||
WindowState = wsNormal
|
||||
object Label1: TLabel
|
||||
AnchorSideLeft.Control = Owner
|
||||
AnchorSideTop.Control = SVNLogLimit
|
||||
@ -44,9 +28,6 @@ object SVNLogFrm: TSVNLogFrm
|
||||
Top = 489
|
||||
Width = 134
|
||||
HelpContext = 0
|
||||
Align = alNone
|
||||
Alignment = taLeftJustify
|
||||
AutoSize = True
|
||||
BorderSpacing.Left = 6
|
||||
BorderSpacing.Top = 0
|
||||
BorderSpacing.Right = 6
|
||||
@ -55,19 +36,7 @@ object SVNLogFrm: TSVNLogFrm
|
||||
BorderSpacing.CellAlignHorizontal = ccaFill
|
||||
BorderSpacing.CellAlignVertical = ccaFill
|
||||
Caption = 'Show last X commits'
|
||||
DragCursor = crDrag
|
||||
DragMode = dmManual
|
||||
Enabled = True
|
||||
Layout = tlTop
|
||||
ParentBidiMode = True
|
||||
ParentColor = False
|
||||
ParentFont = True
|
||||
ParentShowHint = True
|
||||
ShowAccelChar = True
|
||||
Transparent = True
|
||||
Visible = True
|
||||
WordWrap = False
|
||||
OptimalFill = False
|
||||
end
|
||||
object LogListView: TListView
|
||||
Left = 6
|
||||
@ -83,8 +52,6 @@ object SVNLogFrm: TSVNLogFrm
|
||||
BorderSpacing.Around = 0
|
||||
BorderSpacing.CellAlignHorizontal = ccaFill
|
||||
BorderSpacing.CellAlignVertical = ccaFill
|
||||
BorderWidth = 0
|
||||
Checkboxes = False
|
||||
Columns = <
|
||||
item
|
||||
AutoSize = False
|
||||
@ -99,23 +66,10 @@ object SVNLogFrm: TSVNLogFrm
|
||||
AutoSize = False
|
||||
Width = 546
|
||||
end>
|
||||
ColumnClick = True
|
||||
DragCursor = crDrag
|
||||
DragMode = dmManual
|
||||
Enabled = True
|
||||
HideSelection = True
|
||||
MultiSelect = False
|
||||
ParentShowHint = True
|
||||
ReadOnly = False
|
||||
RowSelect = True
|
||||
ScrollBars = ssBoth
|
||||
ShowColumnHeaders = True
|
||||
SortColumn = 0
|
||||
SortType = stNone
|
||||
TabStop = True
|
||||
TabOrder = 0
|
||||
ToolTips = True
|
||||
Visible = True
|
||||
ViewStyle = vsReport
|
||||
OnSelectItem = LogListViewSelectItem
|
||||
end
|
||||
@ -126,7 +80,6 @@ object SVNLogFrm: TSVNLogFrm
|
||||
Width = 714
|
||||
HelpContext = 0
|
||||
Align = alTop
|
||||
Alignment = taLeftJustify
|
||||
BorderSpacing.Left = 6
|
||||
BorderSpacing.Top = 0
|
||||
BorderSpacing.Right = 6
|
||||
@ -134,21 +87,11 @@ object SVNLogFrm: TSVNLogFrm
|
||||
BorderSpacing.Around = 0
|
||||
BorderSpacing.CellAlignHorizontal = ccaFill
|
||||
BorderSpacing.CellAlignVertical = ccaFill
|
||||
DragCursor = crDrag
|
||||
DragMode = dmManual
|
||||
Enabled = True
|
||||
Font.Height = 0
|
||||
Font.Style = []
|
||||
MaxLength = -1
|
||||
ParentBidiMode = True
|
||||
ParentFont = False
|
||||
ReadOnly = True
|
||||
ScrollBars = ssNone
|
||||
TabOrder = 1
|
||||
TabStop = True
|
||||
Visible = True
|
||||
WantReturns = True
|
||||
WantTabs = False
|
||||
end
|
||||
object SVNActionsListView: TListView
|
||||
AnchorSideBottom.Control = RefreshButton
|
||||
@ -166,8 +109,6 @@ object SVNLogFrm: TSVNLogFrm
|
||||
BorderSpacing.Around = 0
|
||||
BorderSpacing.CellAlignHorizontal = ccaFill
|
||||
BorderSpacing.CellAlignVertical = ccaFill
|
||||
BorderWidth = 0
|
||||
Checkboxes = False
|
||||
Columns = <
|
||||
item
|
||||
AutoSize = False
|
||||
@ -182,24 +123,11 @@ object SVNLogFrm: TSVNLogFrm
|
||||
AutoSize = False
|
||||
Width = 546
|
||||
end>
|
||||
ColumnClick = True
|
||||
DragCursor = crDrag
|
||||
DragMode = dmManual
|
||||
Enabled = True
|
||||
HideSelection = True
|
||||
MultiSelect = False
|
||||
ParentShowHint = True
|
||||
PopupMenu = SVNActionsPopupMenu
|
||||
ReadOnly = False
|
||||
RowSelect = True
|
||||
ScrollBars = ssBoth
|
||||
ShowColumnHeaders = True
|
||||
SortColumn = 0
|
||||
SortType = stNone
|
||||
TabStop = True
|
||||
TabOrder = 2
|
||||
ToolTips = True
|
||||
Visible = True
|
||||
ViewStyle = vsReport
|
||||
end
|
||||
object ButtonPanel: TButtonPanel
|
||||
@ -214,8 +142,6 @@ object SVNLogFrm: TSVNLogFrm
|
||||
TabOrder = 3
|
||||
DefaultButton = pbOK
|
||||
ShowButtons = [pbOK]
|
||||
ShowGlyphs = [pbOK, pbCancel, pbClose, pbHelp]
|
||||
Visible = True
|
||||
end
|
||||
object Splitter1: TSplitter
|
||||
Cursor = crVSplit
|
||||
@ -225,14 +151,7 @@ object SVNLogFrm: TSVNLogFrm
|
||||
Width = 726
|
||||
HelpContext = 0
|
||||
Align = alTop
|
||||
AutoSnap = True
|
||||
Beveled = False
|
||||
MinSize = 30
|
||||
ParentColor = True
|
||||
ParentShowHint = True
|
||||
ResizeAnchor = akTop
|
||||
ResizeStyle = rsUpdate
|
||||
Visible = True
|
||||
end
|
||||
object Splitter2: TSplitter
|
||||
Cursor = crVSplit
|
||||
@ -242,14 +161,7 @@ object SVNLogFrm: TSVNLogFrm
|
||||
Width = 726
|
||||
HelpContext = 0
|
||||
Align = alTop
|
||||
AutoSnap = True
|
||||
Beveled = False
|
||||
MinSize = 30
|
||||
ParentColor = True
|
||||
ParentShowHint = True
|
||||
ResizeAnchor = akTop
|
||||
ResizeStyle = rsUpdate
|
||||
Visible = True
|
||||
end
|
||||
object SVNLogLimit: TSpinEdit
|
||||
AnchorSideLeft.Control = Label1
|
||||
@ -260,10 +172,7 @@ object SVNLogFrm: TSVNLogFrm
|
||||
Top = 489
|
||||
Width = 94
|
||||
HelpContext = 0
|
||||
Align = alNone
|
||||
Anchors = [akLeft, akBottom]
|
||||
AutoSelect = False
|
||||
AutoSize = False
|
||||
BorderSpacing.Left = 0
|
||||
BorderSpacing.Top = 0
|
||||
BorderSpacing.Right = 0
|
||||
@ -271,17 +180,9 @@ object SVNLogFrm: TSVNLogFrm
|
||||
BorderSpacing.Around = 6
|
||||
BorderSpacing.CellAlignHorizontal = ccaFill
|
||||
BorderSpacing.CellAlignVertical = ccaFill
|
||||
Enabled = True
|
||||
Increment = 1
|
||||
MaxValue = 100000
|
||||
MinValue = 0
|
||||
ParentFont = True
|
||||
ParentShowHint = True
|
||||
ReadOnly = False
|
||||
TabStop = True
|
||||
TabOrder = 6
|
||||
Value = 100
|
||||
Visible = True
|
||||
end
|
||||
object RefreshButton: TButton
|
||||
AnchorSideRight.Control = Owner
|
||||
@ -292,9 +193,7 @@ object SVNLogFrm: TSVNLogFrm
|
||||
Top = 487
|
||||
Width = 75
|
||||
HelpContext = 0
|
||||
Align = alNone
|
||||
Anchors = [akRight, akBottom]
|
||||
AutoSize = False
|
||||
BorderSpacing.Left = 0
|
||||
BorderSpacing.Top = 0
|
||||
BorderSpacing.Right = 0
|
||||
@ -302,20 +201,9 @@ object SVNLogFrm: TSVNLogFrm
|
||||
BorderSpacing.Around = 6
|
||||
BorderSpacing.CellAlignHorizontal = ccaFill
|
||||
BorderSpacing.CellAlignVertical = ccaFill
|
||||
Cancel = False
|
||||
Caption = 'Refresh'
|
||||
Default = False
|
||||
DragCursor = crDrag
|
||||
DragMode = dmManual
|
||||
Enabled = True
|
||||
ParentBidiMode = True
|
||||
ModalResult = 0
|
||||
OnClick = RefreshButtonClick
|
||||
ParentFont = True
|
||||
ParentShowHint = True
|
||||
TabOrder = 7
|
||||
TabStop = True
|
||||
Visible = True
|
||||
end
|
||||
object SVNActionsPopupMenu: TPopupMenu
|
||||
left = 37
|
||||
|
||||
@ -3,96 +3,67 @@
|
||||
LazarusResources.Add('TSVNLogFrm','FORMDATA',[
|
||||
'TPF0'#10'TSVNLogFrm'#9'SVNLogFrm'#4'Left'#3'"'#1#6'Height'#3'6'#2#3'Top'#3
|
||||
+#175#0#5'Width'#3#214#2#11'HelpContext'#2#0#13'ActiveControl'#7#11'LogListVi'
|
||||
+'ew'#5'Align'#7#6'alNone'#14'AllowDropFiles'#8#10'AutoScroll'#9#8'AutoSize'#8
|
||||
+#11'BorderIcons'#11#12'biSystemMenu'#10'biMinimize'#10'biMaximize'#0#11'Bord'
|
||||
+'erStyle'#7#10'bsSizeable'#7'Caption'#6#9'SVNLogFrm'#28'ChildSizing.LeftRigh'
|
||||
+'tSpacing'#2#0#28'ChildSizing.TopBottomSpacing'#2#0#29'ChildSizing.Horizonta'
|
||||
+'lSpacing'#2#0#27'ChildSizing.VerticalSpacing'#2#0#27'ChildSizing.ControlsPe'
|
||||
+'rLine'#2#0#12'ClientHeight'#3'6'#2#11'ClientWidth'#3#214#2#8'DockSite'#8#8
|
||||
+'DragKind'#7#6'dkDrag'#8'DragMode'#7#8'dmManual'#7'Enabled'#9#11'Font.Height'
|
||||
+#2#0#10'Font.Style'#11#0#9'FormStyle'#7#8'fsNormal'#8'OnCreate'#7#10'FormCre'
|
||||
+'ate'#9'OnDestroy'#7#11'FormDestroy'#6'OnShow'#7#8'FormShow'#14'ParentBiDiMo'
|
||||
+'de'#9#10'ParentFont'#8#8'Position'#7#14'poScreenCenter'#13'ShowInTaskBar'#7
|
||||
+#9'stDefault'#14'UseDockManager'#8#10'LCLVersion'#6#6'0.9.27'#11'WindowState'
|
||||
+#7#8'wsNormal'#0#6'TLabel'#6'Label1'#22'AnchorSideLeft.Control'#7#5'Owner'#21
|
||||
+'AnchorSideTop.Control'#7#11'SVNLogLimit'#4'Left'#2#6#6'Height'#2#18#3'Top'#3
|
||||
+#233#1#5'Width'#3#134#0#11'HelpContext'#2#0#5'Align'#7#6'alNone'#9'Alignment'
|
||||
+#7#13'taLeftJustify'#8'AutoSize'#9#18'BorderSpacing.Left'#2#6#17'BorderSpaci'
|
||||
+'ng.Top'#2#0#19'BorderSpacing.Right'#2#6#20'BorderSpacing.Bottom'#2#0#20'Bor'
|
||||
+'derSpacing.Around'#2#0'!BorderSpacing.CellAlignHorizontal'#7#7'ccaFill'#31
|
||||
+'BorderSpacing.CellAlignVertical'#7#7'ccaFill'#7'Caption'#6#19'Show last X c'
|
||||
+'ommits'#10'DragCursor'#7#6'crDrag'#8'DragMode'#7#8'dmManual'#7'Enabled'#9#6
|
||||
+'Layout'#7#5'tlTop'#14'ParentBidiMode'#9#11'ParentColor'#8#10'ParentFont'#9
|
||||
+#14'ParentShowHint'#9#13'ShowAccelChar'#9#11'Transparent'#9#7'Visible'#9#8'W'
|
||||
+'ordWrap'#8#11'OptimalFill'#8#0#0#9'TListView'#11'LogListView'#4'Left'#2#6#6
|
||||
+'Height'#3#159#0#3'Top'#2#6#5'Width'#3#202#2#11'HelpContext'#2#0#5'Align'#7#5
|
||||
+'alTop'#18'BorderSpacing.Left'#2#6#17'BorderSpacing.Top'#2#6#19'BorderSpacin'
|
||||
+'g.Right'#2#6#20'BorderSpacing.Bottom'#2#0#20'BorderSpacing.Around'#2#0'!Bor'
|
||||
+'derSpacing.CellAlignHorizontal'#7#7'ccaFill'#31'BorderSpacing.CellAlignVert'
|
||||
+'ical'#7#7'ccaFill'#11'BorderWidth'#2#0#10'Checkboxes'#8#7'Columns'#14#1#8'A'
|
||||
+'utoSize'#8#0#1#8'AutoSize'#8#0#1#8'AutoSize'#8#0#1#8'AutoSize'#8#5'Width'#3
|
||||
+'"'#2#0#0#11'ColumnClick'#9#10'DragCursor'#7#6'crDrag'#8'DragMode'#7#8'dmMan'
|
||||
+'ual'#7'Enabled'#9#13'HideSelection'#9#11'MultiSelect'#8#14'ParentShowHint'#9
|
||||
+#8'ReadOnly'#8#9'RowSelect'#9#10'ScrollBars'#7#6'ssBoth'#17'ShowColumnHeader'
|
||||
+'s'#9#10'SortColumn'#2#0#8'SortType'#7#6'stNone'#7'TabStop'#9#8'TabOrder'#2#0
|
||||
+#8'ToolTips'#9#7'Visible'#9#9'ViewStyle'#7#8'vsReport'#12'OnSelectItem'#7#21
|
||||
+'LogListViewSelectItem'#0#0#5'TMemo'#13'SVNLogMsgMemo'#4'Left'#2#6#6'Height'
|
||||
+#3#151#0#3'Top'#3#170#0#5'Width'#3#202#2#11'HelpContext'#2#0#5'Align'#7#5'al'
|
||||
+'Top'#9'Alignment'#7#13'taLeftJustify'#18'BorderSpacing.Left'#2#6#17'BorderS'
|
||||
+'pacing.Top'#2#0#19'BorderSpacing.Right'#2#6#20'BorderSpacing.Bottom'#2#0#20
|
||||
+'BorderSpacing.Around'#2#0'!BorderSpacing.CellAlignHorizontal'#7#7'ccaFill'
|
||||
+#31'BorderSpacing.CellAlignVertical'#7#7'ccaFill'#10'DragCursor'#7#6'crDrag'
|
||||
+#8'DragMode'#7#8'dmManual'#7'Enabled'#9#11'Font.Height'#2#0#10'Font.Style'#11
|
||||
+#0#9'MaxLength'#2#255#14'ParentBidiMode'#9#10'ParentFont'#8#8'ReadOnly'#9#10
|
||||
+'ScrollBars'#7#6'ssNone'#8'TabOrder'#2#1#7'TabStop'#9#7'Visible'#9#11'WantRe'
|
||||
+'turns'#9#8'WantTabs'#8#0#0#9'TListView'#18'SVNActionsListView'#24'AnchorSid'
|
||||
+'eBottom.Control'#7#13'RefreshButton'#4'Left'#2#6#6'Height'#3#155#0#3'Top'#3
|
||||
+'F'#1#5'Width'#3#202#2#11'HelpContext'#2#0#5'Align'#7#5'alTop'#7'Anchors'#11
|
||||
+#5'akTop'#6'akLeft'#7'akRight'#8'akBottom'#0#18'BorderSpacing.Left'#2#6#17'B'
|
||||
+'orderSpacing.Top'#2#0#19'BorderSpacing.Right'#2#6#20'BorderSpacing.Bottom'#2
|
||||
+#6#20'BorderSpacing.Around'#2#0'!BorderSpacing.CellAlignHorizontal'#7#7'ccaF'
|
||||
+'ill'#31'BorderSpacing.CellAlignVertical'#7#7'ccaFill'#11'BorderWidth'#2#0#10
|
||||
+'Checkboxes'#8#7'Columns'#14#1#8'AutoSize'#8#0#1#8'AutoSize'#8#0#1#8'AutoSiz'
|
||||
+'e'#8#0#1#8'AutoSize'#8#5'Width'#3'"'#2#0#0#11'ColumnClick'#9#10'DragCursor'
|
||||
+#7#6'crDrag'#8'DragMode'#7#8'dmManual'#7'Enabled'#9#13'HideSelection'#9#11'M'
|
||||
+'ultiSelect'#8#14'ParentShowHint'#9#9'PopupMenu'#7#19'SVNActionsPopupMenu'#8
|
||||
+'ReadOnly'#8#9'RowSelect'#9#10'ScrollBars'#7#6'ssBoth'#17'ShowColumnHeaders'
|
||||
+#9#10'SortColumn'#2#0#8'SortType'#7#6'stNone'#7'TabStop'#9#8'TabOrder'#2#2#8
|
||||
+'ToolTips'#9#7'Visible'#9#9'ViewStyle'#7#8'vsReport'#0#0#12'TButtonPanel'#11
|
||||
+'ButtonPanel'#4'Left'#2#6#6'Height'#2'0'#3'Top'#3#6#2#5'Width'#3#202#2#11'He'
|
||||
+'lpContext'#2#0#5'Align'#7#8'alBottom'#8'AutoSize'#9#11'ButtonOrder'#7#9'boD'
|
||||
+'efault'#8'TabOrder'#2#3#13'DefaultButton'#7#4'pbOK'#11'ShowButtons'#11#4'pb'
|
||||
+'OK'#0#10'ShowGlyphs'#11#4'pbOK'#8'pbCancel'#7'pbClose'#6'pbHelp'#0#7'Visibl'
|
||||
+'e'#9#0#0#9'TSplitter'#9'Splitter1'#6'Cursor'#7#8'crVSplit'#4'Left'#2#0#6'He'
|
||||
+'ight'#2#5#3'Top'#3#165#0#5'Width'#3#214#2#11'HelpContext'#2#0#5'Align'#7#5
|
||||
,'alTop'#8'AutoSnap'#9#7'Beveled'#8#7'MinSize'#2#30#11'ParentColor'#9#14'Pare'
|
||||
+'ntShowHint'#9#12'ResizeAnchor'#7#5'akTop'#11'ResizeStyle'#7#8'rsUpdate'#7'V'
|
||||
+'isible'#9#0#0#9'TSplitter'#9'Splitter2'#6'Cursor'#7#8'crVSplit'#4'Left'#2#0
|
||||
+#6'Height'#2#5#3'Top'#3'A'#1#5'Width'#3#214#2#11'HelpContext'#2#0#5'Align'#7
|
||||
+#5'alTop'#8'AutoSnap'#9#7'Beveled'#8#7'MinSize'#2#30#11'ParentColor'#9#14'Pa'
|
||||
+'rentShowHint'#9#12'ResizeAnchor'#7#5'akTop'#11'ResizeStyle'#7#8'rsUpdate'#7
|
||||
+'Visible'#9#0#0#9'TSpinEdit'#11'SVNLogLimit'#22'AnchorSideLeft.Control'#7#6
|
||||
+'Label1'#19'AnchorSideLeft.Side'#7#9'asrBottom'#24'AnchorSideBottom.Control'
|
||||
+#7#11'ButtonPanel'#4'Left'#3#146#0#6'Height'#2#23#3'Top'#3#233#1#5'Width'#2
|
||||
+'^'#11'HelpContext'#2#0#5'Align'#7#6'alNone'#7'Anchors'#11#6'akLeft'#8'akBot'
|
||||
+'tom'#0#10'AutoSelect'#8#8'AutoSize'#8#18'BorderSpacing.Left'#2#0#17'BorderS'
|
||||
+'pacing.Top'#2#0#19'BorderSpacing.Right'#2#0#20'BorderSpacing.Bottom'#2#0#20
|
||||
+'BorderSpacing.Around'#2#6'!BorderSpacing.CellAlignHorizontal'#7#7'ccaFill'
|
||||
+#31'BorderSpacing.CellAlignVertical'#7#7'ccaFill'#7'Enabled'#9#9'Increment'#2
|
||||
+#1#8'MaxValue'#4#160#134#1#0#8'MinValue'#2#0#10'ParentFont'#9#14'ParentShowH'
|
||||
+'int'#9#8'ReadOnly'#8#7'TabStop'#9#8'TabOrder'#2#6#5'Value'#2'd'#7'Visible'#9
|
||||
+#0#0#7'TButton'#13'RefreshButton'#23'AnchorSideRight.Control'#7#5'Owner'#20
|
||||
+'AnchorSideRight.Side'#7#9'asrBottom'#24'AnchorSideBottom.Control'#7#11'Butt'
|
||||
+'onPanel'#4'Left'#3#133#2#6'Height'#2#25#3'Top'#3#231#1#5'Width'#2'K'#11'Hel'
|
||||
+'pContext'#2#0#5'Align'#7#6'alNone'#7'Anchors'#11#7'akRight'#8'akBottom'#0#8
|
||||
+'AutoSize'#8#18'BorderSpacing.Left'#2#0#17'BorderSpacing.Top'#2#0#19'BorderS'
|
||||
+'pacing.Right'#2#0#20'BorderSpacing.Bottom'#2#0#20'BorderSpacing.Around'#2#6
|
||||
+'!BorderSpacing.CellAlignHorizontal'#7#7'ccaFill'#31'BorderSpacing.CellAlign'
|
||||
+'Vertical'#7#7'ccaFill'#6'Cancel'#8#7'Caption'#6#7'Refresh'#7'Default'#8#10
|
||||
+'DragCursor'#7#6'crDrag'#8'DragMode'#7#8'dmManual'#7'Enabled'#9#14'ParentBid'
|
||||
+'iMode'#9#11'ModalResult'#2#0#7'OnClick'#7#18'RefreshButtonClick'#10'ParentF'
|
||||
+'ont'#9#14'ParentShowHint'#9#8'TabOrder'#2#7#7'TabStop'#9#7'Visible'#9#0#0#10
|
||||
+'TPopupMenu'#19'SVNActionsPopupMenu'#4'left'#2'%'#3'top'#3'q'#1#0#9'TMenuIte'
|
||||
+'m'#11'mnuShowDiff'#7'Caption'#6#9'New Item1'#12'RightJustify'#8#19'ShowAlwa'
|
||||
+'ysCheckable'#8#7'OnClick'#7#16'mnuShowDiffClick'#0#0#0#0
|
||||
+'ew'#7'Caption'#6#9'SVNLogFrm'#28'ChildSizing.LeftRightSpacing'#2#0#28'Child'
|
||||
+'Sizing.TopBottomSpacing'#2#0#29'ChildSizing.HorizontalSpacing'#2#0#27'Child'
|
||||
+'Sizing.VerticalSpacing'#2#0#27'ChildSizing.ControlsPerLine'#2#0#12'ClientHe'
|
||||
+'ight'#3'6'#2#11'ClientWidth'#3#214#2#11'Font.Height'#2#0#10'Font.Style'#11#0
|
||||
+#8'OnCreate'#7#10'FormCreate'#9'OnDestroy'#7#11'FormDestroy'#6'OnShow'#7#8'F'
|
||||
+'ormShow'#8'Position'#7#14'poScreenCenter'#10'LCLVersion'#6#6'0.9.27'#0#6'TL'
|
||||
+'abel'#6'Label1'#22'AnchorSideLeft.Control'#7#5'Owner'#21'AnchorSideTop.Cont'
|
||||
+'rol'#7#11'SVNLogLimit'#4'Left'#2#6#6'Height'#2#18#3'Top'#3#233#1#5'Width'#3
|
||||
+#134#0#11'HelpContext'#2#0#18'BorderSpacing.Left'#2#6#17'BorderSpacing.Top'#2
|
||||
+#0#19'BorderSpacing.Right'#2#6#20'BorderSpacing.Bottom'#2#0#20'BorderSpacing'
|
||||
+'.Around'#2#0'!BorderSpacing.CellAlignHorizontal'#7#7'ccaFill'#31'BorderSpac'
|
||||
+'ing.CellAlignVertical'#7#7'ccaFill'#7'Caption'#6#19'Show last X commits'#11
|
||||
+'ParentColor'#8#0#0#9'TListView'#11'LogListView'#4'Left'#2#6#6'Height'#3#159
|
||||
+#0#3'Top'#2#6#5'Width'#3#202#2#11'HelpContext'#2#0#5'Align'#7#5'alTop'#18'Bo'
|
||||
+'rderSpacing.Left'#2#6#17'BorderSpacing.Top'#2#6#19'BorderSpacing.Right'#2#6
|
||||
+#20'BorderSpacing.Bottom'#2#0#20'BorderSpacing.Around'#2#0'!BorderSpacing.Ce'
|
||||
+'llAlignHorizontal'#7#7'ccaFill'#31'BorderSpacing.CellAlignVertical'#7#7'cca'
|
||||
+'Fill'#7'Columns'#14#1#8'AutoSize'#8#0#1#8'AutoSize'#8#0#1#8'AutoSize'#8#0#1
|
||||
+#8'AutoSize'#8#5'Width'#3'"'#2#0#0#9'RowSelect'#9#10'SortColumn'#2#0#8'SortT'
|
||||
+'ype'#7#6'stNone'#8'TabOrder'#2#0#9'ViewStyle'#7#8'vsReport'#12'OnSelectItem'
|
||||
+#7#21'LogListViewSelectItem'#0#0#5'TMemo'#13'SVNLogMsgMemo'#4'Left'#2#6#6'He'
|
||||
+'ight'#3#151#0#3'Top'#3#170#0#5'Width'#3#202#2#11'HelpContext'#2#0#5'Align'#7
|
||||
+#5'alTop'#18'BorderSpacing.Left'#2#6#17'BorderSpacing.Top'#2#0#19'BorderSpac'
|
||||
+'ing.Right'#2#6#20'BorderSpacing.Bottom'#2#0#20'BorderSpacing.Around'#2#0'!B'
|
||||
+'orderSpacing.CellAlignHorizontal'#7#7'ccaFill'#31'BorderSpacing.CellAlignVe'
|
||||
+'rtical'#7#7'ccaFill'#11'Font.Height'#2#0#10'Font.Style'#11#0#10'ParentFont'
|
||||
+#8#8'ReadOnly'#9#8'TabOrder'#2#1#0#0#9'TListView'#18'SVNActionsListView'#24
|
||||
+'AnchorSideBottom.Control'#7#13'RefreshButton'#4'Left'#2#6#6'Height'#3#155#0
|
||||
+#3'Top'#3'F'#1#5'Width'#3#202#2#11'HelpContext'#2#0#5'Align'#7#5'alTop'#7'An'
|
||||
+'chors'#11#5'akTop'#6'akLeft'#7'akRight'#8'akBottom'#0#18'BorderSpacing.Left'
|
||||
+#2#6#17'BorderSpacing.Top'#2#0#19'BorderSpacing.Right'#2#6#20'BorderSpacing.'
|
||||
+'Bottom'#2#6#20'BorderSpacing.Around'#2#0'!BorderSpacing.CellAlignHorizontal'
|
||||
+#7#7'ccaFill'#31'BorderSpacing.CellAlignVertical'#7#7'ccaFill'#7'Columns'#14
|
||||
+#1#8'AutoSize'#8#0#1#8'AutoSize'#8#0#1#8'AutoSize'#8#0#1#8'AutoSize'#8#5'Wid'
|
||||
+'th'#3'"'#2#0#0#9'PopupMenu'#7#19'SVNActionsPopupMenu'#9'RowSelect'#9#10'Sor'
|
||||
+'tColumn'#2#0#8'SortType'#7#6'stNone'#8'TabOrder'#2#2#9'ViewStyle'#7#8'vsRep'
|
||||
+'ort'#0#0#12'TButtonPanel'#11'ButtonPanel'#4'Left'#2#6#6'Height'#2'0'#3'Top'
|
||||
+#3#6#2#5'Width'#3#202#2#11'HelpContext'#2#0#5'Align'#7#8'alBottom'#8'AutoSiz'
|
||||
+'e'#9#11'ButtonOrder'#7#9'boDefault'#8'TabOrder'#2#3#13'DefaultButton'#7#4'p'
|
||||
+'bOK'#11'ShowButtons'#11#4'pbOK'#0#0#0#9'TSplitter'#9'Splitter1'#6'Cursor'#7
|
||||
+#8'crVSplit'#4'Left'#2#0#6'Height'#2#5#3'Top'#3#165#0#5'Width'#3#214#2#11'He'
|
||||
+'lpContext'#2#0#5'Align'#7#5'alTop'#12'ResizeAnchor'#7#5'akTop'#0#0#9'TSplit'
|
||||
+'ter'#9'Splitter2'#6'Cursor'#7#8'crVSplit'#4'Left'#2#0#6'Height'#2#5#3'Top'#3
|
||||
+'A'#1#5'Width'#3#214#2#11'HelpContext'#2#0#5'Align'#7#5'alTop'#12'ResizeAnch'
|
||||
+'or'#7#5'akTop'#0#0#9'TSpinEdit'#11'SVNLogLimit'#22'AnchorSideLeft.Control'#7
|
||||
+#6'Label1'#19'AnchorSideLeft.Side'#7#9'asrBottom'#24'AnchorSideBottom.Contro'
|
||||
+'l'#7#11'ButtonPanel'#4'Left'#3#146#0#6'Height'#2#23#3'Top'#3#233#1#5'Width'
|
||||
+#2'^'#11'HelpContext'#2#0#7'Anchors'#11#6'akLeft'#8'akBottom'#0#18'BorderSpa'
|
||||
+'cing.Left'#2#0#17'BorderSpacing.Top'#2#0#19'BorderSpacing.Right'#2#0#20'Bor'
|
||||
+'derSpacing.Bottom'#2#0#20'BorderSpacing.Around'#2#6'!BorderSpacing.CellAlig'
|
||||
+'nHorizontal'#7#7'ccaFill'#31'BorderSpacing.CellAlignVertical'#7#7'ccaFill'#8
|
||||
+'MaxValue'#4#160#134#1#0#8'TabOrder'#2#6#5'Value'#2'd'#0#0#7'TButton'#13'Ref'
|
||||
+'reshButton'#23'AnchorSideRight.Control'#7#5'Owner'#20'AnchorSideRight.Side'
|
||||
+#7#9'asrBottom'#24'AnchorSideBottom.Control'#7#11'ButtonPanel'#4'Left'#3#133
|
||||
+#2#6'Height'#2#25#3'Top'#3#231#1#5'Width'#2'K'#11'HelpContext'#2#0#7'Anchors'
|
||||
+#11#7'akRight'#8'akBottom'#0#18'BorderSpacing.Left'#2#0#17'BorderSpacing.Top'
|
||||
+#2#0#19'BorderSpacing.Right'#2#0#20'BorderSpacing.Bottom'#2#0#20'BorderSpaci'
|
||||
+'ng.Around'#2#6'!BorderSpacing.CellAlignHorizontal'#7#7'ccaFill'#31'BorderSp'
|
||||
+'acing.CellAlignVertical'#7#7'ccaFill'#7'Caption'#6#7'Refresh'#7'OnClick'#7
|
||||
+#18'RefreshButtonClick'#8'TabOrder'#2#7#0#0#10'TPopupMenu'#19'SVNActionsPopu'
|
||||
+'pMenu'#4'left'#2'%'#3'top'#3'q'#1#0#9'TMenuItem'#11'mnuShowDiff'#7'Caption'
|
||||
+#6#9'New Item1'#12'RightJustify'#8#19'ShowAlwaysCheckable'#8#7'OnClick'#7#16
|
||||
,'mnuShowDiffClick'#0#0#0#0
|
||||
]);
|
||||
|
||||
@ -332,7 +332,7 @@ begin
|
||||
debugln('TSVNLogFrm.Execute RepositoryPath=' ,RepositoryPath);
|
||||
|
||||
AProcess := TProcess.Create(nil);
|
||||
AProcess.CommandLine := SVNExecutable + ' log --xml --verbose --limit ' + IntToStr(SVNLogLimit.Value) + ' ' + RepositoryPath + ' --non-interactive';
|
||||
AProcess.CommandLine := SVNExecutable + ' log --xml --verbose --limit ' + IntToStr(SVNLogLimit.Value) + ' "' + RepositoryPath + '" --non-interactive';
|
||||
debugln('TSVNLogFrm.Execute CommandLine ' + AProcess.CommandLine);
|
||||
AProcess.Options := AProcess.Options + [poUsePipes, poStdErrToOutput];
|
||||
AProcess.ShowWindow := swoHIDE;
|
||||
@ -441,7 +441,6 @@ begin
|
||||
|
||||
end;
|
||||
|
||||
|
||||
LogList.Add(LogItem);
|
||||
|
||||
Node := Node.NextSibling;
|
||||
|
||||
@ -5,12 +5,6 @@ object SVNStatusFrm: TSVNStatusFrm
|
||||
Width = 738
|
||||
HelpContext = 0
|
||||
ActiveControl = SVNFileListView
|
||||
Align = alNone
|
||||
AllowDropFiles = False
|
||||
AutoScroll = True
|
||||
AutoSize = False
|
||||
BorderIcons = [biSystemMenu, biMinimize, biMaximize]
|
||||
BorderStyle = bsSizeable
|
||||
Caption = 'SVNStatusFrm'
|
||||
ChildSizing.LeftRightSpacing = 0
|
||||
ChildSizing.TopBottomSpacing = 0
|
||||
@ -19,22 +13,12 @@ object SVNStatusFrm: TSVNStatusFrm
|
||||
ChildSizing.ControlsPerLine = 0
|
||||
ClientHeight = 408
|
||||
ClientWidth = 738
|
||||
DockSite = False
|
||||
DragKind = dkDrag
|
||||
DragMode = dmManual
|
||||
Enabled = True
|
||||
Font.Height = 0
|
||||
Font.Style = []
|
||||
FormStyle = fsNormal
|
||||
OnCreate = FormCreate
|
||||
OnShow = FormShow
|
||||
ParentBiDiMode = True
|
||||
ParentFont = False
|
||||
Position = poScreenCenter
|
||||
ShowInTaskBar = stDefault
|
||||
UseDockManager = False
|
||||
LCLVersion = '0.9.27'
|
||||
WindowState = wsNormal
|
||||
object SVNFileListView: TListView
|
||||
Left = 6
|
||||
Height = 266
|
||||
@ -49,7 +33,6 @@ object SVNStatusFrm: TSVNStatusFrm
|
||||
BorderSpacing.Around = 0
|
||||
BorderSpacing.CellAlignHorizontal = ccaFill
|
||||
BorderSpacing.CellAlignVertical = ccaFill
|
||||
BorderWidth = 0
|
||||
Checkboxes = True
|
||||
Columns = <
|
||||
item
|
||||
@ -81,24 +64,11 @@ object SVNStatusFrm: TSVNStatusFrm
|
||||
item
|
||||
AutoSize = False
|
||||
end>
|
||||
ColumnClick = True
|
||||
DragCursor = crDrag
|
||||
DragMode = dmManual
|
||||
Enabled = True
|
||||
HideSelection = True
|
||||
MultiSelect = False
|
||||
ParentShowHint = True
|
||||
PopupMenu = PopupMenu1
|
||||
ReadOnly = False
|
||||
RowSelect = True
|
||||
ScrollBars = ssBoth
|
||||
ShowColumnHeaders = True
|
||||
SortColumn = 1
|
||||
SortType = stText
|
||||
TabStop = True
|
||||
TabOrder = 0
|
||||
ToolTips = True
|
||||
Visible = True
|
||||
ViewStyle = vsReport
|
||||
OnColumnClick = SVNFileListViewColumnClick
|
||||
OnSelectItem = SVNFileListViewSelectItem
|
||||
@ -110,7 +80,6 @@ object SVNStatusFrm: TSVNStatusFrm
|
||||
Width = 726
|
||||
HelpContext = 0
|
||||
Align = alTop
|
||||
Alignment = taLeftJustify
|
||||
BorderSpacing.Left = 6
|
||||
BorderSpacing.Top = 6
|
||||
BorderSpacing.Right = 6
|
||||
@ -118,21 +87,10 @@ object SVNStatusFrm: TSVNStatusFrm
|
||||
BorderSpacing.Around = 0
|
||||
BorderSpacing.CellAlignHorizontal = ccaFill
|
||||
BorderSpacing.CellAlignVertical = ccaFill
|
||||
DragCursor = crDrag
|
||||
DragMode = dmManual
|
||||
Enabled = True
|
||||
Font.Height = 0
|
||||
Font.Style = []
|
||||
MaxLength = 0
|
||||
ParentBidiMode = True
|
||||
ParentFont = False
|
||||
ReadOnly = False
|
||||
ScrollBars = ssNone
|
||||
TabOrder = 1
|
||||
TabStop = True
|
||||
Visible = True
|
||||
WantReturns = True
|
||||
WantTabs = False
|
||||
end
|
||||
object ButtonPanel: TButtonPanel
|
||||
Left = 6
|
||||
@ -146,8 +104,6 @@ object SVNStatusFrm: TSVNStatusFrm
|
||||
TabOrder = 2
|
||||
DefaultButton = pbOK
|
||||
ShowButtons = [pbOK, pbCancel]
|
||||
ShowGlyphs = [pbOK, pbCancel, pbClose, pbHelp]
|
||||
Visible = True
|
||||
end
|
||||
object Splitter: TSplitter
|
||||
Cursor = crVSplit
|
||||
@ -157,29 +113,30 @@ object SVNStatusFrm: TSVNStatusFrm
|
||||
Width = 738
|
||||
HelpContext = 0
|
||||
Align = alTop
|
||||
AutoSnap = True
|
||||
Beveled = False
|
||||
MinSize = 30
|
||||
ParentColor = True
|
||||
ParentShowHint = True
|
||||
ResizeAnchor = akTop
|
||||
ResizeStyle = rsUpdate
|
||||
Visible = True
|
||||
end
|
||||
object PopupMenu1: TPopupMenu
|
||||
Images = ImageList
|
||||
left = 53
|
||||
top = 213
|
||||
object mnuShowDiff: TMenuItem
|
||||
Caption = 'New Item1'
|
||||
ImageIndex = 0
|
||||
RightJustify = False
|
||||
ShowAlwaysCheckable = False
|
||||
OnClick = mnuShowDiffClick
|
||||
end
|
||||
object mnuRevert: TMenuItem
|
||||
Caption = 'New Item2'
|
||||
ImageIndex = 1
|
||||
RightJustify = False
|
||||
ShowAlwaysCheckable = False
|
||||
OnClick = mnuRevertClick
|
||||
end
|
||||
end
|
||||
object ImageList: TImageList
|
||||
Masked = False
|
||||
left = 88
|
||||
top = 213
|
||||
end
|
||||
end
|
||||
|
||||
@ -3,52 +3,39 @@
|
||||
LazarusResources.Add('TSVNStatusFrm','FORMDATA',[
|
||||
'TPF0'#13'TSVNStatusFrm'#12'SVNStatusFrm'#4'Left'#3'6'#1#6'Height'#3#152#1#3
|
||||
+'Top'#3#174#0#5'Width'#3#226#2#11'HelpContext'#2#0#13'ActiveControl'#7#15'SV'
|
||||
+'NFileListView'#5'Align'#7#6'alNone'#14'AllowDropFiles'#8#10'AutoScroll'#9#8
|
||||
+'AutoSize'#8#11'BorderIcons'#11#12'biSystemMenu'#10'biMinimize'#10'biMaximiz'
|
||||
+'e'#0#11'BorderStyle'#7#10'bsSizeable'#7'Caption'#6#12'SVNStatusFrm'#28'Chil'
|
||||
+'dSizing.LeftRightSpacing'#2#0#28'ChildSizing.TopBottomSpacing'#2#0#29'Child'
|
||||
+'Sizing.HorizontalSpacing'#2#0#27'ChildSizing.VerticalSpacing'#2#0#27'ChildS'
|
||||
+'izing.ControlsPerLine'#2#0#12'ClientHeight'#3#152#1#11'ClientWidth'#3#226#2
|
||||
+#8'DockSite'#8#8'DragKind'#7#6'dkDrag'#8'DragMode'#7#8'dmManual'#7'Enabled'#9
|
||||
+#11'Font.Height'#2#0#10'Font.Style'#11#0#9'FormStyle'#7#8'fsNormal'#8'OnCrea'
|
||||
+'te'#7#10'FormCreate'#6'OnShow'#7#8'FormShow'#14'ParentBiDiMode'#9#10'Parent'
|
||||
+'Font'#8#8'Position'#7#14'poScreenCenter'#13'ShowInTaskBar'#7#9'stDefault'#14
|
||||
+'UseDockManager'#8#10'LCLVersion'#6#6'0.9.27'#11'WindowState'#7#8'wsNormal'#0
|
||||
+#9'TListView'#15'SVNFileListView'#4'Left'#2#6#6'Height'#3#10#1#3'Top'#2'X'#5
|
||||
+'Width'#3#214#2#11'HelpContext'#2#0#5'Align'#7#8'alClient'#18'BorderSpacing.'
|
||||
+'Left'#2#6#17'BorderSpacing.Top'#2#0#19'BorderSpacing.Right'#2#6#20'BorderSp'
|
||||
+'acing.Bottom'#2#6#20'BorderSpacing.Around'#2#0'!BorderSpacing.CellAlignHori'
|
||||
+'zontal'#7#7'ccaFill'#31'BorderSpacing.CellAlignVertical'#7#7'ccaFill'#11'Bo'
|
||||
+'rderWidth'#2#0#10'Checkboxes'#9#7'Columns'#14#1#8'AutoSize'#8#0#1#8'AutoSiz'
|
||||
+'e'#8#0#1#8'AutoSize'#8#0#1#8'AutoSize'#8#0#1#8'AutoSize'#8#5'Width'#3'I'#1#0
|
||||
+#1#8'AutoSize'#8#5'Width'#3#179#0#0#1#8'AutoSize'#8#0#1#8'AutoSize'#8#0#1#8
|
||||
+'AutoSize'#8#0#0#11'ColumnClick'#9#10'DragCursor'#7#6'crDrag'#8'DragMode'#7#8
|
||||
+'dmManual'#7'Enabled'#9#13'HideSelection'#9#11'MultiSelect'#8#14'ParentShowH'
|
||||
+'int'#9#9'PopupMenu'#7#10'PopupMenu1'#8'ReadOnly'#8#9'RowSelect'#9#10'Scroll'
|
||||
+'Bars'#7#6'ssBoth'#17'ShowColumnHeaders'#9#10'SortColumn'#2#1#8'SortType'#7#6
|
||||
+'stText'#7'TabStop'#9#8'TabOrder'#2#0#8'ToolTips'#9#7'Visible'#9#9'ViewStyle'
|
||||
+#7#8'vsReport'#13'OnColumnClick'#7#26'SVNFileListViewColumnClick'#12'OnSelec'
|
||||
+'tItem'#7#25'SVNFileListViewSelectItem'#0#0#5'TMemo'#16'SVNCommitMsgMemo'#4
|
||||
+'Left'#2#6#6'Height'#2'M'#3'Top'#2#6#5'Width'#3#214#2#11'HelpContext'#2#0#5
|
||||
+'Align'#7#5'alTop'#9'Alignment'#7#13'taLeftJustify'#18'BorderSpacing.Left'#2
|
||||
+#6#17'BorderSpacing.Top'#2#6#19'BorderSpacing.Right'#2#6#20'BorderSpacing.Bo'
|
||||
+'ttom'#2#0#20'BorderSpacing.Around'#2#0'!BorderSpacing.CellAlignHorizontal'#7
|
||||
+#7'ccaFill'#31'BorderSpacing.CellAlignVertical'#7#7'ccaFill'#10'DragCursor'#7
|
||||
+#6'crDrag'#8'DragMode'#7#8'dmManual'#7'Enabled'#9#11'Font.Height'#2#0#10'Fon'
|
||||
+'t.Style'#11#0#9'MaxLength'#2#0#14'ParentBidiMode'#9#10'ParentFont'#8#8'Read'
|
||||
+'Only'#8#10'ScrollBars'#7#6'ssNone'#8'TabOrder'#2#1#7'TabStop'#9#7'Visible'#9
|
||||
+#11'WantReturns'#9#8'WantTabs'#8#0#0#12'TButtonPanel'#11'ButtonPanel'#4'Left'
|
||||
+#2#6#6'Height'#2'0'#3'Top'#3'h'#1#5'Width'#3#214#2#11'HelpContext'#2#0#5'Ali'
|
||||
+'gn'#7#8'alBottom'#8'AutoSize'#9#11'ButtonOrder'#7#9'boDefault'#8'TabOrder'#2
|
||||
+#2#13'DefaultButton'#7#4'pbOK'#11'ShowButtons'#11#4'pbOK'#8'pbCancel'#0#10'S'
|
||||
+'howGlyphs'#11#4'pbOK'#8'pbCancel'#7'pbClose'#6'pbHelp'#0#7'Visible'#9#0#0#9
|
||||
+'TSplitter'#8'Splitter'#6'Cursor'#7#8'crVSplit'#4'Left'#2#0#6'Height'#2#5#3
|
||||
+'Top'#2'S'#5'Width'#3#226#2#11'HelpContext'#2#0#5'Align'#7#5'alTop'#8'AutoSn'
|
||||
+'ap'#9#7'Beveled'#8#7'MinSize'#2#30#11'ParentColor'#9#14'ParentShowHint'#9#12
|
||||
+'ResizeAnchor'#7#5'akTop'#11'ResizeStyle'#7#8'rsUpdate'#7'Visible'#9#0#0#10
|
||||
+'TPopupMenu'#10'PopupMenu1'#4'left'#2'5'#3'top'#3#213#0#0#9'TMenuItem'#11'mn'
|
||||
+'uShowDiff'#7'Caption'#6#9'New Item1'#12'RightJustify'#8#19'ShowAlwaysChecka'
|
||||
+'ble'#8#7'OnClick'#7#16'mnuShowDiffClick'#0#0#9'TMenuItem'#9'mnuRevert'#7'Ca'
|
||||
+'ption'#6#9'New Item2'#12'RightJustify'#8#19'ShowAlwaysCheckable'#8#7'OnClic'
|
||||
+'k'#7#14'mnuRevertClick'#0#0#0#0
|
||||
+'NFileListView'#7'Caption'#6#12'SVNStatusFrm'#28'ChildSizing.LeftRightSpacin'
|
||||
+'g'#2#0#28'ChildSizing.TopBottomSpacing'#2#0#29'ChildSizing.HorizontalSpacin'
|
||||
+'g'#2#0#27'ChildSizing.VerticalSpacing'#2#0#27'ChildSizing.ControlsPerLine'#2
|
||||
+#0#12'ClientHeight'#3#152#1#11'ClientWidth'#3#226#2#11'Font.Height'#2#0#10'F'
|
||||
+'ont.Style'#11#0#8'OnCreate'#7#10'FormCreate'#6'OnShow'#7#8'FormShow'#8'Posi'
|
||||
+'tion'#7#14'poScreenCenter'#10'LCLVersion'#6#6'0.9.27'#0#9'TListView'#15'SVN'
|
||||
+'FileListView'#4'Left'#2#6#6'Height'#3#10#1#3'Top'#2'X'#5'Width'#3#214#2#11
|
||||
+'HelpContext'#2#0#5'Align'#7#8'alClient'#18'BorderSpacing.Left'#2#6#17'Borde'
|
||||
+'rSpacing.Top'#2#0#19'BorderSpacing.Right'#2#6#20'BorderSpacing.Bottom'#2#6
|
||||
+#20'BorderSpacing.Around'#2#0'!BorderSpacing.CellAlignHorizontal'#7#7'ccaFil'
|
||||
+'l'#31'BorderSpacing.CellAlignVertical'#7#7'ccaFill'#10'Checkboxes'#9#7'Colu'
|
||||
+'mns'#14#1#8'AutoSize'#8#0#1#8'AutoSize'#8#0#1#8'AutoSize'#8#0#1#8'AutoSize'
|
||||
+#8#0#1#8'AutoSize'#8#5'Width'#3'I'#1#0#1#8'AutoSize'#8#5'Width'#3#179#0#0#1#8
|
||||
+'AutoSize'#8#0#1#8'AutoSize'#8#0#1#8'AutoSize'#8#0#0#9'PopupMenu'#7#10'Popup'
|
||||
+'Menu1'#9'RowSelect'#9#10'SortColumn'#2#1#8'SortType'#7#6'stText'#8'TabOrder'
|
||||
+#2#0#9'ViewStyle'#7#8'vsReport'#13'OnColumnClick'#7#26'SVNFileListViewColumn'
|
||||
+'Click'#12'OnSelectItem'#7#25'SVNFileListViewSelectItem'#0#0#5'TMemo'#16'SVN'
|
||||
+'CommitMsgMemo'#4'Left'#2#6#6'Height'#2'M'#3'Top'#2#6#5'Width'#3#214#2#11'He'
|
||||
+'lpContext'#2#0#5'Align'#7#5'alTop'#18'BorderSpacing.Left'#2#6#17'BorderSpac'
|
||||
+'ing.Top'#2#6#19'BorderSpacing.Right'#2#6#20'BorderSpacing.Bottom'#2#0#20'Bo'
|
||||
+'rderSpacing.Around'#2#0'!BorderSpacing.CellAlignHorizontal'#7#7'ccaFill'#31
|
||||
+'BorderSpacing.CellAlignVertical'#7#7'ccaFill'#11'Font.Height'#2#0#10'Font.S'
|
||||
+'tyle'#11#0#10'ParentFont'#8#8'TabOrder'#2#1#0#0#12'TButtonPanel'#11'ButtonP'
|
||||
+'anel'#4'Left'#2#6#6'Height'#2'0'#3'Top'#3'h'#1#5'Width'#3#214#2#11'HelpCont'
|
||||
+'ext'#2#0#5'Align'#7#8'alBottom'#8'AutoSize'#9#11'ButtonOrder'#7#9'boDefault'
|
||||
+#8'TabOrder'#2#2#13'DefaultButton'#7#4'pbOK'#11'ShowButtons'#11#4'pbOK'#8'pb'
|
||||
+'Cancel'#0#0#0#9'TSplitter'#8'Splitter'#6'Cursor'#7#8'crVSplit'#4'Left'#2#0#6
|
||||
+'Height'#2#5#3'Top'#2'S'#5'Width'#3#226#2#11'HelpContext'#2#0#5'Align'#7#5'a'
|
||||
+'lTop'#12'ResizeAnchor'#7#5'akTop'#0#0#10'TPopupMenu'#10'PopupMenu1'#6'Image'
|
||||
+'s'#7#9'ImageList'#4'left'#2'5'#3'top'#3#213#0#0#9'TMenuItem'#11'mnuShowDiff'
|
||||
+#7'Caption'#6#9'New Item1'#10'ImageIndex'#2#0#12'RightJustify'#8#19'ShowAlwa'
|
||||
+'ysCheckable'#8#7'OnClick'#7#16'mnuShowDiffClick'#0#0#9'TMenuItem'#9'mnuReve'
|
||||
+'rt'#7'Caption'#6#9'New Item2'#10'ImageIndex'#2#1#12'RightJustify'#8#19'Show'
|
||||
+'AlwaysCheckable'#8#7'OnClick'#7#14'mnuRevertClick'#0#0#0#10'TImageList'#9'I'
|
||||
+'mageList'#6'Masked'#8#4'left'#2'X'#3'top'#3#213#0#0#0#0
|
||||
]);
|
||||
|
||||
@ -32,6 +32,7 @@ type
|
||||
|
||||
TSVNStatusFrm = class(TForm)
|
||||
ButtonPanel: TButtonPanel;
|
||||
ImageList: TImageList;
|
||||
mnuRevert: TMenuItem;
|
||||
mnuShowDiff: TMenuItem;
|
||||
PopupMenu1: TPopupMenu;
|
||||
@ -99,9 +100,9 @@ begin
|
||||
AProcess := TProcess.Create(nil);
|
||||
|
||||
if pos(RepositoryPath,SVNFileListView.Selected.SubItems[0]) <> 0 then
|
||||
AProcess.CommandLine := SVNExecutable + ' revert ' + SVNFileListView.Selected.SubItems[0]
|
||||
AProcess.CommandLine := SVNExecutable + ' revert "' + SVNFileListView.Selected.SubItems[0] + '"'
|
||||
else
|
||||
AProcess.CommandLine := SVNExecutable + ' revert ' + AppendPathDelim(RepositoryPath) + SVNFileListView.Selected.SubItems[0];
|
||||
AProcess.CommandLine := SVNExecutable + ' revert "' + AppendPathDelim(RepositoryPath) + SVNFileListView.Selected.SubItems[0] + '"';
|
||||
|
||||
debugln('TSVNStatusFrm.mnuRevertClick commandline=', AProcess.CommandLine);
|
||||
AProcess.Options := AProcess.Options + [poWaitOnExit];
|
||||
@ -125,9 +126,9 @@ begin
|
||||
debugln('TSVNStatusFrm.mnuShowDiffClick Path=' ,SVNFileListView.Selected.SubItems[0]);
|
||||
|
||||
if pos(RepositoryPath,SVNFileListView.Selected.SubItems[0]) <> 0 then
|
||||
ShowSVNDiffFrm('-r HEAD', SVNFileListView.Selected.SubItems[0])
|
||||
ShowSVNDiffFrm('-r HEAD', '"' + SVNFileListView.Selected.SubItems[0] + '"')
|
||||
else
|
||||
ShowSVNDiffFrm('-r HEAD', AppendPathDelim(RepositoryPath) + SVNFileListView.Selected.SubItems[0]);
|
||||
ShowSVNDiffFrm('-r HEAD', '"' + AppendPathDelim(RepositoryPath) + SVNFileListView.Selected.SubItems[0] + '"');
|
||||
end;
|
||||
end;
|
||||
|
||||
@ -152,9 +153,9 @@ begin
|
||||
|
||||
if StatusItem^.Checked then
|
||||
if pos(RepositoryPath,StatusItem^.Path) = 0 then
|
||||
CmdLine := CmdLine + ' ''' + AppendPathDelim(RepositoryPath) + StatusItem^.Path + ''''
|
||||
CmdLine := CmdLine + ' "' + AppendPathDelim(RepositoryPath) + StatusItem^.Path + '"'
|
||||
else
|
||||
CmdLine := CmdLine + ' ''' + StatusItem^.Path + '''';
|
||||
CmdLine := CmdLine + ' "' + StatusItem^.Path + '"';
|
||||
end;
|
||||
|
||||
FileName := GetTempFileName('','');
|
||||
@ -276,6 +277,9 @@ begin
|
||||
SetColumn(SVNFileListView, 6, 75, rsCommitRevision, True);
|
||||
SetColumn(SVNFileListView, 7, 75, rsAuthor, True);
|
||||
SetColumn(SVNFileListView, 8, 75, rsDate, True);
|
||||
|
||||
ImageList.AddLazarusResource('menu_svn_diff');
|
||||
ImageList.AddLazarusResource('menu_svn_revert');
|
||||
end;
|
||||
|
||||
procedure TSVNStatusFrm.FormDestroy(Sender: TObject);
|
||||
@ -285,6 +289,7 @@ end;
|
||||
|
||||
initialization
|
||||
{$I svnstatusform.lrs}
|
||||
{$I lazsvnpkg_images.lrs}
|
||||
|
||||
end.
|
||||
|
||||
|
||||
@ -4,12 +4,6 @@ object SVNUpdateFrm: TSVNUpdateFrm
|
||||
Top = 209
|
||||
Width = 640
|
||||
HelpContext = 0
|
||||
Align = alNone
|
||||
AllowDropFiles = False
|
||||
AutoScroll = True
|
||||
AutoSize = False
|
||||
BorderIcons = [biSystemMenu, biMinimize, biMaximize]
|
||||
BorderStyle = bsSizeable
|
||||
Caption = 'SVNUpdateFrm'
|
||||
ChildSizing.LeftRightSpacing = 0
|
||||
ChildSizing.TopBottomSpacing = 0
|
||||
@ -18,22 +12,12 @@ object SVNUpdateFrm: TSVNUpdateFrm
|
||||
ChildSizing.ControlsPerLine = 0
|
||||
ClientHeight = 300
|
||||
ClientWidth = 640
|
||||
DockSite = False
|
||||
DragKind = dkDrag
|
||||
DragMode = dmManual
|
||||
Enabled = True
|
||||
Font.Height = 0
|
||||
Font.Style = []
|
||||
FormStyle = fsNormal
|
||||
OnCreate = FormCreate
|
||||
OnShow = FormShow
|
||||
ParentBiDiMode = True
|
||||
ParentFont = False
|
||||
Position = poScreenCenter
|
||||
ShowInTaskBar = stDefault
|
||||
UseDockManager = False
|
||||
LCLVersion = '0.9.27'
|
||||
WindowState = wsNormal
|
||||
object SVNUpdateListView: TListView
|
||||
Left = 6
|
||||
Height = 240
|
||||
@ -48,8 +32,6 @@ object SVNUpdateFrm: TSVNUpdateFrm
|
||||
BorderSpacing.Around = 6
|
||||
BorderSpacing.CellAlignHorizontal = ccaFill
|
||||
BorderSpacing.CellAlignVertical = ccaFill
|
||||
BorderWidth = 0
|
||||
Checkboxes = False
|
||||
Columns = <
|
||||
item
|
||||
AutoSize = False
|
||||
@ -59,24 +41,12 @@ object SVNUpdateFrm: TSVNUpdateFrm
|
||||
AutoSize = False
|
||||
Width = 553
|
||||
end>
|
||||
ColumnClick = True
|
||||
DragCursor = crDrag
|
||||
DragMode = dmManual
|
||||
Enabled = True
|
||||
HideSelection = True
|
||||
MultiSelect = False
|
||||
ParentShowHint = True
|
||||
PopupMenu = UpdatePopupMenu
|
||||
ReadOnly = False
|
||||
RowSelect = True
|
||||
ScrollBars = ssAutoBoth
|
||||
ShowColumnHeaders = True
|
||||
SortColumn = 0
|
||||
SortType = stNone
|
||||
TabStop = True
|
||||
TabOrder = 0
|
||||
ToolTips = True
|
||||
Visible = True
|
||||
ViewStyle = vsReport
|
||||
end
|
||||
object ButtonPanel: TButtonPanel
|
||||
@ -91,8 +61,6 @@ object SVNUpdateFrm: TSVNUpdateFrm
|
||||
TabOrder = 1
|
||||
DefaultButton = pbOK
|
||||
ShowButtons = [pbOK]
|
||||
ShowGlyphs = [pbOK, pbCancel, pbClose, pbHelp]
|
||||
Visible = True
|
||||
object ShowLogButton: TBitBtn
|
||||
Left = 78
|
||||
Height = 34
|
||||
@ -108,10 +76,7 @@ object SVNUpdateFrm: TSVNUpdateFrm
|
||||
BorderSpacing.Around = 6
|
||||
BorderSpacing.CellAlignHorizontal = ccaFill
|
||||
BorderSpacing.CellAlignVertical = ccaFill
|
||||
Cancel = False
|
||||
Caption = 'ShowLogButton'
|
||||
Default = False
|
||||
Enabled = True
|
||||
Glyph.Data = {
|
||||
36040000424D3604000000000000360000002800000010000000100000000100
|
||||
20000000000000040000640000006400000000000000000000000000000080B1
|
||||
@ -148,18 +113,9 @@ object SVNUpdateFrm: TSVNUpdateFrm
|
||||
25000100CA00000000000000000000000000CC0000001900000048346B00A815
|
||||
60000900000028156000A000000038000000C015600073AB2000
|
||||
}
|
||||
Kind = bkCustom
|
||||
Layout = blGlyphLeft
|
||||
Margin = -1
|
||||
ModalResult = 0
|
||||
NumGlyphs = 0
|
||||
OnClick = ShowLogButtonClick
|
||||
ParentFont = True
|
||||
ParentShowHint = True
|
||||
Spacing = 3
|
||||
TabOrder = 4
|
||||
TabStop = True
|
||||
Visible = True
|
||||
end
|
||||
end
|
||||
object UpdatePopupMenu: TPopupMenu
|
||||
|
||||
@ -2,92 +2,80 @@
|
||||
|
||||
LazarusResources.Add('TSVNUpdateFrm','FORMDATA',[
|
||||
'TPF0'#13'TSVNUpdateFrm'#12'SVNUpdateFrm'#4'Left'#3#30#1#6'Height'#3','#1#3'T'
|
||||
+'op'#3#209#0#5'Width'#3#128#2#11'HelpContext'#2#0#5'Align'#7#6'alNone'#14'Al'
|
||||
+'lowDropFiles'#8#10'AutoScroll'#9#8'AutoSize'#8#11'BorderIcons'#11#12'biSyst'
|
||||
+'emMenu'#10'biMinimize'#10'biMaximize'#0#11'BorderStyle'#7#10'bsSizeable'#7
|
||||
+'Caption'#6#12'SVNUpdateFrm'#28'ChildSizing.LeftRightSpacing'#2#0#28'ChildSi'
|
||||
+'zing.TopBottomSpacing'#2#0#29'ChildSizing.HorizontalSpacing'#2#0#27'ChildSi'
|
||||
+'zing.VerticalSpacing'#2#0#27'ChildSizing.ControlsPerLine'#2#0#12'ClientHeig'
|
||||
+'ht'#3','#1#11'ClientWidth'#3#128#2#8'DockSite'#8#8'DragKind'#7#6'dkDrag'#8
|
||||
+'DragMode'#7#8'dmManual'#7'Enabled'#9#11'Font.Height'#2#0#10'Font.Style'#11#0
|
||||
+#9'FormStyle'#7#8'fsNormal'#8'OnCreate'#7#10'FormCreate'#6'OnShow'#7#8'FormS'
|
||||
+'how'#14'ParentBiDiMode'#9#10'ParentFont'#8#8'Position'#7#14'poScreenCenter'
|
||||
+#13'ShowInTaskBar'#7#9'stDefault'#14'UseDockManager'#8#10'LCLVersion'#6#6'0.'
|
||||
+'9.27'#11'WindowState'#7#8'wsNormal'#0#9'TListView'#17'SVNUpdateListView'#4
|
||||
+'Left'#2#6#6'Height'#3#240#0#3'Top'#2#6#5'Width'#3't'#2#11'HelpContext'#2#0#5
|
||||
+'Align'#7#8'alClient'#18'BorderSpacing.Left'#2#0#17'BorderSpacing.Top'#2#0#19
|
||||
+'BorderSpacing.Right'#2#0#20'BorderSpacing.Bottom'#2#0#20'BorderSpacing.Arou'
|
||||
+'nd'#2#6'!BorderSpacing.CellAlignHorizontal'#7#7'ccaFill'#31'BorderSpacing.C'
|
||||
+'ellAlignVertical'#7#7'ccaFill'#11'BorderWidth'#2#0#10'Checkboxes'#8#7'Colum'
|
||||
+'ns'#14#1#8'AutoSize'#8#5'Width'#2'K'#0#1#8'AutoSize'#8#5'Width'#3')'#2#0#0
|
||||
+#11'ColumnClick'#9#10'DragCursor'#7#6'crDrag'#8'DragMode'#7#8'dmManual'#7'En'
|
||||
+'abled'#9#13'HideSelection'#9#11'MultiSelect'#8#14'ParentShowHint'#9#9'Popup'
|
||||
+'Menu'#7#15'UpdatePopupMenu'#8'ReadOnly'#8#9'RowSelect'#9#10'ScrollBars'#7#10
|
||||
+'ssAutoBoth'#17'ShowColumnHeaders'#9#10'SortColumn'#2#0#8'SortType'#7#6'stNo'
|
||||
+'ne'#7'TabStop'#9#8'TabOrder'#2#0#8'ToolTips'#9#7'Visible'#9#9'ViewStyle'#7#8
|
||||
+'vsReport'#0#0#12'TButtonPanel'#11'ButtonPanel'#4'Left'#2#6#6'Height'#2'0'#3
|
||||
+'Top'#3#252#0#5'Width'#3't'#2#11'HelpContext'#2#0#5'Align'#7#8'alBottom'#8'A'
|
||||
+'utoSize'#9#11'ButtonOrder'#7#9'boDefault'#8'TabOrder'#2#1#13'DefaultButton'
|
||||
+#7#4'pbOK'#11'ShowButtons'#11#4'pbOK'#0#10'ShowGlyphs'#11#4'pbOK'#8'pbCancel'
|
||||
+#7'pbClose'#6'pbHelp'#0#7'Visible'#9#0#7'TBitBtn'#13'ShowLogButton'#4'Left'#2
|
||||
+'N'#6'Height'#2'"'#3'Top'#2#8#5'Width'#3#131#0#11'HelpContext'#2#0#5'Align'#7
|
||||
+#6'alLeft'#8'AutoSize'#9#18'BorderSpacing.Left'#2#0#17'BorderSpacing.Top'#2#0
|
||||
+#19'BorderSpacing.Right'#2#0#20'BorderSpacing.Bottom'#2#0#20'BorderSpacing.A'
|
||||
+'round'#2#6'!BorderSpacing.CellAlignHorizontal'#7#7'ccaFill'#31'BorderSpacin'
|
||||
+'g.CellAlignVertical'#7#7'ccaFill'#6'Cancel'#8#7'Caption'#6#13'ShowLogButton'
|
||||
+#7'Default'#8#7'Enabled'#9#10'Glyph.Data'#10':'#4#0#0'6'#4#0#0'BM6'#4#0#0#0#0
|
||||
+#0#0'6'#0#0#0'('#0#0#0#16#0#0#0#16#0#0#0#1#0' '#0#0#0#0#0#0#4#0#0'd'#0#0#0'd'
|
||||
+#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#128#177'd'#255#133#138#136#255#133#138#136#255
|
||||
+#133#138#136#255#133#138#136#255#133#138#136#255#133#138#136#255#133#138#136
|
||||
+#255#133#138#136#255#133#138#136#255#133#138#136#255#133#138#136#255'iXW'#255
|
||||
+#128#25'`'#0''#171' '#0#0#0#0#0#133#138#136#255#238#238#238#255#178#178#178
|
||||
+#255#178#178#178#255#178#178#178#255#178#178#178#255#178#178#178#255#178#178
|
||||
+#178#255#178#178#178#255#177#177#177#255#178#178#178#255#178#178#178#255#133
|
||||
+#138#136#255#222#4#202#0#11#0'|'#0'H4k'#0#133#138#136#255#255#255#255#255#236
|
||||
+#236#236#255#235#235#235#255#234#234#234#255#234#234#234#255#233#233#233#255
|
||||
+#235#235#235#255#234#234#234#255#235#235#235#255#236#236#236#255#178#178#178
|
||||
+#255#133#138#136#255#1#0#202#0#0#0#0#0'p'#3#0#0#133#138#136#255#255#255#255
|
||||
+#255#219#219#219#255#203#203#203#255#196#196#196#255#0#0#0#255#2'Y'#143#255
|
||||
+'ccc'#255#140#140#140#255#202#202#202#255#218#218#218#255#178#178#178#255#133
|
||||
+#138#136#255#202#0#0#0#25#0#0#0'PK&'#0#133#138#136#255#255#255#255#255#236
|
||||
+#236#236#255#236#236#236#255#233#233#233#255#2'Y'#143#255'&BL'#255'6Wk'#255#2
|
||||
+'Y'#143#255#157#157#157#255#214#214#214#255#174#174#174#255#133#138#136#255#9
|
||||
+#0#0#0#248#23'`'#0#0#0#0#0#133#138#136#255#255#255#255#255#219#219#219#255
|
||||
+#204#204#204#255#203#203#203#255'uuu'#255'9[p'#255#138#171#194#255'U'#133#163
|
||||
+#255#2'Y'#143#255#143#143#143#255#134#134#134#255#133#138#136#255'@'#24'`'#0
|
||||
+'{'#171' '#0#0#0#0#0#133#138#136#255#255#255#255#255#236#236#236#255#236#236
|
||||
+#236#255#236#236#236#255#235#235#235#255#2'Y'#143#255#196#229#237#255'd'#159
|
||||
+#200#255'W'#135#164#255#2'Y'#143#255'qqq'#255#133#138#136#255#222#4#202#0#10
|
||||
+#0'|'#0'H4k'#0#133#138#136#255#255#255#255#255#219#219#219#255#204#204#204
|
||||
+#255#204#204#204#255#204#204#204#255#183#183#183#255#2'Y'#143#255#197#230#237
|
||||
+#255'h'#166#206#255'W'#132#160#255#2'Y'#143#255#133#138#136#255#3#0#202#0#0#0
|
||||
+#0#0'0'#2#0#0#133#138#136#255#255#255#255#255#236#236#236#255#236#236#236#255
|
||||
+#236#236#236#255#236#236#236#255#236#236#236#255#211#211#211#255#2'Y'#143#255
|
||||
+#198#234#238#255'i'#170#207#255'V'#131#160#255#2'Y'#143#255#163#18#29#0#25#0
|
||||
+#0#0'PK&'#0#133#138#136#255#255#255#255#255#219#219#219#255#204#204#204#255
|
||||
,#204#204#204#255#204#204#204#255#204#204#204#255#204#204#204#255#183#183#183
|
||||
+#255#2'Y'#143#255#199#235#239#255'j'#172#210#255'W'#135#164#255#2'Y'#143#255
|
||||
+#147'$j'#0#0#0#0#0#133#138#136#255#255#255#255#255#236#236#236#255#236#236
|
||||
+#236#255#236#236#236#255#236#236#236#255#236#236#236#255#236#236#236#255#236
|
||||
+#236#236#255#211#211#211#255#2'Y'#143#255#199#235#239#255'j'#172#210#255'T'
|
||||
+#129#160#255#2'Y'#143#255#0#0#0#0#133#138#136#255#235#235#235#255#0#160#196
|
||||
+#255#188#188#188#255#0#160#196#255#184#184#184#255#0#160#196#255#184#184#184
|
||||
+#255#0#160#196#255#184#184#184#255#0#160#196#255#2'Y'#143#255#198#234#238#255
|
||||
+'q'#173#207#255#2'Y'#143#255'H4k'#0#133#138#136#255#0#160#196#255'='#177#235
|
||||
+#255#0#160#196#255'='#177#235#255#0#160#196#255'='#177#235#255#0#160#196#255
|
||||
+'='#177#235#255#0#160#196#255'='#177#235#255#0#160#196#255#2'Y'#143#255#2'Y'
|
||||
+#143#255#1' 4'#0#240#0#0#0'W76'#0#0#160#196#255#198#232#249#255#0#160#196#255
|
||||
+#198#232#249#255#0#160#196#255#198#232#249#255#0#160#196#255#198#232#249#255
|
||||
+#0#160#196#255#198#232#249#255#0#160#196#255#0#0#0#0#204#0#0#0#25#0#0#0'PK&'
|
||||
+#0#224#176'J'#0#163'.'#200#0#0#160#196#255#0'+4'#0#0#160#196#255#1'+'#200#0#0
|
||||
+'op'#3#209#0#5'Width'#3#128#2#11'HelpContext'#2#0#7'Caption'#6#12'SVNUpdateF'
|
||||
+'rm'#28'ChildSizing.LeftRightSpacing'#2#0#28'ChildSizing.TopBottomSpacing'#2
|
||||
+#0#29'ChildSizing.HorizontalSpacing'#2#0#27'ChildSizing.VerticalSpacing'#2#0
|
||||
+#27'ChildSizing.ControlsPerLine'#2#0#12'ClientHeight'#3','#1#11'ClientWidth'
|
||||
+#3#128#2#11'Font.Height'#2#0#10'Font.Style'#11#0#8'OnCreate'#7#10'FormCreate'
|
||||
+#6'OnShow'#7#8'FormShow'#8'Position'#7#14'poScreenCenter'#10'LCLVersion'#6#6
|
||||
+'0.9.27'#0#9'TListView'#17'SVNUpdateListView'#4'Left'#2#6#6'Height'#3#240#0#3
|
||||
+'Top'#2#6#5'Width'#3't'#2#11'HelpContext'#2#0#5'Align'#7#8'alClient'#18'Bord'
|
||||
+'erSpacing.Left'#2#0#17'BorderSpacing.Top'#2#0#19'BorderSpacing.Right'#2#0#20
|
||||
+'BorderSpacing.Bottom'#2#0#20'BorderSpacing.Around'#2#6'!BorderSpacing.CellA'
|
||||
+'lignHorizontal'#7#7'ccaFill'#31'BorderSpacing.CellAlignVertical'#7#7'ccaFil'
|
||||
+'l'#7'Columns'#14#1#8'AutoSize'#8#5'Width'#2'K'#0#1#8'AutoSize'#8#5'Width'#3
|
||||
+')'#2#0#0#9'PopupMenu'#7#15'UpdatePopupMenu'#9'RowSelect'#9#10'ScrollBars'#7
|
||||
+#10'ssAutoBoth'#10'SortColumn'#2#0#8'SortType'#7#6'stNone'#8'TabOrder'#2#0#9
|
||||
+'ViewStyle'#7#8'vsReport'#0#0#12'TButtonPanel'#11'ButtonPanel'#4'Left'#2#6#6
|
||||
+'Height'#2'0'#3'Top'#3#252#0#5'Width'#3't'#2#11'HelpContext'#2#0#5'Align'#7#8
|
||||
+'alBottom'#8'AutoSize'#9#11'ButtonOrder'#7#9'boDefault'#8'TabOrder'#2#1#13'D'
|
||||
+'efaultButton'#7#4'pbOK'#11'ShowButtons'#11#4'pbOK'#0#0#7'TBitBtn'#13'ShowLo'
|
||||
+'gButton'#4'Left'#2'N'#6'Height'#2'"'#3'Top'#2#8#5'Width'#3#131#0#11'HelpCon'
|
||||
+'text'#2#0#5'Align'#7#6'alLeft'#8'AutoSize'#9#18'BorderSpacing.Left'#2#0#17
|
||||
+'BorderSpacing.Top'#2#0#19'BorderSpacing.Right'#2#0#20'BorderSpacing.Bottom'
|
||||
+#2#0#20'BorderSpacing.Around'#2#6'!BorderSpacing.CellAlignHorizontal'#7#7'cc'
|
||||
+'aFill'#31'BorderSpacing.CellAlignVertical'#7#7'ccaFill'#7'Caption'#6#13'Sho'
|
||||
+'wLogButton'#10'Glyph.Data'#10':'#4#0#0'6'#4#0#0'BM6'#4#0#0#0#0#0#0'6'#0#0#0
|
||||
+'('#0#0#0#16#0#0#0#16#0#0#0#1#0' '#0#0#0#0#0#0#4#0#0'd'#0#0#0'd'#0#0#0#0#0#0
|
||||
+#0#0#0#0#0#0#0#0#0#128#177'd'#255#133#138#136#255#133#138#136#255#133#138#136
|
||||
+#255#133#138#136#255#133#138#136#255#133#138#136#255#133#138#136#255#133#138
|
||||
+#136#255#133#138#136#255#133#138#136#255#133#138#136#255'iXW'#255#128#25'`'#0
|
||||
+''#171' '#0#0#0#0#0#133#138#136#255#238#238#238#255#178#178#178#255#178#178
|
||||
+#178#255#178#178#178#255#178#178#178#255#178#178#178#255#178#178#178#255#178
|
||||
+#178#178#255#177#177#177#255#178#178#178#255#178#178#178#255#133#138#136#255
|
||||
+#222#4#202#0#11#0'|'#0'H4k'#0#133#138#136#255#255#255#255#255#236#236#236#255
|
||||
+#235#235#235#255#234#234#234#255#234#234#234#255#233#233#233#255#235#235#235
|
||||
+#255#234#234#234#255#235#235#235#255#236#236#236#255#178#178#178#255#133#138
|
||||
+#136#255#1#0#202#0#0#0#0#0'p'#3#0#0#133#138#136#255#255#255#255#255#219#219
|
||||
+#219#255#203#203#203#255#196#196#196#255#0#0#0#255#2'Y'#143#255'ccc'#255#140
|
||||
+#140#140#255#202#202#202#255#218#218#218#255#178#178#178#255#133#138#136#255
|
||||
+#202#0#0#0#25#0#0#0'PK&'#0#133#138#136#255#255#255#255#255#236#236#236#255
|
||||
+#236#236#236#255#233#233#233#255#2'Y'#143#255'&BL'#255'6Wk'#255#2'Y'#143#255
|
||||
+#157#157#157#255#214#214#214#255#174#174#174#255#133#138#136#255#9#0#0#0#248
|
||||
+#23'`'#0#0#0#0#0#133#138#136#255#255#255#255#255#219#219#219#255#204#204#204
|
||||
+#255#203#203#203#255'uuu'#255'9[p'#255#138#171#194#255'U'#133#163#255#2'Y'
|
||||
+#143#255#143#143#143#255#134#134#134#255#133#138#136#255'@'#24'`'#0'{'#171' '
|
||||
+#0#0#0#0#0#133#138#136#255#255#255#255#255#236#236#236#255#236#236#236#255
|
||||
+#236#236#236#255#235#235#235#255#2'Y'#143#255#196#229#237#255'd'#159#200#255
|
||||
+'W'#135#164#255#2'Y'#143#255'qqq'#255#133#138#136#255#222#4#202#0#10#0'|'#0
|
||||
+'H4k'#0#133#138#136#255#255#255#255#255#219#219#219#255#204#204#204#255#204
|
||||
+#204#204#255#204#204#204#255#183#183#183#255#2'Y'#143#255#197#230#237#255'h'
|
||||
+#166#206#255'W'#132#160#255#2'Y'#143#255#133#138#136#255#3#0#202#0#0#0#0#0'0'
|
||||
+#2#0#0#133#138#136#255#255#255#255#255#236#236#236#255#236#236#236#255#236
|
||||
+#236#236#255#236#236#236#255#236#236#236#255#211#211#211#255#2'Y'#143#255#198
|
||||
+#234#238#255'i'#170#207#255'V'#131#160#255#2'Y'#143#255#163#18#29#0#25#0#0#0
|
||||
+'PK&'#0#133#138#136#255#255#255#255#255#219#219#219#255#204#204#204#255#204
|
||||
+#204#204#255#204#204#204#255#204#204#204#255#204#204#204#255#183#183#183#255
|
||||
+#2'Y'#143#255#199#235#239#255'j'#172#210#255'W'#135#164#255#2'Y'#143#255#147
|
||||
+'$j'#0#0#0#0#0#133#138#136#255#255#255#255#255#236#236#236#255#236#236#236
|
||||
+#255#236#236#236#255#236#236#236#255#236#236#236#255#236#236#236#255#236#236
|
||||
+#236#255#211#211#211#255#2'Y'#143#255#199#235#239#255'j'#172#210#255'T'#129
|
||||
+#160#255#2'Y'#143#255#0#0#0#0#133#138#136#255#235#235#235#255#0#160#196#255
|
||||
+#188#188#188#255#0#160#196#255#184#184#184#255#0#160#196#255#184#184#184#255
|
||||
+#0#160#196#255#184#184#184#255#0#160#196#255#2'Y'#143#255#198#234#238#255'q'
|
||||
+#173#207#255#2'Y'#143#255'H4k'#0#133#138#136#255#0#160#196#255'='#177#235#255
|
||||
+#0#160#196#255'='#177#235#255#0#160#196#255'='#177#235#255#0#160#196#255'='
|
||||
,#177#235#255#0#160#196#255'='#177#235#255#0#160#196#255#2'Y'#143#255#2'Y'#143
|
||||
+#255#1' 4'#0#240#0#0#0'W76'#0#0#160#196#255#198#232#249#255#0#160#196#255#198
|
||||
+#232#249#255#0#160#196#255#198#232#249#255#0#160#196#255#198#232#249#255#0
|
||||
+#160#196#255#198#232#249#255#0#160#196#255#0#0#0#0#204#0#0#0#25#0#0#0'PK&'#0
|
||||
+#224#176'J'#0#163'.'#200#0#0#160#196#255#0'+4'#0#0#160#196#255#1'+'#200#0#0
|
||||
+#160#196#255#0'+4'#0#0#160#196#255#150'+4'#0#0#160#196#255'5Q'#130#0#248#21
|
||||
+'`'#0#9#0#0#0'x'#21'`'#0#0#0#0#0'x'#246'%'#0#1#0#202#0#0#0#0#0#0#0#0#0#0#0#0
|
||||
+#0#204#0#0#0#25#0#0#0'H4k'#0#168#21'`'#0#9#0#0#0'('#21'`'#0#160#0#0#0'8'#0#0
|
||||
+#0#192#21'`'#0's'#171' '#0#4'Kind'#7#8'bkCustom'#6'Layout'#7#11'blGlyphLeft'
|
||||
+#6'Margin'#2#255#11'ModalResult'#2#0#9'NumGlyphs'#2#0#7'OnClick'#7#18'ShowLo'
|
||||
+'gButtonClick'#10'ParentFont'#9#14'ParentShowHint'#9#7'Spacing'#2#3#8'TabOrd'
|
||||
+'er'#2#4#7'TabStop'#9#7'Visible'#9#0#0#0#10'TPopupMenu'#15'UpdatePopupMenu'#4
|
||||
+'left'#2'('#3'top'#2'@'#0#9'TMenuItem'#11'mnuShowDiff'#7'Caption'#6#9'New It'
|
||||
+'em1'#12'RightJustify'#8#19'ShowAlwaysCheckable'#8#7'OnClick'#7#16'mnuShowDi'
|
||||
+'ffClick'#0#0#0#0
|
||||
+#0#192#21'`'#0's'#171' '#0#9'NumGlyphs'#2#0#7'OnClick'#7#18'ShowLogButtonCli'
|
||||
+'ck'#8'TabOrder'#2#4#0#0#0#10'TPopupMenu'#15'UpdatePopupMenu'#4'left'#2'('#3
|
||||
+'top'#2'@'#0#9'TMenuItem'#11'mnuShowDiff'#7'Caption'#6#9'New Item1'#12'Right'
|
||||
+'Justify'#8#19'ShowAlwaysCheckable'#8#7'OnClick'#7#16'mnuShowDiffClick'#0#0#0
|
||||
+#0
|
||||
]);
|
||||
|
||||
@ -67,7 +67,7 @@ var
|
||||
begin
|
||||
SVNUpdateFrm := TSVNUpdateFrm.Create(nil);
|
||||
|
||||
SVNUpdateFrm.RepositoryPath:=ARepoPath;
|
||||
SVNUpdateFrm.RepositoryPath := ARepoPath;
|
||||
SVNUpdateFrm.ShowModal;
|
||||
|
||||
SVNUpdateFrm.Free;
|
||||
@ -168,7 +168,7 @@ begin
|
||||
BytesRead := 0;
|
||||
|
||||
AProcess := TProcess.Create(nil);
|
||||
AProcess.CommandLine := SVNExecutable + ' update ' + RepositoryPath + ' --non-interactive';
|
||||
AProcess.CommandLine := SVNExecutable + ' update "' + RepositoryPath + '" --non-interactive';
|
||||
debugln('TSVNUpdateFrm.Execute CommandLine ' + AProcess.CommandLine);
|
||||
AProcess.Options := [poUsePipes, poStdErrToOutput];
|
||||
AProcess.ShowWindow := swoHIDE;
|
||||
|
||||
Loading…
Reference in New Issue
Block a user