userunit.dfm

三层的通用架构

object UserForm: TUserForm
  Left = 73
  Top = 65
  AutoScroll = False
  Caption = #29992#25143#31649#29702
  ClientHeight = 444
  ClientWidth = 619
  Color = clBtnFace
  DockSite = True
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  OnClose = FormClose
  OnCreate = FormCreate
  OnResize = FormResize
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object Panel1: TPanel
    Left = 0
    Top = 389
    Width = 619
    Height = 41
    Align = alBottom
    BevelOuter = bvNone
    TabOrder = 1
    OnResize = Panel1Resize
    object CheckBox1: TCheckBox
      Left = 24
      Top = 20
      Width = 345
      Height = 17
      Caption = #30331#24405#26102#26174#31034#26368#21518#30331#24405#29992#25143'(&T)'
      TabOrder = 0
    end
    object Button1: TButton
      Left = 520
      Top = 16
      Width = 75
      Height = 25
      Action = ExitUserManager
      Cancel = True
      Default = True
      TabOrder = 1
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 0
    Width = 619
    Height = 389
    Align = alClient
    BevelOuter = bvNone
    TabOrder = 0
    object Splitter1: TSplitter
      Left = 0
      Top = 118
      Width = 619
      Height = 3
      Cursor = crSizeNS
      Align = alBottom
      MinSize = 50
      ResizeStyle = rsUpdate
      OnCanResize = Splitter1CanResize
    end
    object Panel5: TPanel
      Left = 0
      Top = 121
      Width = 619
      Height = 268
      Align = alBottom
      BevelOuter = bvLowered
      TabOrder = 2
      object Panel6: TPanel
        Left = 1
        Top = 1
        Width = 617
        Height = 24
        Align = alTop
        Caption = #31867#22411': '#29992#25143#25110#29992#25143#32452
        TabOrder = 0
      end
      object Panel7: TPanel
        Left = 1
        Top = 25
        Width = 617
        Height = 242
        Align = alClient
        BevelOuter = bvNone
        TabOrder = 1
        object Panel8: TPanel
          Left = 0
          Top = 0
          Width = 345
          Height = 242
          Align = alLeft
          TabOrder = 0
          object Label1: TLabel
            Left = 152
            Top = 45
            Width = 48
            Height = 12
            Caption = #21035#21517'(&A):'
            FocusControl = Edit1
          end
          object Label3: TLabel
            Left = 16
            Top = 113
            Width = 48
            Height = 12
            Caption = #35828#26126'(&H):'
            FocusControl = Edit4
          end
          object Label2: TLabel
            Left = 152
            Top = 79
            Width = 48
            Height = 12
            Caption = #23494#30721'(&P):'
            FocusControl = Edit3
          end
          object Label4: TLabel
            Left = 116
            Top = 147
            Width = 60
            Height = 12
            Caption = 'AV&I'#25991#20214#21517':'
            FocusControl = Edit5
          end
          object Label5: TLabel
            Left = 16
            Top = 181
            Width = 204
            Height = 12
            Caption = #31995#32479#31354#38386#22810#23569#20998#38047#21518#35201#27714#37325#26032#30331#24405'(&L):'
            FocusControl = Edit6
          end
          object Panel10: TPanel
            Left = 1
            Top = 1
            Width = 343
            Height = 24
            Align = alTop
            BevelOuter = bvNone
            Caption = #19968#33324#35774#32622
            TabOrder = 0
            object Bevel1: TBevel
              Left = 0
              Top = 22
              Width = 343
              Height = 2
              Align = alBottom
              Shape = bsBottomLine
            end
          end
          object CheckBox2: TCheckBox
            Left = 55
            Top = 76
            Width = 65
            Height = 17
            Caption = #31105#29992'(&Z)'
            TabOrder = 2
          end
          object Edit1: TEdit
            Left = 208
            Top = 41
            Width = 121
            Height = 20
            TabOrder = 3
          end
          object Edit4: TEdit
            Left = 72
            Top = 109
            Width = 257
            Height = 20
            TabOrder = 6
          end
          object Edit2: TEdit
            Left = 208
            Top = 75
            Width = 121
            Height = 20
            TabStop = False
            MaxLength = 16
            PasswordChar = '*'
            TabOrder = 4
            OnExit = Edit2Exit
          end
          object Edit3: TEdit
            Left = 208
            Top = 75
            Width = 121
            Height = 20
            TabOrder = 5
            Text = '****************'
            OnEnter = Edit3Enter
          end
          object CheckBox3: TCheckBox
            Left = 16
            Top = 146
            Width = 97
            Height = 17
            Caption = #26174#31034'A&VI'#21160#30011
            TabOrder = 7
          end
          object Edit5: TEdit
            Left = 184
            Top = 143
            Width = 121
            Height = 20
            TabOrder = 8
          end
          object Edit6: TEdit
            Left = 225
            Top = 177
            Width = 30
            Height = 20
            Hint = '9999'#20998#38047#34920#31034#19981#20801#35768#37325#26032#30331#24405
            MaxLength = 4
            ParentShowHint = False
            ShowHint = True
            TabOrder = 10
            Text = '0'
            OnKeyPress = Edit6KeyPress
          end
          object UpDown1: TUpDown
            Left = 255
            Top = 177
            Width = 16
            Height = 20
            Associate = Edit6
            Min = 0
            Max = 9999
            Position = 0
            TabOrder = 11
            Thousands = False
            Wrap = False
          end
          object CheckBox4: TCheckBox
            Left = 16
            Top = 211
            Width = 169
            Height = 17
            Caption = #37325#26032#30331#24405#22833#36133#21518#36864#20986#31995#32479'(&Q)'
            TabOrder = 12
          end
          object CheckBox5: TCheckBox
            Left = 211
            Top = 211
            Width = 118
            Height = 17
            Caption = #31995#32479#36864#20986#26102#25552#31034'(&E)'
            TabOrder = 13
          end
          object Button4: TButton
            Left = 31
            Top = 40
            Width = 95
            Height = 25
            Action = SetLoginTimes
            TabOrder = 1
          end
          object Button5: TButton
            Left = 306
            Top = 142
            Width = 23
            Height = 22
            Caption = '...'
            TabOrder = 9
            TabStop = False
            OnClick = Button5Click
          end
        end
        object Panel9: TPanel
          Left = 345
          Top = 0
          Width = 272
          Height = 242