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

Converter: Improve MissingUnits form layout. Issue #28676, patch from Alexey Torgashin.

Browse Source 
git-svn-id: trunk@49825 -
This commit is contained in:
juha 2015-09-14 14:30:28 +00:00
parent 300707437e
commit addea6e448
1 changed files with 50 additions and 47 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

97
converter/missingunits.lfm
View File

@ -5,31 +5,33 @@ object MissingUnitsDialog: TMissingUnitsDialog
Width = 732 Width = 732
HorzScrollBar.Page = 411 HorzScrollBar.Page = 411
VertScrollBar.Page = 342 VertScrollBar.Page = 342
BorderIcons = [biSystemMenu]
Caption = 'Units not Found' Caption = 'Units not Found'
ClientHeight = 261 ClientHeight = 261
ClientWidth = 732 ClientWidth = 732
Position = poScreenCenter Position = poScreenCenter
LCLVersion = '1.1' LCLVersion = '1.5'
object ButtonPanel: TPanel object ButtonPanel: TPanel
Left = 0 Left = 0
Height = 35 Height = 41
Top = 226 Top = 220
Width = 732 Width = 732
Align = alBottom Align = alBottom
AutoSize = True AutoSize = True
ClientHeight = 35 BevelOuter = bvNone
ClientHeight = 41
ClientWidth = 732 ClientWidth = 732
TabOrder = 0 TabOrder = 3
object CommentButton: TBitBtn object CommentButton: TBitBtn
AnchorSideLeft.Control = ButtonPanel AnchorSideLeft.Control = ButtonPanel
AnchorSideTop.Control = AbortButton AnchorSideTop.Control = AbortButton
AnchorSideTop.Side = asrCenter AnchorSideTop.Side = asrCenter
Left = 12 Left = 6
Height = 26 Height = 29
Top = 4 Top = 1
Width = 73 Width = 78
AutoSize = True AutoSize = True
BorderSpacing.Left = 11 BorderSpacing.Around = 6
Caption = 'Comment' Caption = 'Comment'
Default = True Default = True
ModalResult = 1 ModalResult = 1
@ -40,12 +42,12 @@ object MissingUnitsDialog: TMissingUnitsDialog
AnchorSideLeft.Side = asrBottom AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = CommentButton AnchorSideTop.Control = CommentButton
AnchorSideTop.Side = asrCenter AnchorSideTop.Side = asrCenter
Left = 96 Left = 90
Height = 26 Height = 29
Top = 4 Top = 1
Width = 58 Width = 57
AutoSize = True AutoSize = True
BorderSpacing.Left = 11 BorderSpacing.Around = 6
Caption = 'Search' Caption = 'Search'
ModalResult = 6 ModalResult = 6
TabOrder = 1 TabOrder = 1
@ -55,12 +57,12 @@ object MissingUnitsDialog: TMissingUnitsDialog
AnchorSideLeft.Side = asrBottom AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = SearchButton AnchorSideTop.Control = SearchButton
AnchorSideTop.Side = asrCenter AnchorSideTop.Side = asrCenter
Left = 165 Left = 153
Height = 26 Height = 29
Top = 4 Top = 1
Width = 40 Width = 41
AutoSize = True AutoSize = True
BorderSpacing.Left = 11 BorderSpacing.Around = 6
Caption = 'Skip' Caption = 'Skip'
ModalResult = 5 ModalResult = 5
TabOrder = 2 TabOrder = 2
@ -68,13 +70,13 @@ object MissingUnitsDialog: TMissingUnitsDialog
object AbortButton: TBitBtn object AbortButton: TBitBtn
AnchorSideRight.Control = ButtonPanel AnchorSideRight.Control = ButtonPanel
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
Left = 638 Left = 654
Height = 33 Height = 29
Top = 1 Top = 1
Width = 82 Width = 72
Anchors = [akTop, akRight] Anchors = [akTop, akRight]
AutoSize = True AutoSize = True
BorderSpacing.Right = 11 BorderSpacing.Around = 6
DefaultCaption = True DefaultCaption = True
Kind = bkAbort Kind = bkAbort
ModalResult = 3 ModalResult = 3
@ -82,50 +84,51 @@ object MissingUnitsDialog: TMissingUnitsDialog
end end
end end
object MissingUnitsGroupBox: TGroupBox object MissingUnitsGroupBox: TGroupBox
Left = 0 Left = 6
Height = 223 Height = 208
Top = 0 Top = 6
Width = 233 Width = 233
Align = alLeft Align = alLeft
BorderSpacing.Bottom = 3 BorderSpacing.Around = 6
Caption = 'Missing Units Info' Caption = 'Missing Units Info'
ClientHeight = 204 ClientHeight = 189
ClientWidth = 229 ClientWidth = 229
TabOrder = 1 TabOrder = 0
object MissingUnitsCheckListBox: TCheckListBox object MissingUnitsCheckListBox: TCheckListBox
Left = 0 Left = 0
Height = 204 Height = 189
Top = 0 Top = 0
Width = 229 Width = 229
Align = alClient Align = alClient
ItemHeight = 0 ItemHeight = 0
PopupMenu = PopupMenu1 PopupMenu = PopupMenu1
TabOrder = 0 TabOrder = 0
TopIndex = -1
end end
end end
object Splitter1: TSplitter object Splitter1: TSplitter
Left = 233 Left = 245
Height = 226 Height = 220
Top = 0 Top = 0
Width = 5 Width = 5
end end
object InfoPanel: TPanel object InfoPanel: TPanel
Left = 238 Left = 250
Height = 217 Height = 211
Top = 9 Top = 9
Width = 494 Width = 482
Align = alClient Align = alClient
BorderSpacing.Top = 9 BorderSpacing.Top = 9
BevelOuter = bvNone BevelOuter = bvNone
ClientHeight = 217 ClientHeight = 211
ClientWidth = 494 ClientWidth = 482
TabOrder = 3 TabOrder = 2
object ChoicesLabel: TLabel object ChoicesLabel: TLabel
AnchorSideLeft.Side = asrBottom AnchorSideLeft.Side = asrBottom
Left = 8 Left = 8
Height = 15 Height = 17
Top = 16 Top = 16
Width = 53 Width = 56
BorderSpacing.Left = 16 BorderSpacing.Left = 16
BorderSpacing.Top = 23 BorderSpacing.Top = 23
Caption = 'Choices:' Caption = 'Choices:'
@ -135,9 +138,9 @@ object MissingUnitsDialog: TMissingUnitsDialog
AnchorSideLeft.Control = ChoicesLabel AnchorSideLeft.Control = ChoicesLabel
AnchorSideTop.Control = ChoicesLabel AnchorSideTop.Control = ChoicesLabel
Left = 8 Left = 8
Height = 15 Height = 17
Top = 39 Top = 39
Width = 31 Width = 35
BorderSpacing.Top = 23 BorderSpacing.Top = 23
Caption = 'Info1' Caption = 'Info1'
ParentColor = False ParentColor = False
@ -146,9 +149,9 @@ object MissingUnitsDialog: TMissingUnitsDialog
AnchorSideLeft.Control = ChoicesLabel AnchorSideLeft.Control = ChoicesLabel
AnchorSideTop.Control = Info1Label AnchorSideTop.Control = Info1Label
Left = 8 Left = 8
Height = 15 Height = 17
Top = 62 Top = 62
Width = 31 Width = 35
BorderSpacing.Top = 23 BorderSpacing.Top = 23
Caption = 'Info2' Caption = 'Info2'
ParentColor = False ParentColor = False
@ -157,9 +160,9 @@ object MissingUnitsDialog: TMissingUnitsDialog
AnchorSideLeft.Control = ChoicesLabel AnchorSideLeft.Control = ChoicesLabel
AnchorSideTop.Control = Info2Label AnchorSideTop.Control = Info2Label
Left = 8 Left = 8
Height = 15 Height = 17
Top = 85 Top = 85
Width = 31 Width = 35
BorderSpacing.Top = 23 BorderSpacing.Top = 23
Caption = 'Info3' Caption = 'Info3'
ParentColor = False ParentColor = False