unit1.dfm

Delphi源代码--- --卡拉OK模拟器

object Form1: TForm1
  Left = 367
  Top = 164
  Width = 326
  Height = 151
  Caption = #21345#25289'OK'#27169#25311#22120
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clBlack
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = [fsBold]
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 14
    Top = 98
    Width = 79
    Height = 12
    Caption = #35831#36755#20837#25991#23383#65306
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
  end
  object GroupBox1: TGroupBox
    Left = 0
    Top = 0
    Width = 318
    Height = 81
    Align = alTop
    Caption = #27169#25311#21306
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 0
    object Panel1: TPanel
      Left = 2
      Top = 15
      Width = 314
      Height = 64
      Align = alClient
      BevelInner = bvRaised
      BorderStyle = bsSingle
      TabOrder = 0
      object Image1: TImage
        Left = 2
        Top = 2
        Width = 306
        Height = 56
        Align = alClient
      end
    end
  end
  object Edit1: TEdit
    Left = 106
    Top = 92
    Width = 166
    Height = 21
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 1
    OnKeyDown = Edit1KeyDown
  end
  object Timer1: TTimer
    Interval = 100
    OnTimer = Timer1Timer
    Left = 80
    Top = 32
  end
end