addcardf.dfm

来自「用delphi和sql server编写的校园IC卡管理系统。」· DFM 代码 · 共 264 行

object addcard: Taddcard
  Left = 301
  Top = 192
  BorderIcons = [biSystemMenu]
  BorderStyle = bsSingle
  Caption = #21150#29702#26032#21345
  ClientHeight = 335
  ClientWidth = 514
  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 DBGrid1: TDBGrid
    Left = 0
    Top = -3
    Width = 514
    Height = 82
    DataSource = DataSource1
    TabOrder = 0
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    Columns = <
      item
        Alignment = taCenter
        Expanded = False
        FieldName = #22995#21517
        Width = 92
        Visible = True
      end
      item
        Expanded = False
        FieldName = #23398#21495
        Width = 87
        Visible = True
      end
      item
        Expanded = False
        FieldName = #24180#32423
        Width = 79
        Visible = True
      end
      item
        Expanded = False
        FieldName = #19987#19994
        Width = 79
        Visible = True
      end
      item
        Expanded = False
        FieldName = #24615#21035
        Width = 77
        Visible = True
      end
      item
        Expanded = False
        FieldName = #29677#32423
        Width = 76
        Visible = True
      end>
  end
  object Panel1: TPanel
    Left = 3
    Top = 207
    Width = 508
    Height = 127
    TabOrder = 1
    object Label1: TLabel
      Left = 9
      Top = 33
      Width = 36
      Height = 13
      Caption = #21345#21495#65306
    end
    object Label2: TLabel
      Left = 153
      Top = 33
      Width = 60
      Height = 13
      Caption = #35774#23450#23494#30721#65306
    end
    object Label3: TLabel
      Left = 327
      Top = 33
      Width = 60
      Height = 13
      Caption = #20805#20837#37329#39069#65306
    end
    object Edit3: TEdit
      Left = 54
      Top = 27
      Width = 88
      Height = 21
      TabOrder = 0
      Text = 'Edit3'
      OnKeyPress = Edit3KeyPress
    end
    object BitBtn1: TBitBtn
      Left = 129
      Top = 78
      Width = 88
      Height = 25
      Caption = #30830' '#23450
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 1
      OnClick = BitBtn1Click
    end
    object BitBtn2: TBitBtn
      Left = 303
      Top = 78
      Width = 88
      Height = 25
      Caption = #36864#12288#20986
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 2
      OnClick = BitBtn2Click
    end
    object Edit5: TEdit
      Left = 228
      Top = 27
      Width = 85
      Height = 21
      TabOrder = 3
      Text = 'Edit5'
      OnKeyPress = Edit5KeyPress
    end
    object Edit6: TEdit
      Left = 411
      Top = 27
      Width = 85
      Height = 21
      TabOrder = 4
      Text = 'Edit6'
      OnKeyPress = Edit6KeyPress
    end
  end
  object GroupBox1: TGroupBox
    Left = 0
    Top = 81
    Width = 406
    Height = 124
    Caption = #26597#35810#23398#29983#20449#24687
    TabOrder = 2
    object RadioButton1: TRadioButton
      Left = 39
      Top = 24
      Width = 73
      Height = 25
      Caption = #23398#21495
      TabOrder = 0
      OnKeyPress = RadioButton1KeyPress
    end
    object Edit1: TEdit
      Left = 108
      Top = 24
      Width = 94
      Height = 21
      TabOrder = 1
      Text = 'Edit1'
      OnKeyPress = Edit1KeyPress
    end
    object RadioButton2: TRadioButton
      Left = 39
      Top = 63
      Width = 58
      Height = 25
      Caption = #22995#21517
      TabOrder = 2
      OnKeyPress = RadioButton2KeyPress
    end
    object Edit2: TEdit
      Left = 108
      Top = 63
      Width = 94
      Height = 21
      TabOrder = 3
      Text = 'Edit2'
      OnKeyPress = Edit2KeyPress
    end
    object BitBtn3: TBitBtn
      Left = 255
      Top = 39
      Width = 91
      Height = 25
      Caption = #25628'    '#32034
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 4
      OnClick = BitBtn3Click
    end
  end
  object GroupBox2: TGroupBox
    Left = 408
    Top = 84
    Width = 103
    Height = 121
    Caption = #25628#32034#21040#35760#24405#25968
    TabOrder = 3
    object Edit4: TEdit
      Left = 6
      Top = 57
      Width = 85
      Height = 21
      TabOrder = 0
      Text = 'Edit4'
    end
  end
  object DataSource1: TDataSource
    DataSet = ADOTable1
    OnDataChange = DataSource1DataChange
    Left = 444
    Top = 21
  end
  object ADOTable1: TADOTable
    Connection = main.ADOConnection1
    TableDirect = True
    TableName = #23398#31821#20449#24687
    Left = 417
    Top = 21
  end
  object ADOQuery1: TADOQuery
    Connection = main.ADOConnection1
    Parameters = <>
    Left = 474
    Top = 21
  end
  object ADOQuery2: TADOQuery
    Connection = main.ADOConnection1
    Parameters = <>
    Left = 474
    Top = 51
  end
  object ADOQuery3: TADOQuery
    Connection = main.ADOConnection1
    DataSource = DataSource1
    Parameters = <>
    Left = 444
    Top = 51
  end
end