unit11.dfm

用Delphi做一个公寓管理系统

object Form_vist_in: TForm_vist_in
  Left = 253
  Top = 119
  Width = 609
  Height = 497
  BorderIcons = [biSystemMenu, biMinimize]
  Caption = #35775#23458#30331#35760
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 264
    Top = 30
    Width = 75
    Height = 13
    Caption = #26469#35775#20154#22995#21517'     '
  end
  object Label3: TLabel
    Left = 264
    Top = 72
    Width = 57
    Height = 13
    Caption = #25152#23646#20851#31995'   '
  end
  object Label4: TLabel
    Left = 264
    Top = 115
    Width = 63
    Height = 13
    Caption = #26469#35775#26102#38388'     '
  end
  object Label5: TLabel
    Left = 264
    Top = 158
    Width = 63
    Height = 13
    Caption = #20986#27004#26102#38388'     '
  end
  object Label6: TLabel
    Left = 264
    Top = 201
    Width = 54
    Height = 13
    Caption = #20540#29677#20154'      '
  end
  object Label8: TLabel
    Left = 264
    Top = 287
    Width = 33
    Height = 13
    Caption = #22791#27880'   '
  end
  object Label9: TLabel
    Left = 264
    Top = 244
    Width = 36
    Height = 13
    Caption = #35777#20214'    '
  end
  object Edit2: TEdit
    Left = 380
    Top = 22
    Width = 121
    Height = 21
    TabOrder = 0
  end
  object ComboBox1: TComboBox
    Left = 380
    Top = 68
    Width = 110
    Height = 21
    ItemHeight = 13
    ItemIndex = 0
    TabOrder = 1
    Text = #26379#21451
    Items.Strings = (
      #26379#21451
      #21516#23398
      #32769#24072
      #23478#38271
      #20146#25114)
  end
  object Edit3: TEdit
    Left = 380
    Top = 115
    Width = 121
    Height = 21
    Color = clBtnFace
    ReadOnly = True
    TabOrder = 2
  end
  object Edit4: TEdit
    Left = 380
    Top = 162
    Width = 121
    Height = 21
    Color = clBtnFace
    Enabled = False
    TabOrder = 3
  end
  object Memo1: TMemo
    Left = 344
    Top = 310
    Width = 210
    Height = 89
    TabOrder = 4
  end
  object GroupBox1: TGroupBox
    Left = 0
    Top = 0
    Width = 185
    Height = 459
    Align = alLeft
    Caption = #34987#35775#20154#36164#26009
    TabOrder = 5
    object Label2: TLabel
      Left = 9
      Top = 50
      Width = 69
      Height = 13
      Caption = #34987#35775#20154#22995#21517'   '
    end
    object Label7: TLabel
      Left = 9
      Top = 240
      Width = 54
      Height = 13
      Caption = #23517#23460#21495'      '
    end
    object Edit1: TEdit
      Left = 46
      Top = 81
      Width = 121
      Height = 21
      TabOrder = 0
    end
    object Edit5: TEdit
      Left = 48
      Top = 280
      Width = 121
      Height = 21
      TabOrder = 1
    end
    object Button1: TButton
      Left = 104
      Top = 120
      Width = 75
      Height = 25
      Caption = #65294#65294#65294
      Default = True
      TabOrder = 2
      OnClick = Button1Click
    end
  end
  object Button2: TButton
    Left = 376
    Top = 416
    Width = 75
    Height = 25
    Caption = #23436'   '#25104
    Enabled = False
    TabOrder = 6
    OnClick = Button2Click
  end
  object ComboBox3: TComboBox
    Left = 380
    Top = 256
    Width = 145
    Height = 21
    ItemHeight = 13
    ItemIndex = 0
    TabOrder = 7
    Text = #36523#20221#35777
    Items.Strings = (
      #36523#20221#35777
      #23398#29983#35777
      #20891#23448#35777
      #24037#20316#35777)
  end
  object ComboBox2: TEdit
    Left = 380
    Top = 202
    Width = 121
    Height = 21
    Color = clBtnFace
    Enabled = False
    TabOrder = 8
  end
  object Query1: TQuery
    DatabaseName = 'main'
    SQL.Strings = (
      'select * from vist_log')
    Left = 192
    Top = 400
  end
  object Timer1: TTimer
    OnTimer = Timer1Timer
    Left = 536
    Top = 64
  end
end