mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-05-31 03:12:32 +02:00
6a8a7c4059
- set BorderStyle to bsDialog - use TButtonPanel instead of Ok+Cancel buttons to get correct button order + other behavior on different platform git-svn-id: trunk@29273 -
58 lines
1.3 KiB
Plaintext
58 lines
1.3 KiB
Plaintext
object TemplateSettingsForm: TTemplateSettingsForm
|
|
Left = 470
|
|
Height = 127
|
|
Top = 175
|
|
Width = 400
|
|
HorzScrollBar.Page = 399
|
|
VertScrollBar.Page = 126
|
|
BorderStyle = bsDialog
|
|
Caption = 'Project templates settings'
|
|
ClientHeight = 127
|
|
ClientWidth = 400
|
|
OnCreate = FormCreate
|
|
Position = poScreenCenter
|
|
LCLVersion = '0.9.31'
|
|
object Label1: TLabel
|
|
Left = 8
|
|
Height = 24
|
|
Top = 16
|
|
Width = 160
|
|
AutoSize = False
|
|
Caption = '&Directory with templates:'
|
|
FocusControl = DETemplates
|
|
Layout = tlCenter
|
|
ParentColor = False
|
|
end
|
|
object DETemplates: TDirectoryEdit
|
|
Left = 8
|
|
Height = 23
|
|
Top = 41
|
|
Width = 360
|
|
ShowHidden = False
|
|
ButtonWidth = 23
|
|
NumGlyphs = 1
|
|
MaxLength = 0
|
|
TabOrder = 0
|
|
end
|
|
object ButtonPanel1: TButtonPanel
|
|
Left = 6
|
|
Height = 34
|
|
Top = 87
|
|
Width = 388
|
|
OKButton.Name = 'OKButton'
|
|
OKButton.Caption = '&OK'
|
|
OKButton.OnClick = OKButtonClick
|
|
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
|
|
ShowButtons = [pbOK, pbCancel]
|
|
ShowBevel = False
|
|
end
|
|
end
|