Initial commit

PredefineProjectFormUnit.dfm

@@ -0,0 +1,255 @@
+object PredefineProjectForm: TPredefineProjectForm
+  Left = 0
+  Top = 0
+  BorderStyle = bsNone
+  Caption = 'PredefineProjectForm'
+  ClientHeight = 260
+  ClientWidth = 520
+  Color = clBtnFace
+  Font.Charset = DEFAULT_CHARSET
+  Font.Color = 12429980
+  Font.Height = -11
+  Font.Name = 'Tahoma'
+  Font.Style = []
+  KeyPreview = True
+  Position = poMainFormCenter
+  Scaled = False
+  OnCreate = FormCreate
+  OnKeyDown = FormKeyDown
+  TextHeight = 13
+  object GeneralDialogPanel: TGeneralDialogPanel
+    Left = 0
+    Top = 0
+    Width = 520
+    Height = 260
+    Caption = #39044#35774#24037#31243
+    Color = 5064257
+    Font.Charset = DEFAULT_CHARSET
+    Font.Color = clWindowText
+    Font.Height = -12
+    Font.Name = 'Tahoma'
+    Font.Style = []
+    ParentBackground = False
+    ParentFont = False
+    TabOrder = 0
+    OnMouseDown = DoGeneraDialogPanelMouseDown
+    object mTsLabel: TLabel
+      Left = 25
+      Top = 58
+      Width = 24
+      Height = 14
+      Caption = #33410#25293
+      Font.Charset = DEFAULT_CHARSET
+      Font.Color = 12429980
+      Font.Height = -12
+      Font.Name = 'Tahoma'
+      Font.Style = []
+      ParentFont = False
+    end
+    object mTempoLabel: TLabel
+      Left = 119
+      Top = 58
+      Width = 24
+      Height = 14
+      Caption = #36895#24230
+      Font.Charset = DEFAULT_CHARSET
+      Font.Color = 12429980
+      Font.Height = -12
+      Font.Name = 'Tahoma'
+      Font.Style = []
+      ParentFont = False
+    end
+    object mKeyComboBox: TComboBoxComponent
+      Left = 340
+      Top = 54
+      Width = 42
+      Height = 24
+      ParentShowHint = False
+      ShowHint = True
+      Caption = 'C'
+      OnChange = DoKeyChange
+      ShowItemCount = 8
+      Parent = GeneralDialogPanel
+    end
+    object mKeyTypeComboBox: TComboBoxComponent
+      Left = 434
+      Top = 54
+      Width = 61
+      Height = 24
+      ParentShowHint = False
+      ShowHint = True
+      Caption = #22823#35843
+      OnChange = DoKeyTypeChange
+      ShowItemCount = 7
+      Parent = GeneralDialogPanel
+    end
+    object mStageComboBox: TComboBoxComponent
+      Left = 79
+      Top = 114
+      Width = 35
+      Height = 24
+      ParentShowHint = False
+      ShowHint = True
+      Caption = '1'
+      OnChange = DoStageCountChange
+      ShowItemCount = 5
+      Parent = GeneralDialogPanel
+    end
+    object mKeyLabel: TLabel
+      Left = 310
+      Top = 58
+      Width = 24
+      Height = 14
+      Caption = #35843#21495
+      Font.Charset = DEFAULT_CHARSET
+      Font.Color = 12429980
+      Font.Height = -12
+      Font.Name = 'Tahoma'
+      Font.Style = []
+      ParentFont = False
+    end
+    object mStageLabel: TLabel
+      Left = 25
+      Top = 118
+      Width = 48
+      Height = 14
+      Caption = #26059#24459#20998#27573
+      Font.Charset = DEFAULT_CHARSET
+      Font.Color = 12429980
+      Font.Height = -12
+      Font.Name = 'Tahoma'
+      Font.Style = []
+      ParentFont = False
+    end
+    object mKeyTypeLabel: TLabel
+      Left = 404
+      Top = 58
+      Width = 24
+      Height = 14
+      Caption = #35843#24615
+      Font.Charset = DEFAULT_CHARSET
+      Font.Color = 12429980
+      Font.Height = -12
+      Font.Name = 'Tahoma'
+      Font.Style = []
+      ParentFont = False
+    end
+    object mCancelButton: TTextButton
+      Left = 420
+      Top = 211
+      Width = 75
+      Height = 25
+      ModalResult = mrCancel
+      ParentShowHint = False
+      ShowHint = True
+      Text = #21462#28040
+    end
+    object mOkButton: TTextButton
+      Left = 333
+      Top = 211
+      Width = 75
+      Height = 25
+      ModalResult = mrOk
+      ParentShowHint = False
+      ShowHint = True
+      Text = #30830#23450
+    end
+    object mChordsBox: TPaintBox
+      Left = 25
+      Top = 154
+      Width = 470
+      Height = 30
+      Cursor = crHandPoint
+      Hint = #28857#20987#21152#36733#39044#35774
+      ParentShowHint = False
+      ShowHint = True
+      OnMouseDown = DoPaintBoxMouseDown
+      OnMouseEnter = DoPaintBoxMouseEnter
+      OnMouseLeave = DoPaintBoxMouseLeave
+      OnPaint = DoShowPreChordPaint
+    end
+    object mTSComboBox: TComboBoxComponent
+      Left = 55
+      Top = 54
+      Width = 42
+      Height = 24
+      ParentShowHint = False
+      ShowHint = True
+      Caption = '4/4'
+      OnChange = DoTsChange
+      ShowItemCount = 5
+      Parent = GeneralDialogPanel
+    end
+    object mTempoComboBox: TComboBoxComponent
+      Left = 149
+      Top = 54
+      Width = 61
+      Height = 24
+      ParentShowHint = False
+      ShowHint = True
+      Caption = #20013#36895
+      OnChange = DoTempoComboChange
+      ShowItemCount = 5
+      Parent = GeneralDialogPanel
+    end
+    object Label1: TLabel
+      Left = 178
+      Top = 118
+      Width = 72
+      Height = 14
+      Caption = #21644#24358#39044#35774#65292#31532
+      Font.Charset = DEFAULT_CHARSET
+      Font.Color = 12429980
+      Font.Height = -12
+      Font.Name = 'Tahoma'
+      Font.Style = []
+      ParentFont = False
+    end
+    object Label2: TLabel
+      Left = 297
+      Top = 118
+      Width = 24
+      Height = 14
+      Caption = #27573#65306
+      Font.Charset = DEFAULT_CHARSET
+      Font.Color = 12429980
+      Font.Height = -12
+      Font.Name = 'Tahoma'
+      Font.Style = []
+      ParentFont = False
+    end
+    object mStageSetComboBox: TComboBoxComponent
+      Left = 256
+      Top = 114
+      Width = 35
+      Height = 24
+      ParentShowHint = False
+      ShowHint = True
+      Caption = '1'
+      OnChange = StageSetChange
+      ShowItemCount = 5
+      Parent = GeneralDialogPanel
+    end
+    object mTempoLineEdit: TLineEdit
+      Left = 216
+      Top = 54
+      Width = 32
+      Height = 24
+      OnChange = DoTempoEditChange
+      MaxLength = 3
+      NumbersOnly = True
+      NumberMax = 200
+      NumberMin = 50
+      Text = '80'
+      TabOrder = 0
+    end
+    object mTempoUpDown: TUpDown
+      Left = 247
+      Top = 55
+      Width = 16
+      Height = 22
+      TabOrder = 1
+      OnClick = mTempoUpDownClick
+    end
+  end
+end