changepassf.dfm

用delphi和sql server编写的校园IC卡管理系统。

object changepass: Tchangepass
  Left = 268
  Top = 229
  BorderIcons = [biSystemMenu]
  BorderStyle = bsSingle
  Caption = 'IC'#21345#23494#30721#20462#25913
  ClientHeight = 339
  ClientWidth = 468
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox1: TGroupBox
    Left = 3
    Top = 111
    Width = 463
    Height = 226
    Caption = #21345#23494#30721#20462#25913
    TabOrder = 0
    object Label1: TLabel
      Left = 48
      Top = 30
      Width = 46
      Height = 13
      Caption = 'IC'#21345#21495#65306
    end
    object Label2: TLabel
      Left = 231
      Top = 30
      Width = 48
      Height = 13
      Caption = #21407#23494#30721#65306
    end
    object Label3: TLabel
      Left = 48
      Top = 69
      Width = 48
      Height = 13
      Caption = #26032#23494#30721#65306
    end
    object Label4: TLabel
      Left = 225
      Top = 69
      Width = 72
      Height = 13
      Caption = #26032#23494#30721#30830#35748#65306
    end
    object Edit1: TEdit
      Left = 108
      Top = 24
      Width = 103
      Height = 21
      TabOrder = 0
      Text = '1234567898'
      OnKeyPress = Edit1KeyPress
    end
    object Edit2: TEdit
      Left = 318
      Top = 24
      Width = 103
      Height = 21
      PasswordChar = '*'
      TabOrder = 1
      Text = '******'
      OnKeyPress = Edit2KeyPress
    end
    object Edit3: TEdit
      Left = 108
      Top = 63
      Width = 103
      Height = 21
      PasswordChar = '*'
      TabOrder = 2
      Text = '******'
      OnKeyPress = Edit3KeyPress
    end
    object Edit4: TEdit
      Left = 318
      Top = 63
      Width = 103
      Height = 21
      PasswordChar = '*'
      TabOrder = 3
      Text = '******'
      OnKeyPress = Edit4KeyPress
    end
    object BitBtn1: TBitBtn
      Left = 201
      Top = 135
      Width = 91
      Height = 28
      Caption = #20462'      '#25913'(&C)'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 4
      OnClick = BitBtn1Click
    end
    object BitBtn2: TBitBtn
      Left = 345
      Top = 135
      Width = 91
      Height = 28
      Caption = #36864'      '#20986'(&O)'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 5
      OnClick = BitBtn2Click
    end
    object BitBtn3: TBitBtn
      Left = 54
      Top = 135
      Width = 91
      Height = 28
      Caption = #25628'     '#32034'(&S)'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 6
      OnClick = BitBtn3Click
    end
  end
  object DBGrid1: TDBGrid
    Left = 3
    Top = 0
    Width = 466
    Height = 109
    DataSource = DataSource1
    TabOrder = 1
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = #21345#21495
        Width = 85
        Visible = True
      end
      item
        Expanded = False
        FieldName = #23494#30721
        Width = 89
        Visible = True
      end
      item
        Expanded = False
        FieldName = #29366#24577
        Width = 88
        Visible = True
      end
      item
        Expanded = False
        FieldName = #37329#39069
        Width = 91
        Visible = True
      end
      item
        Expanded = False
        FieldName = #23398#21495
        Width = 88
        Visible = True
      end>
  end
  object ADOQuery1: TADOQuery
    Connection = main.ADOConnection1
    Parameters = <>
    Left = 420
    Top = 81
  end
  object ADOTable1: TADOTable
    Connection = main.ADOConnection1
    TableName = #21345#20449#24687
    Left = 390
    Top = 81
  end
  object DataSource1: TDataSource
    DataSet = ADOTable1
    Left = 363
    Top = 81
  end
end