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

📄 kcgl_frm_form1.~dfm

📁 这是我们班实习的时候做的一个宠物医院管理系统。sql数据库
💻 ~DFM
📖 第 1 页 / 共 3 页
字号:
            Width = 60
            Height = 13
            Caption = #35746#36135#25968#37327#65306
          end
          object Label26: TLabel
            Left = 10
            Top = 81
            Width = 60
            Height = 13
            Caption = #35746#36135#36153#29992#65306
          end
          object Label27: TLabel
            Left = 207
            Top = 68
            Width = 42
            Height = 13
            Caption = #20803'(RMB)'
          end
          object DBEdit6: TDBEdit
            Left = 76
            Top = 50
            Width = 121
            Height = 21
            TabOrder = 0
          end
          object DBEdit7: TDBEdit
            Left = 77
            Top = 80
            Width = 121
            Height = 21
            TabOrder = 1
          end
          object DBComboBox1: TDBComboBox
            Left = 76
            Top = 18
            Width = 145
            Height = 21
            ItemHeight = 13
            TabOrder = 2
          end
        end
        object DBComboBox2: TDBComboBox
          Left = 104
          Top = 4
          Width = 129
          Height = 21
          ItemHeight = 13
          TabOrder = 4
        end
      end
      object TabSheet4: TTabSheet
        Caption = #22260#26639
        ImageIndex = 3
        object Label30: TLabel
          Left = 36
          Top = 13
          Width = 48
          Height = 13
          Caption = #35786#25152#21517#65306
        end
        object GroupBox6: TGroupBox
          Left = 0
          Top = 300
          Width = 337
          Height = 132
          Caption = #25805#20316
          TabOrder = 0
          object Button10: TButton
            Left = 60
            Top = 44
            Width = 75
            Height = 25
            Caption = #28155'  '#21152
            TabOrder = 0
          end
          object Button11: TButton
            Left = 61
            Top = 84
            Width = 75
            Height = 25
            Caption = #21024'  '#38500
            TabOrder = 1
          end
          object Button12: TButton
            Left = 162
            Top = 84
            Width = 75
            Height = 25
            Caption = #21462'  '#28040
            TabOrder = 2
          end
          object Button13: TButton
            Left = 162
            Top = 44
            Width = 75
            Height = 25
            Caption = #20462'  '#25913
            TabOrder = 3
          end
        end
        object GroupBox7: TGroupBox
          Left = 0
          Top = 38
          Width = 337
          Height = 177
          Caption = #35814#32454#20449#24687
          TabOrder = 1
          object Label21: TLabel
            Left = 37
            Top = 24
            Width = 48
            Height = 13
            Caption = #22260#26639#21495#65306
          end
          object Label22: TLabel
            Left = 39
            Top = 60
            Width = 39
            Height = 13
            Caption = #23481' '#37327#65306
          end
          object Label23: TLabel
            Left = 36
            Top = 91
            Width = 39
            Height = 13
            Caption = #29366' '#24577#65306
          end
          object DBEdit3: TDBEdit
            Left = 95
            Top = 24
            Width = 121
            Height = 21
            DataField = 'FenceId'
            DataSource = DataSource2
            TabOrder = 0
          end
          object DBEdit5: TDBEdit
            Left = 93
            Top = 57
            Width = 121
            Height = 21
            DataField = 'FenceVolumn'
            DataSource = DataSource2
            TabOrder = 1
          end
          object DBComboBox5: TDBComboBox
            Left = 90
            Top = 88
            Width = 145
            Height = 21
            DataField = 'FenceState'
            DataSource = DataSource2
            ItemHeight = 13
            Items.Strings = (
              'true'
              'false')
            TabOrder = 2
          end
          object CheckBox3: TCheckBox
            Left = 232
            Top = 25
            Width = 97
            Height = 17
            Caption = #37324#38754#23456#29289#20449#24687
            TabOrder = 3
          end
        end
        object GroupBox9: TGroupBox
          Left = -8
          Top = 528
          Width = 801
          Height = 1
          TabOrder = 2
        end
        object GroupBox10: TGroupBox
          Left = 350
          Top = 13
          Width = 443
          Height = 433
          Caption = #22260#26639#20449#24687
          TabOrder = 3
          object DBGrid5: TDBGrid
            Left = 7
            Top = 15
            Width = 338
            Height = 218
            DataSource = DataSource2
            TabOrder = 0
            TitleFont.Charset = DEFAULT_CHARSET
            TitleFont.Color = clWindowText
            TitleFont.Height = -11
            TitleFont.Name = 'MS Sans Serif'
            TitleFont.Style = []
            Columns = <
              item
                Expanded = False
                FieldName = 'FenceId'
                Title.Caption = #22260#26639#21495
                Width = 75
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'FenceVolumn'
                Title.Caption = #23481#37327
                Width = 66
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'FenceState'
                Title.Caption = #29366#24577
                Width = 150
                Visible = True
              end>
          end
          object GroupBox16: TGroupBox
            Left = 8
            Top = 238
            Width = 441
            Height = 193
            Caption = #22260#26639#37324#23456#29289#32641#30041#20449#24687
            TabOrder = 1
            object DBGrid7: TDBGrid
              Left = 0
              Top = 15
              Width = 337
              Height = 175
              TabOrder = 0
              TitleFont.Charset = DEFAULT_CHARSET
              TitleFont.Color = clWindowText
              TitleFont.Height = -11
              TitleFont.Name = 'MS Sans Serif'
              TitleFont.Style = []
              Columns = <
                item
                  Expanded = False
                  Title.Caption = #22260#26639#21495
                  Width = 62
                  Visible = True
                end
                item
                  Expanded = False
                  Title.Caption = #23456#29289#21495
                  Width = 110
                  Visible = True
                end
                item
                  Expanded = False
                  Title.Caption = #36827#20837#26085#26399
                  Width = 132
                  Visible = True
                end
                item
                  Expanded = False
                  Title.Caption = #31163#24320#26085#26399
                  Visible = True
                end>
            end
          end
          object DBNavigator2: TDBNavigator
            Left = 184
            Top = 192
            Width = 220
            Height = 25
            DataSource = DataSource2
            VisibleButtons = [nbInsert, nbDelete, nbPost, nbCancel]
            TabOrder = 2
            Visible = False
          end
        end
        object GroupBox15: TGroupBox
          Left = 0
          Top = 155
          Width = 337
          Height = 145
          TabOrder = 4
          object Label3: TLabel
            Left = 28
            Top = 26
            Width = 48
            Height = 13
            Caption = #23456#29289#21495#65306
          end
          object Label20: TLabel
            Left = 21
            Top = 57
            Width = 60
            Height = 13
            Caption = #36827#20837#26085#26399#65306
          end
          object Label24: TLabel
            Left = 21
            Top = 91
            Width = 60
            Height = 13
            Caption = #31163#24320#26085#26399#65306
          end
          object DateTimePicker1: TDateTimePicker
            Left = 96
            Top = 52
            Width = 129
            Height = 21
            CalAlignment = dtaLeft
            Date = 0.372197986107494
            Time = 0.372197986107494
            DateFormat = dfShort
            DateMode = dmComboBox
            Kind = dtkDate
            ParseInput = False
            TabOrder = 0
          end
          object DateTimePicker2: TDateTimePicker
            Left = 94
            Top = 89
            Width = 137
            Height = 21
            CalAlignment = dtaLeft
            Date = 38229.3722413889
            Time = 38229.3722413889
            DateFormat = dfShort
            DateMode = dmComboBox
            Kind = dtkDate
            ParseInput = False
            TabOrder = 1
          end
          object DBEdit8: TDBEdit
            Left = 96
            Top = 25
            Width = 121
            Height = 21
            TabOrder = 2
          end
        end
        object DBComboBox3: TDBComboBox
          Left = 97
          Top = 10
          Width = 129
          Height = 21
          ItemHeight = 13
          TabOrder = 5
          OnChange = DBComboBox3Change
        end
      end
    end
    object KCGL_frm_DBNavigator1: TDBNavigator
      Left = 472
      Top = 8
      Width = 220
      Height = 25
      DataSource = KCGL_frm_ds1
      VisibleButtons = [nbInsert, nbDelete, nbEdit, nbPost, nbCancel]
      TabOrder = 1
      Visible = False
    end
  end
  object KCGL_frm_adoConn1: TADOConnection
    Connected = True
    ConnectionString = 
      'Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security In' +
      'fo=False;Initial Catalog=pethospital;Data Source=.'
    LoginPrompt = False
    Provider = 'SQLOLEDB.1'
    Left = 272
  end
  object KCGL_frm_adoQuery1: TADOQuery
    Connection = KCGL_frm_adoConn1
    Parameters = <
      item
        Name = 'id'
        Size = -1
        Value = Null
      end>
    Left = 312
  end
  object KCGL_frm_ds1: TDataSource
    DataSet = KCGL_frm_adoQuery1
    Left = 360
  end
  object KCGL_frm_ds2: TDataSource
    DataSet = KCGL_frm_adoQuery2
    Left = 416
  end
  object KCGL_frm_adoQuery2: TADOQuery
    Connection = KCGL_frm_adoConn1
    Parameters = <>
    Left = 464
  end
  object KCGL_frm_adoQuery3: TADOQuery
    Connection = KCGL_frm_adoConn1
    Parameters = <>
    Left = 520
  end
  object KCGL_frm_adoQuery4: TADOQuery
    Connection = KCGL_frm_adoConn1
    Parameters = <>
    Left = 568
  end
  object KCGL_frm_ds3: TDataSource
    DataSet = KCGL_frm_adoQuery4
    Left = 608
  end
  object ADOQuery1: TADOQuery
    Connection = KCGL_frm_adoConn1
    Parameters = <>
    Left = 432
    Top = 136
  end
  object DataSource1: TDataSource
    DataSet = ADOQuery1
    Left = 480
    Top = 136
  end
  object ADOQuery2: TADOQuery
    Connection = KCGL_frm_adoConn1
    Parameters = <>
    Left = 432
    Top = 216
  end
  object DataSource2: TDataSource
    DataSet = ADOQuery2
    Left = 488
    Top = 216
  end
end

⌨️ 快捷键说明

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