mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-30 16:10:19 +02:00
IDE, Add/Rename build profile dialog: made OK button default and slightly improved layout
git-svn-id: trunk@28279 -
This commit is contained in:
parent
aa8b8c8e39
commit
915695edf1
@ -28,6 +28,7 @@ object AddProfileForm: TAddProfileForm
|
|||||||
end
|
end
|
||||||
object ProfileHeaderLabel: TLabel
|
object ProfileHeaderLabel: TLabel
|
||||||
AnchorSideLeft.Control = NameEdit
|
AnchorSideLeft.Control = NameEdit
|
||||||
|
AnchorSideRight.Side = asrBottom
|
||||||
AnchorSideBottom.Control = NameEdit
|
AnchorSideBottom.Control = NameEdit
|
||||||
Left = 12
|
Left = 12
|
||||||
Height = 14
|
Height = 14
|
||||||
@ -35,6 +36,7 @@ object AddProfileForm: TAddProfileForm
|
|||||||
Width = 64
|
Width = 64
|
||||||
Anchors = [akLeft, akBottom]
|
Anchors = [akLeft, akBottom]
|
||||||
BorderSpacing.Top = 6
|
BorderSpacing.Top = 6
|
||||||
|
BorderSpacing.Right = 12
|
||||||
BorderSpacing.Bottom = 6
|
BorderSpacing.Bottom = 6
|
||||||
Caption = 'Profile name:'
|
Caption = 'Profile name:'
|
||||||
ParentColor = False
|
ParentColor = False
|
||||||
@ -55,7 +57,6 @@ object AddProfileForm: TAddProfileForm
|
|||||||
CancelButton.Name = 'CancelButton'
|
CancelButton.Name = 'CancelButton'
|
||||||
CancelButton.Caption = 'Отмена'
|
CancelButton.Caption = 'Отмена'
|
||||||
TabOrder = 1
|
TabOrder = 1
|
||||||
DefaultButton = pbCancel
|
|
||||||
ShowButtons = [pbOK, pbCancel]
|
ShowButtons = [pbOK, pbCancel]
|
||||||
ShowBevel = False
|
ShowBevel = False
|
||||||
end
|
end
|
||||||
|
Loading…
Reference in New Issue
Block a user