⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 huiyuanka.dfm

📁 健身会馆会员管理,实现了部分财务管理和,报表统计功能
💻 DFM
字号:
object huiyuankafrm: Thuiyuankafrm
  Left = 217
  Top = 219
  AutoScroll = False
  BorderIcons = [biSystemMenu]
  Caption = #20250#21592#21345#20449#24687
  ClientHeight = 407
  ClientWidth = 919
  Color = clInfoBk
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsStayOnTop
  OldCreateOrder = False
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox1: TGroupBox
    Left = 8
    Top = 16
    Width = 601
    Height = 345
    Caption = #20250#21592#22522#26412#20449#24687
    Color = clMoneyGreen
    ParentColor = False
    TabOrder = 0
    object Label1: TLabel
      Left = 24
      Top = 32
      Width = 71
      Height = 13
      Caption = #20250#21592#21345#21495':    '
      FocusControl = DBEdit1
    end
    object Label3: TLabel
      Left = 260
      Top = 27
      Width = 85
      Height = 13
      Caption = #20250#21592#21345#31867#22411':    '
    end
    object Label4: TLabel
      Left = 260
      Top = 58
      Width = 85
      Height = 13
      Caption = #20250#21592#21345#32423#21035':    '
    end
    object DBEdit1: TDBEdit
      Left = 112
      Top = 0
      Width = 105
      Height = 21
      DataField = #20250#21592#21345#21495
      DataSource = MainForm.DataSource1
      TabOrder = 1
      Visible = False
      OnChange = DBEdit1Change
    end
    object Edit1: TEdit
      Left = 88
      Top = 28
      Width = 129
      Height = 21
      TabOrder = 0
      Text = 'Edit1'
      OnExit = Edit1Exit
      OnKeyPress = Edit1KeyPress
    end
    object DBComboBox2: TDBComboBox
      Left = 336
      Top = 52
      Width = 129
      Height = 21
      DataField = #20250#21592#32423#21035
      DataSource = DataSource1
      ItemHeight = 13
      TabOrder = 2
    end
    object DBComboBox1: TDBComboBox
      Left = 336
      Top = 20
      Width = 129
      Height = 21
      DataField = #20250#21592#21345#31867#22411
      DataSource = MainForm.DataSource1
      ItemHeight = 13
      Items.Strings = (
        #35745#26102#21345
        #35745#27425#21345)
      TabOrder = 3
    end
    object GroupBox2: TGroupBox
      Left = 16
      Top = 88
      Width = 569
      Height = 249
      Caption = #36873#22635#20449#24687
      TabOrder = 4
      object Label8: TLabel
        Left = 16
        Top = 196
        Width = 71
        Height = 13
        Caption = #35777#20214#21495#30721':    '
        FocusControl = DBEdit8
      end
      object Label12: TLabel
        Left = 224
        Top = 192
        Width = 71
        Height = 13
        Caption = #20854#23427#20449#24687':    '
        FocusControl = DBMemo1
      end
      object Label11: TLabel
        Left = 240
        Top = 161
        Width = 47
        Height = 13
        Caption = 'EMAIL:    '
        FocusControl = DBEdit11
      end
      object Label7: TLabel
        Left = 16
        Top = 169
        Width = 71
        Height = 13
        Caption = #35777#20214#31867#22411':    '
        FocusControl = DBEdit7
      end
      object Label14: TLabel
        Left = 16
        Top = 132
        Width = 71
        Height = 13
        Caption = #20986#29983#26085#26399':    '
      end
      object Label13: TLabel
        Left = 40
        Top = 101
        Width = 43
        Height = 13
        Caption = #24615#21035':    '
      end
      object Label2: TLabel
        Left = 16
        Top = 70
        Width = 71
        Height = 13
        Caption = #20250#21592#22995#21517':    '
        FocusControl = DBEdit2
      end
      object Label5: TLabel
        Left = 248
        Top = 40
        Width = 43
        Height = 13
        Caption = #32844#19994':    '
        FocusControl = DBEdit5
      end
      object Label15: TLabel
        Left = 8
        Top = 40
        Width = 84
        Height = 13
        Caption = #20171#32461#20154#21345#21495#65306
        FocusControl = DBEdit3
      end
      object Label6: TLabel
        Left = 248
        Top = 70
        Width = 43
        Height = 13
        Caption = #21333#20301':    '
        FocusControl = DBEdit6
      end
      object Label9: TLabel
        Left = 224
        Top = 100
        Width = 71
        Height = 13
        Caption = #32852#31995#30005#35805':    '
        FocusControl = DBEdit9
      end
      object Label10: TLabel
        Left = 224
        Top = 131
        Width = 71
        Height = 13
        Caption = #32852#31995#22320#22336':    '
        FocusControl = DBEdit10
      end
      object DBEdit8: TDBEdit
        Left = 80
        Top = 188
        Width = 129
        Height = 21
        DataField = #35777#20214#21495#30721
        DataSource = MainForm.DataSource1
        TabOrder = 0
      end
      object DBMemo1: TDBMemo
        Left = 280
        Top = 184
        Width = 281
        Height = 41
        DataField = #20854#23427#20449#24687
        DataSource = MainForm.DataSource1
        TabOrder = 1
      end
      object DBEdit11: TDBEdit
        Left = 280
        Top = 161
        Width = 281
        Height = 21
        DataField = 'EMAIL'
        DataSource = MainForm.DataSource1
        TabOrder = 2
      end
      object DBEdit7: TDBEdit
        Left = 80
        Top = 162
        Width = 129
        Height = 21
        DataField = #35777#20214#31867#22411
        DataSource = MainForm.DataSource1
        TabOrder = 3
      end
      object DBComboBox3: TDBComboBox
        Left = 80
        Top = 99
        Width = 129
        Height = 21
        DataField = #24615#21035
        DataSource = MainForm.DataSource1
        ItemHeight = 13
        Items.Strings = (
          #30007
          #22899)
        TabOrder = 4
      end
      object DBEdit2: TDBEdit
        Left = 80
        Top = 69
        Width = 129
        Height = 21
        DataField = #20250#21592#22995#21517
        DataSource = MainForm.DataSource1
        TabOrder = 5
      end
      object DBEdit5: TDBEdit
        Left = 280
        Top = 40
        Width = 281
        Height = 21
        DataField = #32844#19994
        DataSource = MainForm.DataSource1
        TabOrder = 6
      end
      object DBEdit3: TDBEdit
        Left = 80
        Top = 36
        Width = 129
        Height = 21
        DataField = #20171#32461#20154#21345#21495
        DataSource = MainForm.DataSource1
        TabOrder = 7
      end
      object DBEdit6: TDBEdit
        Left = 280
        Top = 70
        Width = 281
        Height = 21
        DataField = #21333#20301
        DataSource = MainForm.DataSource1
        TabOrder = 8
      end
      object DBEdit9: TDBEdit
        Left = 280
        Top = 100
        Width = 281
        Height = 21
        DataField = #32852#31995#30005#35805
        DataSource = MainForm.DataSource1
        TabOrder = 10
      end
      object DBEdit10: TDBEdit
        Left = 280
        Top = 131
        Width = 281
        Height = 21
        DataField = #32852#31995#22320#22336
        DataSource = MainForm.DataSource1
        TabOrder = 9
      end
      object wwDBDateTimePicker1: TwwDBDateTimePicker
        Left = 80
        Top = 128
        Width = 129
        Height = 21
        CalendarAttributes.Font.Charset = DEFAULT_CHARSET
        CalendarAttributes.Font.Color = clWindowText
        CalendarAttributes.Font.Height = -11
        CalendarAttributes.Font.Name = 'MS Sans Serif'
        CalendarAttributes.Font.Style = []
        DataField = #20986#29983#26085#26399
        DataSource = MainForm.DataSource1
        Epoch = 1950
        ShowButton = True
        TabOrder = 11
      end
    end
  end
  object Button1: TButton
    Left = 328
    Top = 376
    Width = 75
    Height = 25
    Caption = #20445#23384
    TabOrder = 1
    OnClick = Button1Click
  end
  object BitBtn1: TBitBtn
    Left = 688
    Top = 368
    Width = 75
    Height = 25
    Caption = #25293#29031
    TabOrder = 2
    OnClick = BitBtn1Click
  end
  object BitBtn2: TBitBtn
    Left = 792
    Top = 368
    Width = 75
    Height = 25
    Caption = #30001#25991#20214#28155#21152
    TabOrder = 3
    OnClick = BitBtn2Click
  end
  object BitBtn3: TBitBtn
    Left = 504
    Top = 376
    Width = 41
    Height = 25
    Caption = '>>>'
    TabOrder = 4
  end
  object DBImage1: TDBImage
    Left = 624
    Top = 16
    Width = 281
    Height = 345
    DataField = #20250#21592#29031#29255
    DataSource = MainForm.DataSource1
    TabOrder = 5
  end
  object OpenPictureDialog1: TOpenPictureDialog
    Left = 768
    Top = 256
  end
  object ADOQuery0: TADOQuery
    Connection = MainForm.ADOConnection1
    Parameters = <>
    SQL.Strings = (
      'select * from '#32423#21035#20998#31867)
    Left = 512
    Top = 56
  end
  object DataSource1: TDataSource
    DataSet = ADOQuery0
    Left = 560
    Top = 56
  end
end

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -