dif_dc.diff (7,353 bytes)
Index: src/fmain.lfm
===================================================================
--- src/fmain.lfm (revision 6031)
+++ src/fmain.lfm (working copy)
@@ -20,7 +20,7 @@
SessionProperties = 'nbConsole.Height;seLogWindow.Height'
ShowHint = True
ShowInTaskBar = stAlways
- LCLVersion = '1.4.0.3'
+ LCLVersion = '1.5'
Visible = True
object MainToolBar: TKASToolBar
AnchorSideTop.Control = Owner
@@ -30,6 +30,7 @@
Width = 760
AutoSize = True
Constraints.MinHeight = 20
+ EdgeBorders = []
Flat = True
TabOrder = 2
OnDragDrop = MainToolBarDragDrop
@@ -46,12 +47,13 @@
object pnlDisk: TPanel
AnchorSideTop.Control = MainToolBar
Left = 0
- Height = 26
+ Height = 24
Top = 20
Width = 760
Align = alTop
AutoSize = True
- ClientHeight = 26
+ BevelOuter = bvNone
+ ClientHeight = 24
ClientWidth = 760
FullRepaint = False
TabOrder = 0
@@ -59,9 +61,9 @@
object pnlDskLeft: TPanel
AnchorSideLeft.Control = pnlDisk
AnchorSideTop.Control = pnlDisk
- Left = 1
+ Left = 0
Height = 24
- Top = 1
+ Top = 0
Width = 170
BevelOuter = bvNone
ClientHeight = 24
@@ -75,6 +77,7 @@
Width = 170
AutoSize = True
Constraints.MinHeight = 20
+ EdgeBorders = [ebTop, ebBottom]
Flat = True
ShowCaptions = True
TabOrder = 0
@@ -90,9 +93,9 @@
AnchorSideTop.Control = pnlDisk
AnchorSideRight.Control = pnlDisk
AnchorSideRight.Side = asrBottom
- Left = 171
+ Left = 172
Height = 24
- Top = 1
+ Top = 0
Width = 588
Anchors = [akTop, akRight]
BevelOuter = bvNone
@@ -107,6 +110,7 @@
Width = 588
AutoSize = True
Constraints.MinHeight = 20
+ EdgeBorders = [ebTop, ebBottom]
Flat = True
ShowCaptions = True
TabOrder = 0
@@ -121,23 +125,24 @@
end
object pnlNotebooks: TPanel
Left = 0
- Height = 163
- Top = 46
+ Height = 167
+ Top = 44
Width = 760
Align = alClient
- ClientHeight = 163
+ BevelOuter = bvNone
+ ClientHeight = 167
ClientWidth = 760
FullRepaint = False
TabOrder = 1
OnResize = pnlNotebooksResize
object pnlLeft: TPanel
- Left = 1
- Height = 161
- Top = 1
+ Left = 0
+ Height = 167
+ Top = 0
Width = 511
Align = alLeft
BevelOuter = bvNone
- ClientHeight = 161
+ ClientHeight = 167
ClientWidth = 511
TabOrder = 0
OnDblClick = pnlLeftRightDblClick
@@ -257,14 +262,14 @@
end
end
object pnlRight: TPanel
- Left = 512
- Height = 161
- Top = 1
- Width = 247
+ Left = 511
+ Height = 167
+ Top = 0
+ Width = 249
Align = alClient
BevelOuter = bvNone
- ClientHeight = 161
- ClientWidth = 247
+ ClientHeight = 167
+ ClientWidth = 249
TabOrder = 1
OnDblClick = pnlLeftRightDblClick
OnResize = pnlRightResize
@@ -272,7 +277,7 @@
Left = 0
Height = 10
Top = 0
- Width = 247
+ Width = 249
Align = alTop
BevelOuter = bvNone
TabOrder = 1
@@ -282,12 +287,12 @@
Left = 0
Height = 24
Top = 10
- Width = 247
+ Width = 249
Align = alTop
AutoSize = True
BevelOuter = bvNone
ClientHeight = 24
- ClientWidth = 247
+ ClientWidth = 249
TabOrder = 0
object btnRightDrive: TSpeedButton
Left = 0
@@ -300,7 +305,7 @@
OnMouseUp = btnDriveMouseUp
end
object btnRightHome: TSpeedButton
- Left = 201
+ Left = 203
Height = 24
Top = 0
Width = 23
@@ -309,7 +314,7 @@
OnClick = btnRightClick
end
object btnRightUp: TSpeedButton
- Left = 178
+ Left = 180
Height = 24
Top = 0
Width = 23
@@ -318,7 +323,7 @@
OnClick = btnRightClick
end
object btnRightRoot: TSpeedButton
- Left = 155
+ Left = 157
Height = 24
Top = 0
Width = 23
@@ -327,7 +332,7 @@
OnClick = btnRightClick
end
object btnRightDirectoryHotlist: TSpeedButton
- Left = 132
+ Left = 134
Height = 24
Hint = 'Directory Hotlist'
Top = 0
@@ -337,7 +342,7 @@
OnClick = btnRightDirectoryHotlistClick
end
object btnRightEqualLeft: TSpeedButton
- Left = 224
+ Left = 226
Height = 24
Hint = 'Show current directory of the left panel in the right panel'
Top = 0
@@ -355,7 +360,7 @@
Left = 52
Height = 10
Top = 1
- Width = 78
+ Width = 80
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 2
BorderSpacing.Right = 2
@@ -369,7 +374,7 @@
Left = 50
Height = 1
Top = 0
- Width = 82
+ Width = 84
Alignment = taCenter
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 2
@@ -398,7 +403,7 @@
object PanelAllProgress: TPanel
Left = 0
Height = 0
- Top = 209
+ Top = 211
Width = 760
Align = alBottom
AutoSize = True
@@ -409,7 +414,7 @@
Cursor = crVSplit
Left = 0
Height = 3
- Top = 209
+ Top = 211
Width = 760
Align = alBottom
AutoSnap = False
@@ -420,27 +425,27 @@
object pnlCommand: TPanel
AnchorSideBottom.Control = LogSplitter
Left = 0
- Height = 83
- Top = 212
+ Height = 81
+ Top = 214
Width = 760
Align = alBottom
AutoSize = True
- BevelOuter = bvLowered
- ClientHeight = 83
+ BevelOuter = bvNone
+ ClientHeight = 81
ClientWidth = 760
FullRepaint = False
TabOrder = 8
object pnlCmdLine: TPanel
- Left = 1
+ Left = 0
Height = 27
- Top = 55
- Width = 758
+ Top = 54
+ Width = 760
Align = alClient
AutoSize = True
BevelOuter = bvNone
ChildSizing.TopBottomSpacing = 2
ClientHeight = 27
- ClientWidth = 758
+ ClientWidth = 760
TabOrder = 1
object lblCommandPath: TLabel
AnchorSideTop.Control = edtCommand
@@ -462,7 +467,7 @@
Left = 28
Height = 23
Top = 2
- Width = 730
+ Width = 732
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 4
ItemHeight = 15
@@ -473,10 +478,10 @@
end
end
object nbConsole: TPageControl
- Left = 1
+ Left = 0
Height = 54
- Top = 1
- Width = 758
+ Top = 0
+ Width = 760
TabStop = False
ActivePage = pgConsole
Align = alTop
@@ -870,7 +883,7 @@
Top = 350
Width = 760
Align = alBottom
- BevelOuter = bvLowered
+ BevelOuter = bvNone
ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
ChildSizing.EnlargeVertical = crsHomogenousChildResize
ChildSizing.ShrinkHorizontal = crsHomogenousChildResize