unit_frmuser.dfm

影院售票系统完整源码

object FrmUser: TFrmUser
  Left = 290
  Top = 97
  Width = 430
  Height = 272
  BorderStyle = bsSizeToolWin
  Caption = #29992#25143#36164#26009#20449#24687
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  KeyPreview = True
  OldCreateOrder = False
  Position = poMainFormCenter
  OnKeyDown = FormKeyDown
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object Panel2: TPanel
    Left = 0
    Top = 210
    Width = 422
    Height = 35
    Align = alBottom
    BevelOuter = bvNone
    TabOrder = 1
    object BtnSave: TBitBtn
      Left = 255
      Top = 8
      Width = 70
      Height = 21
      Caption = #20445#23384'(&S)'
      TabOrder = 0
      OnClick = BtnSaveClick
    end
    object BtnExit: TBitBtn
      Left = 335
      Top = 8
      Width = 70
      Height = 21
      Caption = #36820#22238'(&X)'
      TabOrder = 1
      OnClick = BtnExitClick
    end
  end
  object GroupBox1: TGroupBox
    Left = 0
    Top = 0
    Width = 422
    Height = 209
    Align = alTop
    TabOrder = 0
    object Label4: TLabel
      Left = 21
      Top = 86
      Width = 60
      Height = 12
      Caption = #38582#23646#24433#38498#65306
    end
    object Label2: TLabel
      Left = 232
      Top = 53
      Width = 60
      Height = 12
      Caption = #29992#25143#23494#30721#65306
    end
    object Label3: TLabel
      Left = 21
      Top = 19
      Width = 60
      Height = 12
      Caption = #38582#23646#35282#33394#65306
    end
    object LBLCODE: TLabel
      Left = 226
      Top = 20
      Width = 66
      Height = 12
      Caption = '*'#30331#24405#21517#31216#65306
    end
    object Label1: TLabel
      Left = 21
      Top = 53
      Width = 60
      Height = 12
      Caption = #29992#25143#21517#31216#65306
    end
    object lblcomment: TLabel
      Left = 21
      Top = 119
      Width = 60
      Height = 12
      Caption = #31616#35201#35828#26126#65306
    end
    object chkused: TCheckBox
      Left = 290
      Top = 84
      Width = 113
      Height = 17
      Caption = #29992#25143#26377#25928
      Checked = True
      State = cbChecked
      TabOrder = 2
    end
    object EdtCode: TCyberEdit
      Left = 290
      Top = 16
      Width = 120
      Height = 20
      EditAlign = etAlignNone
      Color = clWindow
      FrameColor = clBtnShadow
      MaxLength = 20
      TabOrder = 0
    end
    object EdtName: TCyberEdit
      Left = 84
      Top = 49
      Width = 120
      Height = 20
      EditAlign = etAlignNone
      Color = clWindow
      FrameColor = clBtnShadow
      MaxLength = 20
      TabOrder = 1
    end
    object Combgroup: TCyberComboBox
      Left = 84
      Top = 16
      Width = 120
      Height = 20
      FrameColor = clBlack
      ItemHeight = 12
      TabOrder = 3
      OnChange = CombgroupChange
    end
    object Edtpwd: TCyberEdit
      Left = 290
      Top = 49
      Width = 120
      Height = 20
      EditAlign = etAlignNone
      Color = clWindow
      MaxLength = 10
      PasswordChar = '*'
      TabOrder = 4
    end
    object Combcinema: TCyberComboBox
      Left = 84
      Top = 82
      Width = 120
      Height = 20
      FrameColor = clBlack
      ItemHeight = 12
      TabOrder = 5
      OnChange = CombcinemaChange
    end
    object Memoremark: TCyberMemo
      Left = 84
      Top = 120
      Width = 327
      Height = 63
      TabOrder = 6
      FrameFlatStyle = fsStatus
      FrameFocusStyle = fsLowered
      FrameFlat = False
    end
  end
  object CyberXPMenu1: TCyberXPMenu
    DimLevel = 30
    GrayLevel = 10
    Font.Charset = GB2312_CHARSET
    Font.Color = clMenuText
    Font.Height = -11
    Font.Name = 'Tahoma'
    Font.Style = []
    Color = clBtnFace
    IconBackColor = clBtnFace
    MenuBarColor = clBtnFace
    SelectColor = clHighlight
    SelectBorderColor = clHighlight
    SelectFontColor = clMenuText
    DisabledColor = clInactiveCaption
    SeparatorColor = clBtnFace
    CheckedColor = clHighlight
    IconWidth = 24
    DrawSelect = True
    UseSystemColors = True
    OverrideOwnerDraw = False
    Gradient = False
    FlatMenu = False
    AutoDetect = False
    XPControls = [xcMainMenu, xcPopupMenu, xcToolbar, xcControlbar, xcCombo, xcEdit, xcMaskEdit, xcMemo, xcRichEdit, xcCheckBox, xcRadioButton, xcButton, xcBitBtn, xcSpeedButton, xcPanel]
    Active = True
    Left = 24
    Top = 192
  end
end