setfrm.dfm

delphi俄罗斯方块delphi俄罗斯方块

object setForm: TsetForm
  Left = 334
  Top = 275
  BorderStyle = bsToolWindow
  Caption = 'setForm'
  ClientHeight = 250
  ClientWidth = 302
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'Courier New'
  Font.Style = []
  OldCreateOrder = False
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 16
  object Image1: TImage
    Left = 232
    Top = 8
    Width = 20
    Height = 20
  end
  object StaticText1: TStaticText
    Left = 16
    Top = 8
    Width = 44
    Height = 20
    Caption = 'Left:'
    TabOrder = 0
  end
  object StaticText2: TStaticText
    Left = 16
    Top = 42
    Width = 52
    Height = 20
    Caption = 'Right:'
    TabOrder = 1
  end
  object StaticText3: TStaticText
    Left = 16
    Top = 76
    Width = 44
    Height = 20
    Caption = 'Down:'
    TabOrder = 2
  end
  object StaticText4: TStaticText
    Left = 16
    Top = 111
    Width = 60
    Height = 20
    Caption = 'Change:'
    TabOrder = 3
  end
  object edtLeft: TEdit
    Left = 114
    Top = 8
    Width = 107
    Height = 24
    TabStop = False
    ReadOnly = True
    TabOrder = 4
    OnKeyDown = edtLeftKeyDown
  end
  object edtRight: TEdit
    Left = 114
    Top = 42
    Width = 107
    Height = 24
    TabStop = False
    ReadOnly = True
    TabOrder = 5
    OnKeyDown = edtRightKeyDown
  end
  object edtDown: TEdit
    Left = 114
    Top = 76
    Width = 107
    Height = 24
    TabStop = False
    ReadOnly = True
    TabOrder = 6
    OnKeyDown = edtDownKeyDown
  end
  object edtChange: TEdit
    Left = 114
    Top = 111
    Width = 107
    Height = 24
    TabStop = False
    ReadOnly = True
    TabOrder = 7
    OnKeyDown = edtChangeKeyDown
  end
  object StaticText5: TStaticText
    Left = 16
    Top = 145
    Width = 52
    Height = 20
    Caption = 'Pause:'
    TabOrder = 8
  end
  object edtPause: TEdit
    Left = 114
    Top = 145
    Width = 107
    Height = 24
    TabStop = False
    ReadOnly = True
    TabOrder = 9
    OnKeyDown = edtPauseKeyDown
  end
  object StaticText6: TStaticText
    Left = 16
    Top = 179
    Width = 76
    Height = 20
    Caption = 'Speed UP:'
    TabOrder = 10
  end
  object StaticText7: TStaticText
    Left = 16
    Top = 214
    Width = 92
    Height = 20
    Caption = 'Speed Down:'
    TabOrder = 11
  end
  object edtSpeedUp: TEdit
    Left = 114
    Top = 179
    Width = 107
    Height = 24
    TabStop = False
    ReadOnly = True
    TabOrder = 12
    OnKeyDown = edtSpeedUpKeyDown
  end
  object edtSpeedDown: TEdit
    Left = 114
    Top = 214
    Width = 107
    Height = 24
    TabStop = False
    ReadOnly = True
    TabOrder = 13
    OnKeyDown = edtSpeedDownKeyDown
  end
  object Button1: TButton
    Left = 226
    Top = 212
    Width = 73
    Height = 25
    Caption = 'OK'
    TabOrder = 14
    OnClick = Button1Click
  end
  object Button2: TButton
    Left = 224
    Top = 48
    Width = 75
    Height = 25
    Caption = 'Sel Brick'
    TabOrder = 15
    OnClick = Button2Click
  end
end