iChangzuo/AC_Pro
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity
Files
main
AC_Pro/StyleUploadFormUnit.dfm
T
alex_q 754cd7ccdb Initial commit
2026-06-13 00:05:19 +08:00

542 lines
13 KiB
ObjectPascal
Raw Permalink Blame History

object StyleUploadForm: TStyleUploadForm
Left = 0
Top = 0
BorderIcons = []
BorderStyle = bsNone
Caption = 'StyleUploadForm'
ClientHeight = 370
ClientWidth = 431
Color = clBtnFace
DoubleBuffered = True
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
KeyPreview = True
Position = poMainFormCenter
OnCreate = FormCreate
OnKeyDown = FormKeyDown
TextHeight = 13
object m_GPanelBKG: TGeneralDialogPanel
Left = 0
Top = 0
Width = 431
Height = 370
Align = alClient
Caption = #22635#20889#39118#26684#20449#24687
Color = 5064257
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
Font.Quality = fqClearTypeNatural
ParentBackground = False
ParentFont = False
TabOrder = 0
object m_lblProtocol: TLabel
Left = 30
Top = 341
Width = 156
Height = 14
Cursor = crHandPoint
Hint = #25552#20132#39118#26684#34920#31034#24744#24050#30693#24713#24182#21516#24847#12298#20276#22863#39118#26684#21512#20316#21327#35758#12299#30340#20869#23481
ParentCustomHint = False
Caption = #38405#35835#12298#20276#22863#39118#26684#21512#20316#21327#35758#12299
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clHighlight
Font.Height = -12
Font.Name = 'Tahoma'
Font.Style = [fsBold]
Font.Quality = fqClearTypeNatural
ParentColor = False
ParentFont = False
ParentShowHint = False
ShowAccelChar = False
ShowHint = True
Transparent = True
Layout = tlCenter
OnClick = ProtocolClick
OnMouseEnter = ProtocolMouseEnter
OnMouseLeave = ProtocolMouseLeave
end
object m_lblCost: TLabel
Left = 230
Top = 97
Width = 36
Height = 14
Caption = #23450#20215#65306
Font.Charset = DEFAULT_CHARSET
Font.Color = 13613739
Font.Height = -12
Font.Name = 'Tahoma'
Font.Style = []
Font.Quality = fqClearTypeNatural
ParentFont = False
ShowAccelChar = False
end
object m_lblDescription: TLabel
Left = 30
Top = 206
Width = 36
Height = 14
ParentCustomHint = False
Caption = #25551#36848#65306
Font.Charset = DEFAULT_CHARSET
Font.Color = 13613739
Font.Height = -12
Font.Name = 'Tahoma'
Font.Style = []
Font.Quality = fqClearTypeNatural
ParentFont = False
ParentShowHint = False
ShowAccelChar = False
ShowHint = False
end
object m_lblNote: TLabel
Left = 340
Top = 97
Width = 58
Height = 14
Caption = '('#21809#20316#38899#31526')'
Font.Charset = DEFAULT_CHARSET
Font.Color = 13613739
Font.Height = -12
Font.Name = 'Tahoma'
Font.Style = []
Font.Quality = fqClearTypeNatural
ParentFont = False
ShowAccelChar = False
end
object m_lblType: TLabel
Left = 30
Top = 144
Width = 36
Height = 14
Hint = #27468#26354#39118#26684#12290#26368#22810#21487#36873'4'#31181
ParentCustomHint = False
Caption = #20998#31867#65306
Font.Charset = DEFAULT_CHARSET
Font.Color = 13613739
Font.Height = -12
Font.Name = 'Tahoma'
Font.Style = []
Font.Quality = fqClearTypeNatural
ParentFont = False
ParentShowHint = False
ShowAccelChar = False
ShowHint = True
end
object m_lblAuthor: TLabel
Left = 30
Top = 96
Width = 36
Height = 14
Caption = #20316#32773#65306
Font.Charset = DEFAULT_CHARSET
Font.Color = 13613739
Font.Height = -12
Font.Name = 'Tahoma'
Font.Style = []
Font.Quality = fqClearTypeNatural
ParentFont = False
end
object m_lblStyleName: TLabel
Left = 30
Top = 50
Width = 36
Height = 14
Caption = #21517#31216#65306
Font.Charset = DEFAULT_CHARSET
Font.Color = 13613739
Font.Height = -12
Font.Name = 'Tahoma'
Font.Style = []
Font.Quality = fqClearTypeNatural
ParentFont = False
end
object m_btnOk: TTextButton
Left = 276
Top = 321
Width = 52
Height = 27
ModalResult = mrOk
ParentShowHint = False
ShowHint = True
Enabled = False
Text = #30830#23450
end
object m_btnCancel: TTextButton
Left = 342
Top = 321
Width = 52
Height = 27
ModalResult = mrCancel
ParentShowHint = False
ShowHint = True
Text = #21462#28040
end
object m_lblTips: TLabel
Left = 30
Top = 325
Width = 227
Height = 16
ParentCustomHint = False
AutoSize = False
Caption = #25552#31034#65306#35831#36755#20837#39118#26684#25551#36848#20449#24687
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = 14339007
Font.Height = -12
Font.Name = 'Tahoma'
Font.Style = [fsBold]
Font.Quality = fqClearTypeNatural
ParentColor = False
ParentFont = False
ParentShowHint = False
ShowAccelChar = False
ShowHint = False
Transparent = True
Layout = tlCenter
end
object m_memoDescription: TMemo
Left = 74
Top = 207
Width = 322
Height = 90
Hint = #35831#36755#20837#39118#26684#25551#36848
BorderStyle = bsNone
Color = 15591652
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Tahoma'
Font.Style = []
Font.Quality = fqClearTypeNatural
MaxLength = 116
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 3
OnChange = MemoChange
end
object m_editStyleName: TLineEdit
Left = 74
Top = 46
Width = 262
Height = 23
OnChange = EditNameChange
HintText = #35831#36755#20837#39118#26684#21517#31216
MaxLength = 36
NumberMax = -1
NumberMin = -1
Color = 15591652
TabOrder = 0
end
object m_editAuthor: TLineEdit
Left = 74
Top = 92
Width = 127
Height = 23
OnChange = AuthorChange
HintText = #35831#36755#20837#20316#32773#21517#31216
MaxLength = 36
NumberMax = -1
NumberMin = -1
Color = 15591652
TabOrder = 1
end
object m_editCost: TLineEdit
Left = 272
Top = 93
Width = 64
Height = 23
OnChange = CostChange
HintText = '0~9999'
MaxLength = 30
NumbersOnly = True
NumberMax = 9999
NumberMin = -1
Color = 15591652
TabOrder = 2
end
object m_checkBlues: TCKBox
Tag = 5
Left = 175
Top = 167
Width = 48
Height = 18
Caption = #34013#35843
Ctl3D = False
DoubleBuffered = True
Font.Charset = DEFAULT_CHARSET
Font.Color = 13613739
Font.Height = -12
Font.Name = 'Tahoma'
Font.Style = []
Font.Quality = fqClearTypeNatural
ParentColor = True
ParentCtl3D = False
ParentDoubleBuffered = False
ParentFont = False
TabOrder = 4
OnClick = CheckBoxClick
BoxColor = 3157548
end
object m_checkPop: TCKBox
Left = 69
Top = 143
Width = 48
Height = 18
Caption = #27969#34892
Ctl3D = False
DoubleBuffered = True
Font.Charset = DEFAULT_CHARSET
Font.Color = 13613739
Font.Height = -12
Font.Name = 'Tahoma'
Font.Style = []
Font.Quality = fqClearTypeNatural
ParentColor = True
ParentCtl3D = False
ParentDoubleBuffered = False
ParentFont = False
TabOrder = 5
OnClick = CheckBoxClick
BoxColor = 3157548
end
object m_checkClassic: TCKBox
Tag = 7
Left = 120
Top = 167
Width = 48
Height = 18
Caption = #21476#20856
Ctl3D = False
DoubleBuffered = True
Font.Charset = DEFAULT_CHARSET
Font.Color = 13613739
Font.Height = -12
Font.Name = 'Tahoma'
Font.Style = []
Font.Quality = fqClearTypeNatural
ParentColor = True
ParentCtl3D = False
ParentDoubleBuffered = False
ParentFont = False
TabOrder = 6
OnClick = CheckBoxClick
BoxColor = 3157548
end
object m_checkCountry: TCKBox
Tag = 10
Left = 282
Top = 167
Width = 48
Height = 18
Caption = #20065#26449
Ctl3D = False
DoubleBuffered = True
Font.Charset = DEFAULT_CHARSET
Font.Color = 13613739
Font.Height = -12
Font.Name = 'Tahoma'
Font.Style = []
Font.Quality = fqClearTypeNatural
ParentColor = True
ParentCtl3D = False
ParentDoubleBuffered = False
ParentFont = False
TabOrder = 7
OnClick = CheckBoxClick
BoxColor = 3157548
end
object m_checkDance: TCKBox
Tag = 3
Left = 228
Top = 143
Width = 48
Height = 18
Caption = #33310#26354
Ctl3D = False
DoubleBuffered = True
Font.Charset = DEFAULT_CHARSET
Font.Color = 13613739
Font.Height = -12
Font.Name = 'Tahoma'
Font.Style = []
Font.Quality = fqClearTypeNatural
ParentColor = True
ParentCtl3D = False
ParentDoubleBuffered = False
ParentFont = False
TabOrder = 8
OnClick = CheckBoxClick
BoxColor = 3157548
end
object m_checkFolk: TCKBox
Tag = 1
Left = 120
Top = 143
Width = 48
Height = 18
Caption = #27665#35875
Ctl3D = False
DoubleBuffered = True
Font.Charset = DEFAULT_CHARSET
Font.Color = 13613739
Font.Height = -12
Font.Name = 'Tahoma'
Font.Style = []
Font.Quality = fqClearTypeNatural
ParentColor = True
ParentCtl3D = False
ParentDoubleBuffered = False
ParentFont = False
TabOrder = 9
OnClick = CheckBoxClick
BoxColor = 3157548
end
object m_checkIndpent: TCKBox
Tag = 9
Left = 228
Top = 168
Width = 48
Height = 18
Caption = #29420#31435
Ctl3D = False
DoubleBuffered = True
Font.Charset = DEFAULT_CHARSET
Font.Color = 13613739
Font.Height = -12
Font.Name = 'Tahoma'
Font.Style = []
Font.Quality = fqClearTypeNatural
ParentColor = True
ParentCtl3D = False
ParentDoubleBuffered = False
ParentFont = False
TabOrder = 10
OnClick = CheckBoxClick
BoxColor = 3157548
end
object m_checkJazz: TCKBox
Tag = 4
Left = 282
Top = 143
Width = 48
Height = 18
Caption = #29237#22763
Ctl3D = False
DoubleBuffered = True
Font.Charset = DEFAULT_CHARSET
Font.Color = 13613739
Font.Height = -12
Font.Name = 'Tahoma'
Font.Style = []
Font.Quality = fqClearTypeNatural
ParentColor = True
ParentCtl3D = False
ParentDoubleBuffered = False
ParentFont = False
TabOrder = 11
OnClick = CheckBoxClick
BoxColor = 3157548
end
object m_checkOthers: TCKBox
Tag = 127
Left = 336
Top = 167
Width = 48
Height = 18
Caption = #20854#23427
Ctl3D = False
DoubleBuffered = True
Font.Charset = DEFAULT_CHARSET
Font.Color = 13613739
Font.Height = -12
Font.Name = 'Tahoma'
Font.Style = []
Font.Quality = fqClearTypeNatural
ParentColor = True
ParentCtl3D = False
ParentDoubleBuffered = False
ParentFont = False
TabOrder = 12
OnClick = CheckBoxClick
BoxColor = 3157548
end
object m_checkRock: TCKBox
Tag = 2
Left = 175
Top = 143
Width = 48
Height = 18
Caption = #25671#28378
Ctl3D = False
DoubleBuffered = True
Font.Charset = DEFAULT_CHARSET
Font.Color = 13613739
Font.Height = -12
Font.Name = 'Tahoma'
Font.Style = []
Font.Quality = fqClearTypeNatural
ParentColor = True
ParentCtl3D = False
ParentDoubleBuffered = False
ParentFont = False
TabOrder = 13
OnClick = CheckBoxClick
BoxColor = 3157548
end
object m_checkSamba: TCKBox
Tag = 6
Left = 69
Top = 168
Width = 48
Height = 18
Caption = #26705#24052
Ctl3D = False
DoubleBuffered = True
Font.Charset = DEFAULT_CHARSET
Font.Color = 13613739
Font.Height = -12
Font.Name = 'Tahoma'
Font.Style = []
Font.Quality = fqClearTypeNatural
ParentColor = True
ParentCtl3D = False
ParentDoubleBuffered = False
ParentFont = False
TabOrder = 14
OnClick = CheckBoxClick
BoxColor = 3157548
end
object m_checkWaltz: TCKBox
Tag = 8
Left = 336
Top = 142
Width = 60
Height = 18
Caption = #22278#33310#26354
Ctl3D = False
DoubleBuffered = True
Font.Charset = DEFAULT_CHARSET
Font.Color = 13613739
Font.Height = -12
Font.Name = 'Tahoma'
Font.Style = []
Font.Quality = fqClearTypeNatural
ParentColor = True
ParentCtl3D = False
ParentDoubleBuffered = False
ParentFont = False
TabOrder = 15
OnClick = CheckBoxClick
BoxColor = 3157548
end
end
end
Reference in New Issue View Git Blame Copy Permalink