huiyuantixing.dfm

健身会馆会员管理,实现了部分财务管理和,报表统计功能

object huiyuantixingfrm: Thuiyuantixingfrm
  Left = 177
  Top = 71
  Width = 492
  Height = 341
  BorderIcons = [biSystemMenu]
  Caption = #28155#21152#20250#21592#25552#37266#20869#23481
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnClose = FormClose
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Label37: TLabel
    Left = 56
    Top = 20
    Width = 156
    Height = 13
    Caption = #35831#36755#20837#20250#21592#21345#21495#25110#20250#21592#22995#21517#65306
  end
  object Label1: TLabel
    Left = 56
    Top = 64
    Width = 63
    Height = 13
    Caption = #20250#21592#21345#21495':    '
    FocusControl = DBEdit1
  end
  object Label2: TLabel
    Left = 232
    Top = 64
    Width = 63
    Height = 13
    Caption = #20250#21592#22995#21517':    '
    FocusControl = DBEdit2
  end
  object Label4: TLabel
    Left = 56
    Top = 144
    Width = 63
    Height = 13
    Caption = #25552#37266#26041#24335':    '
  end
  object Label6: TLabel
    Left = 56
    Top = 104
    Width = 63
    Height = 13
    Caption = #25552#37266#20869#23481':    '
    FocusControl = DBEdit5
  end
  object Label12: TLabel
    Left = 56
    Top = 24
    Width = 60
    Height = 13
    Caption = #25552#37266#29366#24577':   '
  end
  object GroupBox2: TGroupBox
    Left = 56
    Top = 184
    Width = 377
    Height = 73
    Caption = #27599#21608#25552#37266
    TabOrder = 6
    object CheckBox1: TCheckBox
      Left = 16
      Top = 24
      Width = 65
      Height = 17
      Caption = #26143#26399#19968
      TabOrder = 0
    end
    object CheckBox2: TCheckBox
      Left = 104
      Top = 24
      Width = 65
      Height = 17
      Caption = #26143#26399#20108
      TabOrder = 1
    end
    object CheckBox3: TCheckBox
      Left = 192
      Top = 24
      Width = 65
      Height = 17
      Caption = #26143#26399#19977
      TabOrder = 2
    end
    object CheckBox4: TCheckBox
      Left = 280
      Top = 24
      Width = 65
      Height = 17
      Caption = #26143#26399#22235
      TabOrder = 3
    end
    object CheckBox5: TCheckBox
      Left = 16
      Top = 48
      Width = 65
      Height = 17
      Caption = #26143#26399#20116
      TabOrder = 4
    end
    object CheckBox6: TCheckBox
      Left = 104
      Top = 48
      Width = 65
      Height = 17
      Caption = #26143#26399#20845
      TabOrder = 5
    end
    object CheckBox7: TCheckBox
      Left = 192
      Top = 48
      Width = 65
      Height = 17
      Caption = #26143#26399#26085
      TabOrder = 6
    end
  end
  object Edit2: TEdit
    Left = 224
    Top = 16
    Width = 121
    Height = 21
    TabOrder = 0
    OnChange = Edit2Change
  end
  object Button6: TButton
    Left = 360
    Top = 14
    Width = 41
    Height = 25
    Caption = #27983#35272
    TabOrder = 1
  end
  object DBEdit1: TDBEdit
    Left = 120
    Top = 64
    Width = 65
    Height = 21
    BorderStyle = bsNone
    Color = clMenuBar
    DataField = #20250#21592#21345#21495
    DataSource = DataSource2
    TabOrder = 2
  end
  object DBEdit2: TDBEdit
    Left = 296
    Top = 64
    Width = 113
    Height = 21
    BorderStyle = bsNone
    Color = clMenuBar
    DataField = #20250#21592#22995#21517
    DataSource = DataSource2
    TabOrder = 3
  end
  object DBEdit5: TDBEdit
    Left = 128
    Top = 104
    Width = 305
    Height = 21
    DataField = #25552#37266#20869#23481
    DataSource = DataSource1
    TabOrder = 4
  end
  object GroupBox4: TGroupBox
    Left = 56
    Top = 184
    Width = 377
    Height = 73
    Caption = #27599#24180#25552#37266
    TabOrder = 8
    object Label9: TLabel
      Left = 32
      Top = 32
      Width = 33
      Height = 13
      Caption = #27599#24180'   '
    end
    object Label10: TLabel
      Left = 176
      Top = 32
      Width = 75
      Height = 13
      Caption = #21495#25552#37266#20250#21592'     '
    end
    object Label11: TLabel
      Left = 112
      Top = 32
      Width = 21
      Height = 13
      Caption = #26376'   '
    end
    object ComboBox1: TComboBox
      Left = 64
      Top = 32
      Width = 49
      Height = 21
      ItemHeight = 13
      ItemIndex = 0
      TabOrder = 0
      Text = '1'
      Items.Strings = (
        '1'
        '2'
        '3'
        '4'
        '5'
        '6'
        '7'
        '8'
        '9'
        '10'
        '11'
        '12')
    end
    object ComboBox2: TComboBox
      Left = 128
      Top = 32
      Width = 49
      Height = 21
      ItemHeight = 13
      ItemIndex = 0
      TabOrder = 1
      Text = '1'
      Items.Strings = (
        '1'
        '2'
        '3'
        '4'
        '5'
        '6'
        '7'
        '8'
        '9'
        '10'
        '11'
        '12'
        '13'
        '14'
        '15'
        '16'
        '17'
        '18'
        '19'
        '20'
        '21'
        '22'
        '23'
        '24'
        '25'
        '26'
        '27'
        '28'
        '29'
        '30'
        '31')
    end
  end
  object BitBtn1: TBitBtn
    Left = 128
    Top = 272
    Width = 75
    Height = 25
    Caption = #20445#23384
    TabOrder = 9
    OnClick = BitBtn1Click
  end
  object BitBtn2: TBitBtn
    Left = 280
    Top = 272
    Width = 75
    Height = 25
    Caption = #21462#28040
    TabOrder = 10
    OnClick = BitBtn2Click
  end
  object DBEdit3: TDBEdit
    Left = 440
    Top = 200
    Width = 33
    Height = 21
    DataField = #25552#37266#26102#38388
    DataSource = DataSource1
    TabOrder = 11
    Visible = False
    OnChange = DBEdit3Change
  end
  object GroupBox3: TGroupBox
    Left = 56
    Top = 184
    Width = 377
    Height = 73
    Caption = #27599#26376#25552#37266
    TabOrder = 7
    object Label7: TLabel
      Left = 32
      Top = 24
      Width = 33
      Height = 13
      Caption = #27599#26376'   '
    end
    object Label8: TLabel
      Left = 112
      Top = 24
      Width = 75
      Height = 13
      Caption = #21495#25552#37266#20250#21592'     '
    end
    object ComboBox3: TComboBox
      Left = 64
      Top = 24
      Width = 41
      Height = 21
      ItemHeight = 13
      ItemIndex = 0
      TabOrder = 0
      Text = '1'
      Items.Strings = (
        '1'
        '2'
        '3'
        '4'
        '5'
        '6'
        '7'
        '8'
        '9'
        '10'
        '11'
        '12'
        '13'
        '14'
        '15'
        '16'
        '17'
        '18'
        '19'
        '20'
        '21'
        '22'
        '23'
        '24'
        '25'
        '26'
        '27'
        '28'
        '29'
        '30'
        '31')
    end
  end
  object ComboBox4: TComboBox
    Left = 128
    Top = 144
    Width = 89
    Height = 21
    ItemHeight = 13
    ItemIndex = 0
    TabOrder = 12
    Text = #19968#27425#24615
    OnChange = ComboBox4Change
    Items.Strings = (
      #19968#27425#24615
      #27599#21608
      #27599#26376
      #27599#24180)
  end
  object DBEdit4: TDBEdit
    Left = 224
    Top = 136
    Width = 41
    Height = 21
    DataField = #25552#37266#26041#24335
    DataSource = DataSource1
    TabOrder = 13
    Visible = False
  end
  object GroupBox1: TGroupBox
    Left = 56
    Top = 184
    Width = 377
    Height = 73
    Caption = #19968#27425#24615#25552#37266
    TabOrder = 5
    object Label3: TLabel
      Left = 32
      Top = 32
      Width = 60
      Height = 13
      Caption = #25552#37266#26102#38388'    '
    end
    object Label5: TLabel
      Left = 216
      Top = 32
      Width = 72
      Height = 13
      Caption = #26085#25552#37266#20250#21592'    '
    end
    object DateTimePicker1: TDateTimePicker
      Left = 96
      Top = 32
      Width = 113
      Height = 21
      Date = 38848.431599201390000000
      Time = 38848.431599201390000000
      TabOrder = 0
    end
  end
  object DBComboBox1: TDBComboBox
    Left = 128
    Top = 20
    Width = 121
    Height = 21
    DataField = #25552#37266#29366#24577
    DataSource = DataSource1
    ItemHeight = 13
    Items.Strings = (
      #24050#32852#31995
      #26410#32852#31995)
    TabOrder = 14
  end
  object ADOQuery1: TADOQuery
    Connection = MainForm.ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from '#20250#21592#25552#37266#34920#26597#35810)
    Left = 16
  end
  object DataSource1: TDataSource
    DataSet = ADOQuery1
    Left = 16
    Top = 32
  end
  object ADOQuery2: TADOQuery
    Connection = MainForm.ADOConnection1
    Parameters = <>
    SQL.Strings = (
      'select * from '#20250#21592#34920)
    Left = 424
    Top = 40
  end
  object DataSource2: TDataSource
    DataSet = ADOQuery2
    Left = 440
    Top = 24
  end
end