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

IDE: pkgoptionsdlg, changed TNoteBook to TPageControl.

Browse Source 
git-svn-id: trunk@27359 -
This commit is contained in:
zeljko 2010-09-14 06:30:09 +00:00
parent 60b9345550
commit 0b45037bab
2 changed files with 145 additions and 148 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

275
packager/pkgoptionsdlg.lfm
View File

@ -11,40 +11,40 @@ object PackageOptionsDialog: TPackageOptionsDialog
Constraints.MinWidth = 520 Constraints.MinWidth = 520
OnClose = PackageOptionsDialogClose OnClose = PackageOptionsDialogClose
OnCreate = FormCreate OnCreate = FormCreate
LCLVersion = '0.9.27' LCLVersion = '0.9.29'
object Notebook: TNotebook object Notebook: TPageControl
Left = 0 Left = 0
Height = 402 Height = 412
Top = 0 Top = 0
Width = 528 Width = 528
ActivePage = DescriptionPage
Align = alClient Align = alClient
PageIndex = 2 TabIndex = 2
TabOrder = 0 TabOrder = 0
object UsagePage: TPage object UsagePage: TTabSheet
Caption = 'Usage' Caption = 'Usage'
ClientWidth = 526 ClientHeight = 387
ClientHeight = 375 ClientWidth = 524
object AddPathsGroupBox: TGroupBox object AddPathsGroupBox: TGroupBox
AnchorSideRight.Side = asrBottom
Left = 6 Left = 6
Height = 142 Height = 133
Top = 6 Top = 6
Width = 514 Width = 512
Align = alTop Align = alTop
AutoSize = True AutoSize = True
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'Add paths to dependent packages/projects' Caption = 'Add paths to dependent packages/projects'
ClientHeight = 123 ClientHeight = 114
ClientWidth = 510 ClientWidth = 508
TabOrder = 0 TabOrder = 0
object UnitPathLabel: TLabel object UnitPathLabel: TLabel
AnchorSideLeft.Control = AddPathsGroupBox AnchorSideLeft.Control = AddPathsGroupBox
AnchorSideTop.Control = UnitPathEdit AnchorSideTop.Control = UnitPathEdit
AnchorSideTop.Side = asrCenter AnchorSideTop.Side = asrCenter
Left = 6 Left = 6
Height = 18 Height = 16
Top = 10 Top = 8
Width = 27 Width = 26
BorderSpacing.Left = 6 BorderSpacing.Left = 6
Caption = 'Unit' Caption = 'Unit'
ParentColor = False ParentColor = False
@ -53,8 +53,8 @@ object PackageOptionsDialog: TPackageOptionsDialog
AnchorSideLeft.Control = AddPathsGroupBox AnchorSideLeft.Control = AddPathsGroupBox
AnchorSideTop.Control = IncludePathEdit AnchorSideTop.Control = IncludePathEdit
Left = 6 Left = 6
Height = 18 Height = 16
Top = 39 Top = 33
Width = 46 Width = 46
BorderSpacing.Left = 6 BorderSpacing.Left = 6
Caption = 'Include' Caption = 'Include'
@ -65,9 +65,9 @@ object PackageOptionsDialog: TPackageOptionsDialog
AnchorSideTop.Control = ObjectPathEdit AnchorSideTop.Control = ObjectPathEdit
AnchorSideTop.Side = asrCenter AnchorSideTop.Side = asrCenter
Left = 6 Left = 6
Height = 18 Height = 16
Top = 76 Top = 62
Width = 42 Width = 40
BorderSpacing.Left = 6 BorderSpacing.Left = 6
Caption = 'Object' Caption = 'Object'
ParentColor = False ParentColor = False
@ -77,9 +77,9 @@ object PackageOptionsDialog: TPackageOptionsDialog
AnchorSideTop.Control = LibraryPathEdit AnchorSideTop.Control = LibraryPathEdit
AnchorSideTop.Side = asrCenter AnchorSideTop.Side = asrCenter
Left = 6 Left = 6
Height = 18 Height = 16
Top = 109 Top = 89
Width = 44 Width = 43
BorderSpacing.Left = 6 BorderSpacing.Left = 6
Caption = 'Library' Caption = 'Library'
ParentColor = False ParentColor = False
@ -90,9 +90,9 @@ object PackageOptionsDialog: TPackageOptionsDialog
AnchorSideRight.Control = AddPathsGroupBox AnchorSideRight.Control = AddPathsGroupBox
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
Left = 80 Left = 80
Height = 27 Height = 21
Top = 6 Top = 6
Width = 380 Width = 378
Anchors = [akTop, akLeft, akRight] Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 6 BorderSpacing.Top = 6
BorderSpacing.Right = 50 BorderSpacing.Right = 50
@ -105,9 +105,9 @@ object PackageOptionsDialog: TPackageOptionsDialog
AnchorSideRight.Control = AddPathsGroupBox AnchorSideRight.Control = AddPathsGroupBox
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
Left = 80 Left = 80
Height = 27 Height = 21
Top = 39 Top = 33
Width = 380 Width = 378
Anchors = [akTop, akLeft, akRight] Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 6 BorderSpacing.Top = 6
BorderSpacing.Right = 50 BorderSpacing.Right = 50
@ -120,9 +120,9 @@ object PackageOptionsDialog: TPackageOptionsDialog
AnchorSideRight.Control = AddPathsGroupBox AnchorSideRight.Control = AddPathsGroupBox
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
Left = 80 Left = 80
Height = 27 Height = 21
Top = 72 Top = 60
Width = 380 Width = 378
Anchors = [akTop, akLeft, akRight] Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 6 BorderSpacing.Top = 6
BorderSpacing.Right = 50 BorderSpacing.Right = 50
@ -135,9 +135,9 @@ object PackageOptionsDialog: TPackageOptionsDialog
AnchorSideRight.Control = AddPathsGroupBox AnchorSideRight.Control = AddPathsGroupBox
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
Left = 80 Left = 80
Height = 27 Height = 21
Top = 105 Top = 87
Width = 380 Width = 378
Anchors = [akTop, akLeft, akRight] Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 80 BorderSpacing.Left = 80
BorderSpacing.Top = 6 BorderSpacing.Top = 6
@ -147,26 +147,23 @@ object PackageOptionsDialog: TPackageOptionsDialog
end end
end end
object AddOptionsGroupBox: TGroupBox object AddOptionsGroupBox: TGroupBox
AnchorSideTop.Side = asrBottom
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Side = asrBottom
Left = 6 Left = 6
Height = 171 Height = 179
Top = 154 Top = 145
Width = 514 Width = 512
Align = alClient Align = alClient
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'Add options to dependent packages and projects' Caption = 'Add options to dependent packages and projects'
ClientHeight = 152 ClientHeight = 160
ClientWidth = 510 ClientWidth = 508
TabOrder = 1 TabOrder = 1
object LinkerOptionsLabel: TLabel object LinkerOptionsLabel: TLabel
AnchorSideLeft.Control = AddOptionsGroupBox AnchorSideLeft.Control = AddOptionsGroupBox
AnchorSideTop.Control = LinkerOptionsMemo AnchorSideTop.Control = LinkerOptionsMemo
Left = 6 Left = 6
Height = 18 Height = 16
Top = 6 Top = 6
Width = 39 Width = 38
BorderSpacing.Left = 6 BorderSpacing.Left = 6
Caption = 'Linker' Caption = 'Linker'
ParentColor = False ParentColor = False
@ -175,9 +172,9 @@ object PackageOptionsDialog: TPackageOptionsDialog
AnchorSideLeft.Control = AddOptionsGroupBox AnchorSideLeft.Control = AddOptionsGroupBox
AnchorSideTop.Control = CustomOptionsMemo AnchorSideTop.Control = CustomOptionsMemo
Left = 6 Left = 6
Height = 18 Height = 16
Top = 74 Top = 74
Width = 51 Width = 47
BorderSpacing.Left = 6 BorderSpacing.Left = 6
Caption = 'Custom' Caption = 'Custom'
ParentColor = False ParentColor = False
@ -187,10 +184,10 @@ object PackageOptionsDialog: TPackageOptionsDialog
AnchorSideTop.Control = AddOptionsGroupBox AnchorSideTop.Control = AddOptionsGroupBox
AnchorSideRight.Control = AddOptionsGroupBox AnchorSideRight.Control = AddOptionsGroupBox
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
Left = 67 Left = 63
Height = 62 Height = 62
Top = 6 Top = 6
Width = 437 Width = 439
Anchors = [akTop, akLeft, akRight] Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 6 BorderSpacing.Top = 6
BorderSpacing.Right = 6 BorderSpacing.Right = 6
@ -206,10 +203,10 @@ object PackageOptionsDialog: TPackageOptionsDialog
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = AddOptionsGroupBox AnchorSideBottom.Control = AddOptionsGroupBox
AnchorSideBottom.Side = asrBottom AnchorSideBottom.Side = asrBottom
Left = 67 Left = 63
Height = 72 Height = 80
Top = 74 Top = 74
Width = 437 Width = 439
Anchors = [akTop, akLeft, akRight, akBottom] Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Left = 10 BorderSpacing.Left = 10
BorderSpacing.Top = 6 BorderSpacing.Top = 6
@ -221,21 +218,21 @@ object PackageOptionsDialog: TPackageOptionsDialog
end end
object ProjectGroupBox: TGroupBox object ProjectGroupBox: TGroupBox
Left = 6 Left = 6
Height = 38 Height = 51
Top = 331 Top = 330
Width = 514 Width = 512
Align = alBottom Align = alBottom
AutoSize = True AutoSize = True
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'ProjectGroupBox' Caption = 'ProjectGroupBox'
ClientHeight = 19 ClientHeight = 32
ClientWidth = 510 ClientWidth = 508
TabOrder = 2 TabOrder = 2
object AddPackageUnitToProjectCheckBox: TCheckBox object AddPackageUnitToProjectCheckBox: TCheckBox
Left = 6 Left = 6
Height = 22 Height = 20
Top = 6 Top = 6
Width = 498 Width = 496
Align = alTop Align = alTop
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'AddPackageUnitToProjectCheckBox' Caption = 'AddPackageUnitToProjectCheckBox'
@ -243,10 +240,10 @@ object PackageOptionsDialog: TPackageOptionsDialog
end end
end end
end end
object Usage2Page: TPage object Usage2Page: TTabSheet
Caption = 'Usage2' Caption = 'Usage2'
ClientWidth = 526
ClientHeight = 375 ClientHeight = 375
ClientWidth = 526
object ConditionalsGroupBox: TGroupBox object ConditionalsGroupBox: TGroupBox
Left = 0 Left = 0
Height = 199 Height = 199
@ -257,10 +254,10 @@ object PackageOptionsDialog: TPackageOptionsDialog
TabOrder = 0 TabOrder = 0
end end
end end
object DescriptionPage: TPage object DescriptionPage: TTabSheet
Caption = 'Description' Caption = 'Description'
ClientWidth = 526 ClientHeight = 387
ClientHeight = 375 ClientWidth = 524
object DescriptionGroupBox: TGroupBox object DescriptionGroupBox: TGroupBox
AnchorSideLeft.Control = DescriptionPage AnchorSideLeft.Control = DescriptionPage
AnchorSideTop.Control = DescriptionPage AnchorSideTop.Control = DescriptionPage
@ -269,24 +266,22 @@ object PackageOptionsDialog: TPackageOptionsDialog
Left = 6 Left = 6
Height = 96 Height = 96
Top = 6 Top = 6
Width = 514 Width = 512
Anchors = [akTop, akLeft, akRight] Anchors = [akTop, akLeft, akRight]
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'Description/Abstract' Caption = 'Description/Abstract'
ClientHeight = 92 ClientHeight = 77
ClientWidth = 510 ClientWidth = 508
TabOrder = 0 TabOrder = 0
object DescriptionMemo: TMemo object DescriptionMemo: TMemo
AnchorSideLeft.Control = DescriptionGroupBox AnchorSideLeft.Control = DescriptionGroupBox
AnchorSideTop.Control = DescriptionGroupBox AnchorSideTop.Control = DescriptionGroupBox
AnchorSideRight.Control = DescriptionGroupBox AnchorSideRight.Control = DescriptionGroupBox
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = DescriptionGroupBox AnchorSideBottom.Control = DescriptionGroupBox
AnchorSideBottom.Side = asrBottom
Left = 6 Left = 6
Height = 80 Height = 65
Top = 6 Top = 6
Width = 498 Width = 496
Align = alClient Align = alClient
BorderSpacing.Around = 6 BorderSpacing.Around = 6
ScrollBars = ssAutoBoth ScrollBars = ssAutoBoth
@ -301,24 +296,23 @@ object PackageOptionsDialog: TPackageOptionsDialog
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
AnchorSideBottom.Side = asrBottom AnchorSideBottom.Side = asrBottom
Left = 6 Left = 6
Height = 58 Height = 52
Top = 108 Top = 108
Width = 514 Width = 512
Anchors = [akTop, akLeft, akRight] Anchors = [akTop, akLeft, akRight]
AutoSize = True AutoSize = True
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'Author:' Caption = 'Author:'
ClientHeight = 39 ClientHeight = 33
ClientWidth = 510 ClientWidth = 508
TabOrder = 1 TabOrder = 1
object AuthorEdit: TEdit object AuthorEdit: TEdit
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = AuthorGroupBox AnchorSideBottom.Control = AuthorGroupBox
AnchorSideBottom.Side = asrBottom AnchorSideBottom.Side = asrBottom
Left = 6 Left = 6
Height = 27 Height = 21
Top = 6 Top = 6
Width = 498 Width = 496
Align = alTop Align = alTop
BorderSpacing.Around = 6 BorderSpacing.Around = 6
TabOrder = 0 TabOrder = 0
@ -332,26 +326,24 @@ object PackageOptionsDialog: TPackageOptionsDialog
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = VersionGroupBox AnchorSideBottom.Control = VersionGroupBox
Left = 6 Left = 6
Height = 91 Height = 109
Top = 172 Top = 166
Width = 514 Width = 512
Anchors = [akTop, akLeft, akRight, akBottom] Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'License:' Caption = 'License:'
ClientHeight = 72 ClientHeight = 90
ClientWidth = 510 ClientWidth = 508
TabOrder = 2 TabOrder = 2
object LicenseMemo: TMemo object LicenseMemo: TMemo
AnchorSideLeft.Control = LicenseGroupBox AnchorSideLeft.Control = LicenseGroupBox
AnchorSideTop.Control = LicenseGroupBox AnchorSideTop.Control = LicenseGroupBox
AnchorSideRight.Control = LicenseGroupBox AnchorSideRight.Control = LicenseGroupBox
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = LicenseGroupBox AnchorSideBottom.Control = LicenseGroupBox
AnchorSideBottom.Side = asrBottom
Left = 6 Left = 6
Height = 60 Height = 78
Top = 6 Top = 6
Width = 498 Width = 496
Align = alClient Align = alClient
BorderSpacing.Around = 6 BorderSpacing.Around = 6
ScrollBars = ssAutoBoth ScrollBars = ssAutoBoth
@ -363,55 +355,53 @@ object PackageOptionsDialog: TPackageOptionsDialog
AnchorSideTop.Control = LicenseGroupBox AnchorSideTop.Control = LicenseGroupBox
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = DescriptionPage AnchorSideRight.Control = DescriptionPage
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = DescriptionPage AnchorSideBottom.Control = DescriptionPage
AnchorSideBottom.Side = asrBottom
Left = 6 Left = 6
Height = 100 Height = 100
Top = 269 Top = 281
Width = 514 Width = 512
Align = alBottom Align = alBottom
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'Version' Caption = 'Version'
ClientHeight = 81 ClientHeight = 81
ClientWidth = 510 ClientWidth = 508
TabOrder = 3 TabOrder = 3
object VersionMajorLabel: TLabel object VersionMajorLabel: TLabel
Left = 6 Left = 6
Height = 18 Height = 16
Top = 3 Top = 3
Width = 36 Width = 33
Caption = 'Major' Caption = 'Major'
ParentColor = False ParentColor = False
end end
object VersionMinorLabel: TLabel object VersionMinorLabel: TLabel
Left = 110 Left = 110
Height = 18 Height = 16
Top = 3 Top = 3
Width = 36 Width = 34
Caption = 'Minor' Caption = 'Minor'
ParentColor = False ParentColor = False
end end
object VersionReleaseLabel: TLabel object VersionReleaseLabel: TLabel
Left = 214 Left = 214
Height = 18 Height = 16
Top = 3 Top = 3
Width = 50 Width = 45
Caption = 'Release' Caption = 'Release'
ParentColor = False ParentColor = False
end end
object VersionBuildLabel: TLabel object VersionBuildLabel: TLabel
Left = 318 Left = 318
Height = 18 Height = 16
Top = 3 Top = 3
Width = 88 Width = 84
Caption = 'Build Number' Caption = 'Build Number'
ParentColor = False ParentColor = False
end end
object VersionMajorSpinEdit: TSpinEdit object VersionMajorSpinEdit: TSpinEdit
AnchorSideLeft.Control = VersionGroupBox AnchorSideLeft.Control = VersionGroupBox
Left = 6 Left = 6
Height = 27 Height = 21
Top = 20 Top = 20
Width = 68 Width = 68
BorderSpacing.Left = 6 BorderSpacing.Left = 6
@ -420,7 +410,7 @@ object PackageOptionsDialog: TPackageOptionsDialog
end end
object VersionMinorSpinEdit: TSpinEdit object VersionMinorSpinEdit: TSpinEdit
Left = 110 Left = 110
Height = 27 Height = 21
Top = 20 Top = 20
Width = 68 Width = 68
MaxValue = 9999 MaxValue = 9999
@ -428,7 +418,7 @@ object PackageOptionsDialog: TPackageOptionsDialog
end end
object VersionReleaseSpinEdit: TSpinEdit object VersionReleaseSpinEdit: TSpinEdit
Left = 214 Left = 214
Height = 27 Height = 21
Top = 20 Top = 20
Width = 68 Width = 68
MaxValue = 9999 MaxValue = 9999
@ -436,7 +426,7 @@ object PackageOptionsDialog: TPackageOptionsDialog
end end
object VersionBuildSpinEdit: TSpinEdit object VersionBuildSpinEdit: TSpinEdit
Left = 318 Left = 318
Height = 27 Height = 21
Top = 20 Top = 20
Width = 68 Width = 68
MaxValue = 9999 MaxValue = 9999
@ -444,10 +434,10 @@ object PackageOptionsDialog: TPackageOptionsDialog
end end
end end
end end
object IDEPage: TPage object IDEPage: TTabSheet
Caption = 'IDE Integration' Caption = 'IDE Integration'
ClientWidth = 526
ClientHeight = 375 ClientHeight = 375
ClientWidth = 526
object PkgTypeRadioGroup: TRadioGroup object PkgTypeRadioGroup: TRadioGroup
AnchorSideLeft.Control = IDEPage AnchorSideLeft.Control = IDEPage
AnchorSideTop.Control = IDEPage AnchorSideTop.Control = IDEPage
@ -469,8 +459,8 @@ object PackageOptionsDialog: TPackageOptionsDialog
ChildSizing.ShrinkVertical = crsScaleChilds ChildSizing.ShrinkVertical = crsScaleChilds
ChildSizing.Layout = cclLeftToRightThenTopToBottom ChildSizing.Layout = cclLeftToRightThenTopToBottom
ChildSizing.ControlsPerLine = 1 ChildSizing.ControlsPerLine = 1
ClientHeight = 112 ClientHeight = 116
ClientWidth = 510 ClientWidth = 514
ItemIndex = 2 ItemIndex = 2
Items.Strings = ( Items.Strings = (
'Designtime only' 'Designtime only'
@ -502,8 +492,8 @@ object PackageOptionsDialog: TPackageOptionsDialog
ChildSizing.ShrinkVertical = crsScaleChilds ChildSizing.ShrinkVertical = crsScaleChilds
ChildSizing.Layout = cclLeftToRightThenTopToBottom ChildSizing.Layout = cclLeftToRightThenTopToBottom
ChildSizing.ControlsPerLine = 1 ChildSizing.ControlsPerLine = 1
ClientHeight = 112 ClientHeight = 116
ClientWidth = 510 ClientWidth = 514
ItemIndex = 0 ItemIndex = 0
Items.Strings = ( Items.Strings = (
'Automatically rebuild as needed' 'Automatically rebuild as needed'
@ -526,8 +516,8 @@ object PackageOptionsDialog: TPackageOptionsDialog
AutoSize = True AutoSize = True
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'LazDoc - Lazarus documentation' Caption = 'LazDoc - Lazarus documentation'
ClientHeight = 54 ClientHeight = 58
ClientWidth = 510 ClientWidth = 514
TabOrder = 2 TabOrder = 2
object LazDocPathEdit: TEdit object LazDocPathEdit: TEdit
AnchorSideLeft.Control = LazDocGroupBox AnchorSideLeft.Control = LazDocGroupBox
@ -542,17 +532,15 @@ object PackageOptionsDialog: TPackageOptionsDialog
end end
end end
end end
object ProvidesPage: TPage object ProvidesPage: TTabSheet
Caption = 'Provides' Caption = 'Provides'
ClientWidth = 526
ClientHeight = 375 ClientHeight = 375
ClientWidth = 526
object ProvidesGroupBox: TGroupBox object ProvidesGroupBox: TGroupBox
AnchorSideLeft.Control = ProvidesPage AnchorSideLeft.Control = ProvidesPage
AnchorSideTop.Control = ProvidesPage AnchorSideTop.Control = ProvidesPage
AnchorSideRight.Control = ProvidesPage AnchorSideRight.Control = ProvidesPage
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = ProvidesPage AnchorSideBottom.Control = ProvidesPage
AnchorSideBottom.Side = asrBottom
Left = 6 Left = 6
Height = 363 Height = 363
Top = 6 Top = 6
@ -561,15 +549,14 @@ object PackageOptionsDialog: TPackageOptionsDialog
Anchors = [akTop, akLeft, akRight, akBottom] Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'This package provides the same as the following packages:' Caption = 'This package provides the same as the following packages:'
ClientHeight = 359 ClientHeight = 363
ClientWidth = 510 ClientWidth = 514
TabOrder = 0 TabOrder = 0
object ProvidesMemo: TMemo object ProvidesMemo: TMemo
AnchorSideLeft.Control = ProvidesGroupBox AnchorSideLeft.Control = ProvidesGroupBox
AnchorSideTop.Control = ProvidesGroupBox AnchorSideTop.Control = ProvidesGroupBox
AnchorSideRight.Control = ProvidesGroupBox AnchorSideRight.Control = ProvidesGroupBox
AnchorSideBottom.Control = ProvidesGroupBox AnchorSideBottom.Control = ProvidesGroupBox
AnchorSideBottom.Side = asrBottom
Left = 6 Left = 6
Height = 347 Height = 347
Top = 6 Top = 6
@ -581,10 +568,10 @@ object PackageOptionsDialog: TPackageOptionsDialog
end end
end end
end end
object i18n: TPage object i18n: TTabSheet
Caption = 'i18n' Caption = 'i18n'
ClientWidth = 526 ClientHeight = 387
ClientHeight = 375 ClientWidth = 524
object I18NGroupBox: TGroupBox object I18NGroupBox: TGroupBox
AnchorSideLeft.Control = i18n AnchorSideLeft.Control = i18n
AnchorSideTop.Control = EnableI18NCheckBox AnchorSideTop.Control = EnableI18NCheckBox
@ -592,23 +579,23 @@ object PackageOptionsDialog: TPackageOptionsDialog
AnchorSideRight.Control = i18n AnchorSideRight.Control = i18n
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
Left = 6 Left = 6
Height = 84 Height = 74
Top = 35 Top = 33
Width = 514 Width = 512
Anchors = [akTop, akLeft, akRight] Anchors = [akTop, akLeft, akRight]
AutoSize = True AutoSize = True
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'i18n Options' Caption = 'i18n Options'
ClientHeight = 80 ClientHeight = 55
ClientWidth = 510 ClientWidth = 508
TabOrder = 0 TabOrder = 0
object PoOutDirLabel: TLabel object PoOutDirLabel: TLabel
AnchorSideLeft.Control = I18NGroupBox AnchorSideLeft.Control = I18NGroupBox
AnchorSideTop.Control = I18NGroupBox AnchorSideTop.Control = I18NGroupBox
Left = 6 Left = 6
Height = 18 Height = 16
Top = 6 Top = 6
Width = 132 Width = 126
BorderSpacing.Around = 6 BorderSpacing.Around = 6
Caption = 'PO Output Directory:' Caption = 'PO Output Directory:'
ParentColor = False ParentColor = False
@ -619,9 +606,9 @@ object PackageOptionsDialog: TPackageOptionsDialog
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = POOutDirButton AnchorSideRight.Control = POOutDirButton
Left = 6 Left = 6
Height = 27 Height = 21
Top = 30 Top = 28
Width = 468 Width = 415
Anchors = [akTop, akLeft, akRight] Anchors = [akTop, akLeft, akRight]
BorderSpacing.Around = 6 BorderSpacing.Around = 6
TabOrder = 0 TabOrder = 0
@ -632,10 +619,10 @@ object PackageOptionsDialog: TPackageOptionsDialog
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = POOutDirEdit AnchorSideBottom.Control = POOutDirEdit
AnchorSideBottom.Side = asrBottom AnchorSideBottom.Side = asrBottom
Left = 480 Left = 427
Height = 27 Height = 21
Top = 30 Top = 28
Width = 24 Width = 75
Anchors = [akTop, akRight, akBottom] Anchors = [akTop, akRight, akBottom]
AutoSize = True AutoSize = True
BorderSpacing.Right = 6 BorderSpacing.Right = 6
@ -646,9 +633,9 @@ object PackageOptionsDialog: TPackageOptionsDialog
end end
object EnableI18NCheckBox: TCheckBox object EnableI18NCheckBox: TCheckBox
Left = 6 Left = 6
Height = 22 Height = 20
Top = 7 Top = 7
Width = 98 Width = 96
Caption = 'Enable i18n' Caption = 'Enable i18n'
OnChange = EnableI18NCheckBoxChange OnChange = EnableI18NCheckBoxChange
TabOrder = 1 TabOrder = 1
@ -657,9 +644,19 @@ object PackageOptionsDialog: TPackageOptionsDialog
end end
object ButtonPanel1: TButtonPanel object ButtonPanel1: TButtonPanel
Left = 6 Left = 6
Height = 36 Height = 26
Top = 408 Top = 418
Width = 516 Width = 516
OKButton.Name = 'OKButton'
OKButton.Caption = '&OK'
HelpButton.Name = 'HelpButton'
HelpButton.Caption = '&Help'
HelpButton.Enabled = False
CloseButton.Name = 'CloseButton'
CloseButton.Caption = '&Close'
CloseButton.Enabled = False
CancelButton.Name = 'CancelButton'
CancelButton.Caption = 'Cancel'
TabOrder = 1 TabOrder = 1
ShowButtons = [pbOK, pbCancel] ShowButtons = [pbOK, pbCancel]
ShowBevel = False ShowBevel = False

18
packager/pkgoptionsdlg.pas
View File

@ -39,8 +39,8 @@ interface
uses uses
Classes, SysUtils, FileUtil, LCLProc, Forms, Controls, Buttons, Classes, SysUtils, FileUtil, LCLProc, Forms, Controls, Buttons,
ExtCtrls, StdCtrls, Spin, Dialogs, PathEditorDlg, IDEProcs, IDEWindowIntf, ExtCtrls, ComCtrls, StdCtrls, Spin, Dialogs, PathEditorDlg,
IDEDialogs, MacroIntf, PackageIntf, IDEProcs, IDEWindowIntf, IDEDialogs, MacroIntf, PackageIntf,
LazarusIDEStrConsts, LazarusIDEStrConsts,
BrokenDependenciesDlg, PackageDefs, PackageSystem, CompilerOptions, BrokenDependenciesDlg, PackageDefs, PackageSystem, CompilerOptions,
ButtonPanel; ButtonPanel;
@ -55,13 +55,13 @@ type
ButtonPanel1: TButtonPanel; ButtonPanel1: TButtonPanel;
EnableI18NCheckBox: TCheckBox; EnableI18NCheckBox: TCheckBox;
ConditionalsGroupBox: TGroupBox; ConditionalsGroupBox: TGroupBox;
Usage2Page: TPage; Usage2Page: TTabSheet;
ProjectGroupBox: TGroupBox; ProjectGroupBox: TGroupBox;
I18NGroupBox: TGroupBox; I18NGroupBox: TGroupBox;
ProvidesGroupBox: TGroupBox; ProvidesGroupBox: TGroupBox;
LazDocGroupBox: TGroupBox; LazDocGroupBox: TGroupBox;
ProvidesMemo: TMemo; ProvidesMemo: TMemo;
i18n: TPage; i18n: TTabSheet;
POOutDirButton: TButton; POOutDirButton: TButton;
POOutDirEdit: TEdit; POOutDirEdit: TEdit;
PkgTypeRadioGroup: TRadioGroup; PkgTypeRadioGroup: TRadioGroup;
@ -93,16 +93,16 @@ type
AddOptionsGroupBox: TGroupBox; AddOptionsGroupBox: TGroupBox;
AuthorEdit: TEdit; AuthorEdit: TEdit;
UnitPathLabel: TLabel; UnitPathLabel: TLabel;
Notebook: TNotebook; Notebook: TPageControl;
UnitPathEdit: TEdit; UnitPathEdit: TEdit;
PoOutDirLabel: TLabel; PoOutDirLabel: TLabel;
IncludePathLabel: TLabel; IncludePathLabel: TLabel;
ObjectPathLabel: TLabel; ObjectPathLabel: TLabel;
LibraryPathLabel: TLabel; LibraryPathLabel: TLabel;
UsagePage: TPage; UsagePage: TTabSheet;
DescriptionPage: TPage; DescriptionPage: TTabSheet;
IDEPage: TPage; IDEPage: TTabSheet;
ProvidesPage: TPage; ProvidesPage: TTabSheet;
VersionBuildLabel: TLabel; VersionBuildLabel: TLabel;
VersionMinorSpinEdit: TSpinEdit; VersionMinorSpinEdit: TSpinEdit;
VersionBuildSpinEdit: TSpinEdit; VersionBuildSpinEdit: TSpinEdit;