paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-15 21:39:12 +02:00
Code Issues Packages Projects Releases Wiki Activity

packager: fix problems with install packages dialog resize

Browse Source 
git-svn-id: trunk@27579 -
This commit is contained in:
paul 2010-10-05 07:18:35 +00:00
parent 0deb180d9e
commit c0f2b4f035
2 changed files with 71 additions and 49 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

119
packager/installpkgsetdlg.lfm
View File

@ -3,11 +3,12 @@ object InstallPkgSetDialog: TInstallPkgSetDialog
Height = 442 Height = 442
Top = 167 Top = 167
Width = 572 Width = 572
ActiveControl = InstallTreeView
BorderStyle = bsSizeToolWin BorderStyle = bsSizeToolWin
Caption = 'InstallPkgSetDialog' Caption = 'InstallPkgSetDialog'
ClientHeight = 442 ClientHeight = 442
ClientWidth = 572 ClientWidth = 572
Constraints.MinHeight = 400
Constraints.MinWidth = 450
OnCreate = InstallPkgSetDialogCreate OnCreate = InstallPkgSetDialogCreate
OnDestroy = InstallPkgSetDialogDestroy OnDestroy = InstallPkgSetDialogDestroy
OnResize = InstallPkgSetDialogResize OnResize = InstallPkgSetDialogResize
@ -17,22 +18,26 @@ object InstallPkgSetDialog: TInstallPkgSetDialog
AnchorSideLeft.Control = Owner AnchorSideLeft.Control = Owner
AnchorSideTop.Control = NoteLabel AnchorSideTop.Control = NoteLabel
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = lblMiddle
AnchorSideBottom.Control = PkgInfoGroupBox AnchorSideBottom.Control = PkgInfoGroupBox
Left = 6 Left = 6
Height = 267 Height = 277
Top = 30 Top = 28
Width = 255 Width = 277
Anchors = [akTop, akLeft, akBottom] Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Around = 6 BorderSpacing.Left = 6
BorderSpacing.Top = 6
BorderSpacing.Right = 3
BorderSpacing.Bottom = 6
Caption = 'InstallPkgGroupBox' Caption = 'InstallPkgGroupBox'
ClientHeight = 246 ClientHeight = 259
ClientWidth = 247 ClientWidth = 273
TabOrder = 0 TabOrder = 0
object ImportButton: TButton object ImportButton: TButton
Left = 6 Left = 6
Height = 25 Height = 25
Top = 184 Top = 197
Width = 235 Width = 261
Align = alBottom Align = alBottom
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'ImportButton' Caption = 'ImportButton'
@ -42,8 +47,8 @@ object InstallPkgSetDialog: TInstallPkgSetDialog
object ExportButton: TButton object ExportButton: TButton
Left = 6 Left = 6
Height = 25 Height = 25
Top = 215 Top = 228
Width = 235 Width = 261
Align = alBottom Align = alBottom
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'ExportButton' Caption = 'ExportButton'
@ -52,12 +57,12 @@ object InstallPkgSetDialog: TInstallPkgSetDialog
end end
object InstallTreeView: TTreeView object InstallTreeView: TTreeView
Left = 6 Left = 6
Height = 141 Height = 154
Top = 6 Top = 6
Width = 235 Width = 261
Align = alClient Align = alClient
BorderSpacing.Around = 6 BorderSpacing.Around = 6
DefaultItemHeight = 19 DefaultItemHeight = 17
ReadOnly = True ReadOnly = True
ShowButtons = False ShowButtons = False
ShowLines = False ShowLines = False
@ -70,8 +75,8 @@ object InstallPkgSetDialog: TInstallPkgSetDialog
object UninstallButton: TBitBtn object UninstallButton: TBitBtn
Left = 6 Left = 6
Height = 25 Height = 25
Top = 153 Top = 166
Width = 235 Width = 261
Align = alBottom Align = alBottom
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'UninstallButton' Caption = 'UninstallButton'
@ -80,29 +85,33 @@ object InstallPkgSetDialog: TInstallPkgSetDialog
end end
end end
object AvailablePkgGroupBox: TGroupBox object AvailablePkgGroupBox: TGroupBox
AnchorSideLeft.Control = lblMiddle
AnchorSideTop.Control = NoteLabel AnchorSideTop.Control = NoteLabel
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = PkgInfoGroupBox AnchorSideBottom.Control = PkgInfoGroupBox
Left = 267 Left = 289
Height = 267 Height = 277
Top = 30 Top = 28
Width = 299 Width = 277
Anchors = [akTop, akLeft, akRight, akBottom] Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Around = 6 BorderSpacing.Left = 3
BorderSpacing.Top = 6
BorderSpacing.Right = 6
BorderSpacing.Bottom = 6
Caption = 'AvailablePkgGroupBox' Caption = 'AvailablePkgGroupBox'
ClientHeight = 246 ClientHeight = 259
ClientWidth = 291 ClientWidth = 273
TabOrder = 1 TabOrder = 1
object AvailableTreeView: TTreeView object AvailableTreeView: TTreeView
Left = 6 Left = 6
Height = 203 Height = 216
Top = 6 Top = 6
Width = 279 Width = 261
Align = alClient Align = alClient
BorderSpacing.Around = 6 BorderSpacing.Around = 6
DefaultItemHeight = 19 DefaultItemHeight = 17
ReadOnly = True ReadOnly = True
ShowButtons = False ShowButtons = False
ShowLines = False ShowLines = False
@ -115,8 +124,8 @@ object InstallPkgSetDialog: TInstallPkgSetDialog
object AddToInstallButton: TBitBtn object AddToInstallButton: TBitBtn
Left = 6 Left = 6
Height = 25 Height = 25
Top = 215 Top = 228
Width = 279 Width = 261
Align = alBottom Align = alBottom
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'AddToInstallButton' Caption = 'AddToInstallButton'
@ -128,18 +137,18 @@ object InstallPkgSetDialog: TInstallPkgSetDialog
AnchorSideBottom.Control = HelpButton AnchorSideBottom.Control = HelpButton
Left = 0 Left = 0
Height = 93 Height = 93
Top = 303 Top = 311
Width = 572 Width = 572
Align = alBottom Align = alBottom
Caption = 'PkgInfoGroupBox' Caption = 'PkgInfoGroupBox'
ClientHeight = 72 ClientHeight = 75
ClientWidth = 564 ClientWidth = 568
TabOrder = 2 TabOrder = 2
object PkgInfoMemo: TMemo object PkgInfoMemo: TMemo
Left = 6 Left = 6
Height = 60 Height = 63
Top = 6 Top = 6
Width = 552 Width = 556
Align = alClient Align = alClient
BorderSpacing.Around = 6 BorderSpacing.Around = 6
ReadOnly = True ReadOnly = True
@ -149,20 +158,20 @@ object InstallPkgSetDialog: TInstallPkgSetDialog
end end
object BtnPanel: TPanel object BtnPanel: TPanel
Left = 0 Left = 0
Height = 46 Height = 38
Top = 396 Top = 404
Width = 572 Width = 572
Align = alBottom Align = alBottom
AutoSize = True AutoSize = True
BevelOuter = bvNone BevelOuter = bvNone
ClientHeight = 46 ClientHeight = 38
ClientWidth = 572 ClientWidth = 572
TabOrder = 3 TabOrder = 3
object HelpButton: TBitBtn object HelpButton: TBitBtn
Left = 6 Left = 6
Height = 34 Height = 26
Top = 6 Top = 6
Width = 85 Width = 75
Align = alLeft Align = alLeft
AutoSize = True AutoSize = True
BorderSpacing.Around = 6 BorderSpacing.Around = 6
@ -174,10 +183,10 @@ object InstallPkgSetDialog: TInstallPkgSetDialog
TabOrder = 0 TabOrder = 0
end end
object CancelButton: TBitBtn object CancelButton: TBitBtn
Left = 119 Left = 161
Height = 34 Height = 26
Top = 6 Top = 6
Width = 86 Width = 81
Align = alRight Align = alRight
AutoSize = True AutoSize = True
BorderSpacing.Around = 6 BorderSpacing.Around = 6
@ -190,10 +199,10 @@ object InstallPkgSetDialog: TInstallPkgSetDialog
TabOrder = 1 TabOrder = 1
end end
object SaveAndExitButton: TBitBtn object SaveAndExitButton: TBitBtn
Left = 403 Left = 421
Height = 34 Height = 26
Top = 6 Top = 6
Width = 163 Width = 145
Align = alRight Align = alRight
AutoSize = True AutoSize = True
BorderSpacing.Around = 6 BorderSpacing.Around = 6
@ -240,10 +249,10 @@ object InstallPkgSetDialog: TInstallPkgSetDialog
TabOrder = 2 TabOrder = 2
end end
object SaveAndRebuildButton: TBitBtn object SaveAndRebuildButton: TBitBtn
Left = 211 Left = 248
Height = 34 Height = 26
Top = 6 Top = 6
Width = 186 Width = 167
Align = alRight Align = alRight
AutoSize = True AutoSize = True
BorderSpacing.Around = 6 BorderSpacing.Around = 6
@ -292,7 +301,7 @@ object InstallPkgSetDialog: TInstallPkgSetDialog
end end
object NoteLabel: TLabel object NoteLabel: TLabel
Left = 6 Left = 6
Height = 18 Height = 16
Top = 6 Top = 6
Width = 560 Width = 560
Align = alTop Align = alTop
@ -300,4 +309,16 @@ object InstallPkgSetDialog: TInstallPkgSetDialog
Caption = 'NoteLabel' Caption = 'NoteLabel'
ParentColor = False ParentColor = False
end end
object lblMiddle: TLabel
AnchorSideLeft.Control = Owner
AnchorSideLeft.Side = asrCenter
AnchorSideTop.Control = Owner
AnchorSideTop.Side = asrCenter
Left = 286
Height = 1
Top = 221
Width = 1
AutoSize = False
ParentColor = False
end
end end

1
packager/installpkgsetdlg.pas
View File

@ -59,6 +59,7 @@ type
ExportButton: TButton; ExportButton: TButton;
BtnPanel: TPanel; BtnPanel: TPanel;
InstallTreeView: TTreeView; InstallTreeView: TTreeView;
lblMiddle: TLabel;
NoteLabel: TLabel; NoteLabel: TLabel;
PkgInfoMemo: TMemo; PkgInfoMemo: TMemo;
PkgInfoGroupBox: TGroupBox; PkgInfoGroupBox: TGroupBox;