login.~dfm

软件类别: 数据库 软件大小: 2.60M 运行环境: Win9xNT/2000/XP 一套车辆管理系统,此版本为商业版,大家一定用的着。

object frm_Login: Tfrm_Login
  Left = 91
  Top = 188
  Width = 285
  Height = 192
  AutoSize = True
  BorderIcons = [biSystemMenu]
  Caption = #12304#31995#32479#30331#38470#27169#22359#12305
  Color = clSkyBlue
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnClose = FormClose
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 277
    Height = 165
    Align = alClient
    Color = clSkyBlue
    TabOrder = 0
    object Cmd_Cancel: TSpeedButton
      Left = 206
      Top = 141
      Width = 65
      Height = 22
      Caption = #21462#28040
      Glyph.Data = {
        66010000424D6601000000000000760000002800000014000000140000000100
        040000000000F0000000120B0000120B00001000000010000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
        77777777FFFF77777778777777777777FFFE777777088777777777777FFF7777
        7910877777887777FFFF77777910887770088777FFFF77777911088791108777
        FFFF77777791108911107777FFFE777777911191110777777FFF777777791111
        10777777FFFF77777777911108877777FFFF77777777911110877777FFFF7777
        7779110110887777FFFE777777791079110887777FFF77777791077791108877
        FFFF77777791077779110877FFFF77777779777777910777FFFF777777777777
        77797777FFFE777777777777777777777FFF77777777777777777777FFFF7777
        7777777777777777FFFF}
      OnClick = Cmd_CancelClick
    end
    object Cmd_OK: TSpeedButton
      Left = 133
      Top = 141
      Width = 69
      Height = 22
      Caption = #30830#23450
      Glyph.Data = {
        66010000424D6601000000000000760000002800000014000000140000000100
        040000000000F0000000120B0000120B00001000000010000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
        777777776D7077777777777777777777500077777777887777777777A6007777
        777CC887777777777470777777C22C8877777777504177777A2222C887777777
        A6007777A222222C88777777A6007777A222A222C887777765347777A22C8A22
        2C877777342E7777A22C87A22C88777700F077777A2C777A22C887771D777777
        77AA7777A22C88776D707777777777777A22C887500077777777777777A22C87
        9700777777777777777A2C8774767777777777777777AC774945777777777777
        7777777700F0777777777777777777772C7777777777777777777777626D7777
        7777777777777777424D}
      OnClick = Cmd_OKClick
    end
    object GroupBox1: TGroupBox
      Left = 1
      Top = 1
      Width = 275
      Height = 113
      Align = alTop
      TabOrder = 0
      object Label1: TLabel
        Left = 56
        Top = 69
        Width = 65
        Height = 13
        Caption = #29992#25143#21517#31216#65306
      end
      object Label2: TLabel
        Left = 56
        Top = 43
        Width = 65
        Height = 13
        Caption = #29992#25143#31867#22411#65306
      end
      object Lab_Error: TLabel
        Left = 8
        Top = 15
        Width = 7
        Height = 13
      end
      object Cmd_Read_INI: TSpeedButton
        Left = 24
        Top = 16
        Width = 23
        Height = 22
        Visible = False
        OnClick = Cmd_Read_INIClick
      end
      object UserType: TComboBox
        Left = 125
        Top = 39
        Width = 146
        Height = 21
        Style = csDropDownList
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        ItemHeight = 13
        TabOrder = 0
        OnChange = UserTypeChange
        OnKeyPress = UserTypeKeyPress
        Items.Strings = (
          #12304#35831#36873#25321#29992#25143#31867#22411#12305
          #12304#36229#32423#29992#25143#12305)
      end
      object UserName: TComboBox
        Left = 125
        Top = 64
        Width = 146
        Height = 21
        Style = csDropDownList
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        ItemHeight = 13
        TabOrder = 1
        OnKeyPress = UserNameKeyPress
        Items.Strings = (
          #12304#35831#36873#25321#29992#25143#21517#31216#12305)
      end
      object UserPwd: TLabeledEdit
        Left = 125
        Top = 89
        Width = 146
        Height = 21
        EditLabel.Width = 65
        EditLabel.Height = 13
        EditLabel.Caption = #29992#25143#21475#20196#65306
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        LabelPosition = lpLeft
        LabelSpacing = 3
        PasswordChar = '*'
        TabOrder = 2
        OnKeyPress = UserPwdKeyPress
      end
      object Edit_Time: TEdit
        Left = 80
        Top = 98
        Width = 73
        Height = 21
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        TabOrder = 3
        Visible = False
      end
      object Edit_Date: TEdit
        Left = 96
        Top = 98
        Width = 73
        Height = 21
        ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
        TabOrder = 4
        Visible = False
      end
    end
    object GroupBox2: TGroupBox
      Left = 1
      Top = 114
      Width = 124
      Height = 50
      Align = alLeft
      Font.Charset = ANSI_CHARSET
      Font.Color = clFuchsia
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 1
      object Label5: TLabel
        Left = 7
        Top = 16
        Width = 104
        Height = 13
        Caption = #36830#32493#19977#27425#23494#30721#38169#35823
        Font.Charset = GB2312_CHARSET
        Font.Color = clFuchsia
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
      end
      object Label6: TLabel
        Left = 7
        Top = 31
        Width = 65
        Height = 13
        Caption = #31995#32479#23558#20851#38381
        Font.Charset = GB2312_CHARSET
        Font.Color = clFuchsia
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
      end
    end
    object CheckBox1: TCheckBox
      Left = 132
      Top = 120
      Width = 137
      Height = 17
      Caption = #36816#29992#24320#21457#32773#30340#23494#30721
      TabOrder = 2
      OnClick = CheckBox1Click
    end
  end
  object XPMenu1: TXPMenu
    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 = True
    Active = True
    ControlUseTrueXPStyle = True
    BtnRoundArc = 5
    BtnOutLineBorderColor = 7552000
    BtnInnerBorderMoveColor = 3257087
    BtnInnerBorderFocusColor = 15183500
    BtnSurfaceNormalColor = 16251903
    BtnSurfaceDownColor = 14608359
    BtnSurfaceBottomLineColor = 14608359
    BtnSurfaceDownBottomLineColor = 15199215
    RdoChkControlChkColor = 41472
    ComboBoxChkColor = 9201994
    ComboboxSurfaceMoveColor = 16771030
    ControlDisabledBorderColor = 11913158
    Left = 24
    Top = 72
  end
end