unit14.dfm

来自「毕业设计」· DFM 代码 · 共 106 行

DFM
106
字号
object Form14: TForm14
  Left = 270
  Top = 123
  Width = 250
  Height = 159
  Caption = '权限验证...'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Splitter1: TSplitter
    Left = 0
    Top = 89
    Width = 241
    Height = 3
    Cursor = crHSplit
    Align = alNone
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 241
    Height = 89
    TabOrder = 0
    object Label1: TLabel
      Left = 40
      Top = 8
      Width = 156
      Height = 26
      Caption = '只有高级用户才能进行此项操作,请输入口令登录:'
      Font.Charset = GB2312_CHARSET
      Font.Color = clNavy
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      WordWrap = True
    end
    object Label2: TLabel
      Left = 48
      Top = 40
      Width = 39
      Height = 13
      Caption = '口令:'
      Font.Charset = GB2312_CHARSET
      Font.Color = clMaroon
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object Edit1: TEdit
      Left = 88
      Top = 40
      Width = 81
      Height = 21
      Font.Charset = GB2312_CHARSET
      Font.Color = clMaroon
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      PasswordChar = '*'
      TabOrder = 0
      Text = 'Edit1'
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 92
    Width = 241
    Height = 40
    TabOrder = 1
    object Button1: TButton
      Left = 24
      Top = 8
      Width = 75
      Height = 25
      Caption = '确定'
      TabOrder = 0
      OnClick = Button1Click
    end
    object Button2: TButton
      Left = 152
      Top = 8
      Width = 75
      Height = 25
      Caption = '取消'
      TabOrder = 1
    end
  end
  object Table1: TTable
    DatabaseName = 'E:\bysj'
    IndexName = 'user'
    TableName = 'userpass.db'
    Left = 192
    Top = 32
  end
end

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?