ucustomer.dfm

ＤＥＬＰＨＩ开发的寝室管理系统

object frmcustomer: Tfrmcustomer
  Left = 251
  Top = 141
  Width = 706
  Height = 470
  Caption = #26469#35775#35760#24405
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 321
    Top = 0
    Width = 377
    Height = 436
    Align = alClient
    TabOrder = 0
    object GroupBox1: TGroupBox
      Left = 1
      Top = 1
      Width = 375
      Height = 240
      Align = alTop
      Caption = #26469#35775#30331#35760
      TabOrder = 0
      object Label7: TLabel
        Left = 16
        Top = 32
        Width = 65
        Height = 13
        AutoSize = False
        Caption = #35775#38382#32534#21495
      end
      object Label8: TLabel
        Left = 16
        Top = 64
        Width = 57
        Height = 13
        AutoSize = False
        Caption = #35775#38382#26102#38388
      end
      object Label9: TLabel
        Left = 16
        Top = 96
        Width = 57
        Height = 13
        AutoSize = False
        Caption = #35775#38382#20154#21592
      end
      object Label10: TLabel
        Left = 16
        Top = 128
        Width = 68
        Height = 13
        AutoSize = False
        Caption = #31649#29702#21592#32534#21495
      end
      object Label11: TLabel
        Left = 16
        Top = 160
        Width = 65
        Height = 13
        AutoSize = False
        Caption = #31163#24320#26102#38388
      end
      object Edit2: TEdit
        Left = 136
        Top = 32
        Width = 121
        Height = 21
        TabOrder = 0
      end
      object Edit3: TEdit
        Left = 136
        Top = 64
        Width = 121
        Height = 21
        TabOrder = 1
      end
      object Edit4: TEdit
        Left = 136
        Top = 96
        Width = 121
        Height = 21
        TabOrder = 2
      end
      object Edit5: TEdit
        Left = 136
        Top = 128
        Width = 121
        Height = 21
        TabOrder = 3
      end
      object Edit6: TEdit
        Left = 136
        Top = 160
        Width = 121
        Height = 21
        TabOrder = 4
      end
      object Button3: TButton
        Left = 16
        Top = 192
        Width = 75
        Height = 33
        Caption = #28155#21152
        TabOrder = 5
        OnClick = Button3Click
      end
    end
    object DBGrid2: TDBGrid
      Left = 1
      Top = 241
      Width = 375
      Height = 194
      Align = alClient
      DataSource = DataSource2
      TabOrder = 1
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 0
    Width = 321
    Height = 436
    Align = alLeft
    TabOrder = 1
    object DBGrid1: TDBGrid
      Left = 1
      Top = 241
      Width = 319
      Height = 194
      Align = alClient
      DataSource = DataSource1
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
    end
    object GroupBox2: TGroupBox
      Left = 1
      Top = 1
      Width = 319
      Height = 240
      Align = alTop
      Caption = #26597#35810#26469#35775#20449#24687
      TabOrder = 1
      object Label6: TLabel
        Left = 16
        Top = 48
        Width = 65
        Height = 13
        AutoSize = False
        Caption = #35775#38382#32534#21495
      end
      object Button1: TButton
        Left = 16
        Top = 192
        Width = 75
        Height = 33
        Caption = #30830#23450
        TabOrder = 0
        OnClick = Button1Click
      end
      object Button2: TButton
        Left = 176
        Top = 192
        Width = 75
        Height = 33
        Caption = #36820#22238
        TabOrder = 1
        OnClick = Button2Click
      end
      object Edit1: TEdit
        Left = 136
        Top = 48
        Width = 121
        Height = 21
        TabOrder = 2
      end
    end
  end
  object DataSource1: TDataSource
    DataSet = ADOQuery1
    Left = 112
    Top = 312
  end
  object ADOQuery1: TADOQuery
    Active = True
    Connection = ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from visiting')
    Left = 72
    Top = 304
  end
  object ADOConnection1: TADOConnection
    Connected = True
    ConnectionString = 
      'Provider=MSDASQL.1;Persist Security Info=False;Data Source=SD-MI' +
      'S'
    LoginPrompt = False
    Left = 40
    Top = 304
  end
  object DataSource2: TDataSource
    DataSet = ADOQuery2
    Left = 440
    Top = 296
  end
  object ADOQuery2: TADOQuery
    Active = True
    Connection = ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from visiting')
    Left = 496
    Top = 304
  end
end