369 lines
8.3 KiB
ObjectPascal
369 lines
8.3 KiB
ObjectPascal
object SwitchTextureForm: TSwitchTextureForm
|
|
Left = 0
|
|
Top = 0
|
|
BorderStyle = bsNone
|
|
Caption = 'SwitchTextureForm'
|
|
ClientHeight = 408
|
|
ClientWidth = 494
|
|
Color = 5064257
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -12
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = []
|
|
Position = poMainFormCenter
|
|
Scaled = False
|
|
OnCreate = FormCreate
|
|
TextHeight = 14
|
|
object m_BKGPanel: TGeneralDialogPanel
|
|
Left = 0
|
|
Top = 0
|
|
Width = 494
|
|
Height = 408
|
|
Align = alClient
|
|
BevelOuter = bvSpace
|
|
Caption = #20048#22120#32455#20307#26367#25442
|
|
Color = 5064257
|
|
ParentBackground = False
|
|
TabOrder = 0
|
|
ExplicitLeft = -8
|
|
ExplicitTop = 24
|
|
object m_btnTry: TTextButton
|
|
Left = 351
|
|
Top = 368
|
|
Width = 56
|
|
Height = 25
|
|
ModalResult = mrOk
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
OnClick = DoPartternUse
|
|
Enabled = False
|
|
Text = #30830#23450
|
|
end
|
|
object m_btnCancel: TTextButton
|
|
Left = 416
|
|
Top = 368
|
|
Width = 56
|
|
Height = 25
|
|
ModalResult = mrCancel
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
Text = #21462#28040
|
|
end
|
|
object m_btnInit: TTextButton
|
|
Left = 287
|
|
Top = 368
|
|
Width = 56
|
|
Height = 25
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
OnClick = DoPartternInit
|
|
Enabled = False
|
|
Text = #37325#32622
|
|
end
|
|
object m_lbIntro: TLabel
|
|
Left = 23
|
|
Top = 373
|
|
Width = 180
|
|
Height = 14
|
|
Caption = #25152#36873#32455#20307#20165#21487#26367#25442#30456#24212#31867#22411#30340#27573#33853
|
|
Color = 5066239
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = 4342527
|
|
Font.Height = -12
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = []
|
|
ParentColor = False
|
|
ParentFont = False
|
|
end
|
|
object m_shapeOri: TShape
|
|
Left = 20
|
|
Top = 294
|
|
Width = 140
|
|
Height = 25
|
|
Brush.Color = 2433053
|
|
Pen.Color = 8092539
|
|
end
|
|
object m_lbOri: TLabel
|
|
Left = 20
|
|
Top = 294
|
|
Width = 140
|
|
Height = 25
|
|
Alignment = taCenter
|
|
AutoSize = False
|
|
Caption = #20351#29992#21407#22987#39118#26684#20048#22120
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = 13613739
|
|
Font.Height = -12
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
Layout = tlCenter
|
|
end
|
|
object m_shapecheck: TShape
|
|
Left = 20
|
|
Top = 318
|
|
Width = 140
|
|
Height = 34
|
|
Brush.Color = 3090983
|
|
Pen.Color = 8092539
|
|
end
|
|
object m_ShapeProg: TShape
|
|
Left = 20
|
|
Top = 167
|
|
Width = 140
|
|
Height = 21
|
|
Brush.Color = 2433053
|
|
Pen.Color = 8092539
|
|
end
|
|
object m_ShapeType: TShape
|
|
Left = 20
|
|
Top = 40
|
|
Width = 140
|
|
Height = 21
|
|
Brush.Color = 2433053
|
|
Pen.Color = 8092539
|
|
end
|
|
object m_lbType: TLabel
|
|
Left = 20
|
|
Top = 40
|
|
Width = 140
|
|
Height = 21
|
|
Alignment = taCenter
|
|
AutoSize = False
|
|
Caption = #31867#21035
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = 13613739
|
|
Font.Height = -12
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
Layout = tlCenter
|
|
end
|
|
object m_lbProg: TLabel
|
|
Left = 20
|
|
Top = 167
|
|
Width = 140
|
|
Height = 21
|
|
Alignment = taCenter
|
|
AutoSize = False
|
|
Caption = #20048#22120
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = 13613739
|
|
Font.Height = -12
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
Layout = tlCenter
|
|
end
|
|
object m_ShapeTexture: TShape
|
|
Left = 180
|
|
Top = 40
|
|
Width = 292
|
|
Height = 21
|
|
Brush.Color = 2433053
|
|
Enabled = False
|
|
Pen.Color = 8092539
|
|
end
|
|
object m_lbTexture: TLabel
|
|
Left = 180
|
|
Top = 40
|
|
Width = 292
|
|
Height = 21
|
|
Alignment = taCenter
|
|
AutoSize = False
|
|
Caption = #32455#20307
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = 13613739
|
|
Font.Height = -12
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
Layout = tlCenter
|
|
end
|
|
object m_ShapeTitle: TShape
|
|
Left = 180
|
|
Top = 60
|
|
Width = 292
|
|
Height = 21
|
|
Brush.Color = 2433053
|
|
Enabled = False
|
|
Pen.Color = 8092539
|
|
end
|
|
object Label1: TLabel
|
|
Left = 180
|
|
Top = 60
|
|
Width = 147
|
|
Height = 21
|
|
Alignment = taCenter
|
|
AutoSize = False
|
|
Caption = #20048#22120#21517
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = 13613739
|
|
Font.Height = -12
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
Layout = tlCenter
|
|
end
|
|
object Label2: TLabel
|
|
Left = 331
|
|
Top = 60
|
|
Width = 55
|
|
Height = 21
|
|
Alignment = taCenter
|
|
AutoSize = False
|
|
Caption = #39118#26684
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = 13613739
|
|
Font.Height = -12
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
Layout = tlCenter
|
|
end
|
|
object Label3: TLabel
|
|
Left = 390
|
|
Top = 60
|
|
Width = 43
|
|
Height = 21
|
|
Alignment = taCenter
|
|
AutoSize = False
|
|
Caption = #29255#27573
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = 13613739
|
|
Font.Height = -12
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
Layout = tlCenter
|
|
end
|
|
object Label4: TLabel
|
|
Left = 437
|
|
Top = 60
|
|
Width = 35
|
|
Height = 21
|
|
Alignment = taCenter
|
|
AutoSize = False
|
|
Caption = #25910#34255
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = 13613739
|
|
Font.Height = -12
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
Layout = tlCenter
|
|
end
|
|
object m_ckPlay: TCKBox
|
|
Left = 34
|
|
Top = 325
|
|
Width = 47
|
|
Height = 18
|
|
Caption = #35797#21548
|
|
Ctl3D = False
|
|
DoubleBuffered = True
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = 13613739
|
|
Font.Height = -11
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = []
|
|
ParentColor = True
|
|
ParentCtl3D = False
|
|
ParentDoubleBuffered = False
|
|
ParentFont = False
|
|
TabOrder = 0
|
|
OnClick = CurProgPlayClick
|
|
Checked = True
|
|
end
|
|
object m_ckReplaceProg: TCKBox
|
|
Left = 94
|
|
Top = 325
|
|
Width = 49
|
|
Height = 18
|
|
Caption = #26367#25442
|
|
Ctl3D = False
|
|
DoubleBuffered = True
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = 13613739
|
|
Font.Height = -11
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = []
|
|
ParentColor = True
|
|
ParentCtl3D = False
|
|
ParentDoubleBuffered = False
|
|
ParentFont = False
|
|
TabOrder = 1
|
|
OnClick = ReplaceProgClick
|
|
Checked = True
|
|
end
|
|
object m_cbDrum: TCKBox
|
|
Left = 284
|
|
Top = 371
|
|
Width = 49
|
|
Height = 18
|
|
Caption = #40723#32452
|
|
Ctl3D = False
|
|
UseDockManager = False
|
|
DoubleBuffered = True
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = 13613739
|
|
Font.Height = -11
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = []
|
|
ParentColor = True
|
|
ParentCtl3D = False
|
|
ParentDoubleBuffered = False
|
|
ParentFont = False
|
|
TabOrder = 2
|
|
Visible = False
|
|
OnClick = DrumClick
|
|
end
|
|
object m_panProg: TPanel
|
|
Left = 20
|
|
Top = 187
|
|
Width = 140
|
|
Height = 91
|
|
BevelOuter = bvNone
|
|
Caption = 'panFonts'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -12
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
ShowCaption = False
|
|
TabOrder = 4
|
|
end
|
|
object m_panTexture: TPanel
|
|
Left = 180
|
|
Top = 80
|
|
Width = 292
|
|
Height = 272
|
|
BevelOuter = bvNone
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -12
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
ShowCaption = False
|
|
TabOrder = 5
|
|
end
|
|
object m_panType: TPanel
|
|
Left = 20
|
|
Top = 60
|
|
Width = 140
|
|
Height = 91
|
|
BevelOuter = bvNone
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -12
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
ShowCaption = False
|
|
TabOrder = 3
|
|
end
|
|
end
|
|
end
|