inoutform.dfm

基本的物业管理系统

object FrmInout: TFrmInout
  Left = 269
  Top = 133
  BorderStyle = bsToolWindow
  Caption = #20986#20837#31649#29702
  ClientHeight = 424
  ClientWidth = 592
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 593
    Height = 425
    Caption = 'Panel1'
    TabOrder = 0
    object PageControl1: TPageControl
      Left = 0
      Top = 0
      Width = 593
      Height = 425
      ActivePage = TabSheet2
      TabOrder = 0
      OnChange = PageControl1Change
      object TabSheet1: TTabSheet
        Caption = #28155#21152#32426#24405
        object Label9: TLabel
          Left = 328
          Top = 184
          Width = 6
          Height = 29
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -24
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object GroupBox1: TGroupBox
          Left = 8
          Top = 48
          Width = 281
          Height = 129
          Caption = #20154
          TabOrder = 0
          object Label1: TLabel
            Left = 24
            Top = 48
            Width = 72
            Height = 13
            Caption = #26469#35775#20154#22995#21517#65306
          end
          object Label2: TLabel
            Left = 24
            Top = 72
            Width = 96
            Height = 13
            Caption = #26469#35775#20154#35777#20214#21495#30721#65306
          end
          object Label5: TLabel
            Left = 24
            Top = 96
            Width = 48
            Height = 13
            Caption = #26469#25214#35841#65306
          end
          object Label7: TLabel
            Left = 24
            Top = 24
            Width = 36
            Height = 13
            Caption = #32534#21495#65306
          end
          object Edit1: TEdit
            Left = 136
            Top = 40
            Width = 121
            Height = 21
            ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
            TabOrder = 0
          end
          object Edit2: TEdit
            Left = 136
            Top = 64
            Width = 121
            Height = 21
            ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
            TabOrder = 1
          end
          object Edit5: TEdit
            Left = 136
            Top = 88
            Width = 121
            Height = 21
            ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
            TabOrder = 2
          end
          object Edit6: TEdit
            Left = 136
            Top = 16
            Width = 121
            Height = 21
            ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
            TabOrder = 3
          end
        end
        object GroupBox2: TGroupBox
          Left = 296
          Top = 48
          Width = 281
          Height = 129
          Caption = #36710
          TabOrder = 1
          object Label3: TLabel
            Left = 24
            Top = 48
            Width = 84
            Height = 13
            Caption = #26469#35775#36710#29260#29031#21495#65306
          end
          object Label4: TLabel
            Left = 24
            Top = 72
            Width = 48
            Height = 13
            Caption = #26469#25214#35841#65306
          end
          object Label8: TLabel
            Left = 24
            Top = 24
            Width = 36
            Height = 13
            Caption = #32534#21495#65306
          end
          object Edit3: TEdit
            Left = 136
            Top = 40
            Width = 121
            Height = 21
            ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
            TabOrder = 0
          end
          object Edit4: TEdit
            Left = 136
            Top = 64
            Width = 121
            Height = 21
            ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
            TabOrder = 1
          end
          object Edit7: TEdit
            Left = 136
            Top = 16
            Width = 121
            Height = 21
            ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
            TabOrder = 2
          end
        end
        object GroupBox3: TGroupBox
          Left = 8
          Top = 0
          Width = 281
          Height = 49
          Caption = #25511#21046
          TabOrder = 2
          object RadioButton1: TRadioButton
            Left = 48
            Top = 16
            Width = 41
            Height = 25
            Caption = #20154
            Checked = True
            TabOrder = 0
            TabStop = True
            OnClick = RadioButton1Click
          end
          object RadioButton2: TRadioButton
            Left = 192
            Top = 16
            Width = 41
            Height = 25
            Caption = #36710
            TabOrder = 1
            OnClick = RadioButton2Click
          end
        end
        object GroupBox4: TGroupBox
          Left = 296
          Top = 0
          Width = 281
          Height = 49
          TabOrder = 3
          object Label6: TLabel
            Left = 88
            Top = 24
            Width = 101
            Height = 13
            Caption = #36827#20986'/'#20837#22823#38376#32534#21495#65306
          end
          object ComboBox1: TComboBox
            Left = 192
            Top = 16
            Width = 65
            Height = 21
            ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
            ItemHeight = 13
            TabOrder = 0
            Text = '1'
            Items.Strings = (
              '1'
              '2'
              '3'
              '4'
              '5'
              '6')
          end
          object RadioButton3: TRadioButton
            Left = 24
            Top = 8
            Width = 41
            Height = 25
            Caption = #20986
            TabOrder = 1
            OnClick = RadioButton3Click
          end
          object RadioButton4: TRadioButton
            Left = 24
            Top = 24
            Width = 41
            Height = 25
            Caption = #20837
            Checked = True
            TabOrder = 2
            TabStop = True
            OnClick = RadioButton4Click
          end
        end
        object DBGrid1: TDBGrid
          Left = 8
          Top = 216
          Width = 569
          Height = 177
          DataSource = Data.DataSInOut
          ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
          TabOrder = 4
          TitleFont.Charset = DEFAULT_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -11
          TitleFont.Name = 'MS Sans Serif'
          TitleFont.Style = []
          Columns = <
            item
              Expanded = False
              FieldName = 'ID'
              Width = 30
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'Name'
              Width = 60
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'IDCardNo'
              Width = 110
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'CarNo'
              Width = 68
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'FindWho'
              Width = 60
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'InTime'
              Width = 87
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'OutTime'
              Width = 79
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'InDoorNo'
              Width = 49
              Visible = True
            end>
        end
        object btAdd: TButton
          Left = 112
          Top = 184
          Width = 75
          Height = 25
          Caption = #28155#21152'/'#20462#25913
          TabOrder = 5
          OnClick = btAddClick
        end
      end
      object TabSheet2: TTabSheet
        Caption = #32426#24405#26597#35810
        ImageIndex = 1
        object btSearch: TButton
          Left = 400
          Top = 48
          Width = 89
          Height = 25
          Caption = #26597#35810
          TabOrder = 0
          OnClick = btSearchClick
        end
        object Memo1: TMemo
          Left = 0
          Top = 0
          Width = 313
          Height = 113
          ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
          Lines.Strings = (
            'select * from InOut where')
          TabOrder = 1
        end
        object DBGrid2: TDBGrid
          Left = 0
          Top = 120
          Width = 585
          Height = 281
          DataSource = Data.DataSInOut
          ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
          TabOrder = 2
          TitleFont.Charset = DEFAULT_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -11
          TitleFont.Name = 'MS Sans Serif'
          TitleFont.Style = []
          Columns = <
            item
              Expanded = False
              FieldName = 'ID'
              Width = 30
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'Name'
              Width = 60
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'IDCardNo'
              Width = 110
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'CarNo'
              Width = 68
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'FindWho'
              Width = 60
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'InTime'
              Width = 87
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'OutTime'
              Width = 79
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'InDoorNo'
              Width = 49
              Visible = True
            end>
        end
      end
    end
  end
  object Timer1: TTimer
    OnTimer = Timer1Timer
    Left = 4
    Top = 392
  end
end