156 lines
3.5 KiB
ObjectPascal
156 lines
3.5 KiB
ObjectPascal
object SaveForm: TSaveForm
|
|
Left = 0
|
|
Top = 0
|
|
BorderStyle = bsNone
|
|
Caption = 'SaveForm'
|
|
ClientHeight = 210
|
|
ClientWidth = 410
|
|
Color = clBtnFace
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = 14339007
|
|
Font.Height = -12
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = []
|
|
KeyPreview = True
|
|
Position = poMainFormCenter
|
|
Scaled = False
|
|
OnCreate = FormCreate
|
|
OnKeyDown = FormKeyDown
|
|
TextHeight = 14
|
|
object DialogPanel: TGeneralDialogPanel
|
|
Left = 0
|
|
Top = 0
|
|
Width = 410
|
|
Height = 210
|
|
Caption = #23548#20986#20026
|
|
Color = 5064257
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = 14339007
|
|
Font.Height = -12
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = []
|
|
ParentBackground = False
|
|
ParentFont = False
|
|
TabOrder = 0
|
|
object m_sdFileNameLabel: TLabel
|
|
Left = 33
|
|
Top = 98
|
|
Width = 56
|
|
Height = 14
|
|
Caption = #25991' '#20214' '#21517#65306
|
|
end
|
|
object m_btnBrowse: TTextButton
|
|
Left = 321
|
|
Top = 94
|
|
Width = 48
|
|
Height = 23
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
OnClick = BtnBrowseClick
|
|
Text = #27983#35272
|
|
end
|
|
object m_btnCancel: TTextButton
|
|
Left = 294
|
|
Top = 151
|
|
Width = 75
|
|
Height = 30
|
|
ModalResult = mrCancel
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
Text = #21462#28040
|
|
end
|
|
object m_btnOk: TTextButton
|
|
Left = 213
|
|
Top = 151
|
|
Width = 75
|
|
Height = 30
|
|
ModalResult = mrOk
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
Text = #30830#23450
|
|
end
|
|
object m_SaveTypeCombo: TComboBoxComponent
|
|
Left = 99
|
|
Top = 51
|
|
Width = 270
|
|
Height = 24
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
OnChange = DoComboChange
|
|
ItemHeight = 18
|
|
ShowItemCount = 5
|
|
Parent = DialogPanel
|
|
end
|
|
object m_SaveTypeLabel: TLabel
|
|
Left = 33
|
|
Top = 55
|
|
Width = 60
|
|
Height = 14
|
|
Caption = #25991#20214#31867#22411#65306
|
|
Transparent = True
|
|
end
|
|
object m_editFileName: TLineEdit
|
|
Left = 99
|
|
Top = 94
|
|
Width = 216
|
|
Height = 24
|
|
OnChange = FileNameChange
|
|
HintText = #35831#36873#25321#20445#23384#25991#20214#36335#24452
|
|
NumberMax = -1
|
|
NumberMin = -1
|
|
Color = 15591652
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clBlack
|
|
Font.Height = -11
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = []
|
|
TabOrder = 0
|
|
TabStop = False
|
|
end
|
|
object m_SongCheck: TCKBox
|
|
Left = 97
|
|
Top = 155
|
|
Width = 54
|
|
Height = 18
|
|
Caption = #24405#38899
|
|
Ctl3D = False
|
|
DoubleBuffered = True
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = 14339007
|
|
Font.Height = -11
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = []
|
|
ParentColor = True
|
|
ParentCtl3D = False
|
|
ParentDoubleBuffered = False
|
|
ParentFont = False
|
|
TabOrder = 1
|
|
TabStop = True
|
|
BoxColor = 3157548
|
|
OnChange = DoSongCheck
|
|
end
|
|
object m_ComposeCheck: TCKBox
|
|
Left = 33
|
|
Top = 155
|
|
Width = 57
|
|
Height = 18
|
|
Caption = #20276#22863
|
|
Ctl3D = False
|
|
DoubleBuffered = True
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = 14339007
|
|
Font.Height = -11
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = []
|
|
ParentColor = True
|
|
ParentCtl3D = False
|
|
ParentDoubleBuffered = False
|
|
ParentFont = False
|
|
TabOrder = 2
|
|
TabStop = True
|
|
BoxColor = 3157548
|
|
OnChange = DoComposeCheck
|
|
end
|
|
end
|
|
end
|