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

📄 petinfo.~dfm

📁 这是我们班实习的时候做的一个宠物医院管理系统。sql数据库
💻 ~DFM
📖 第 1 页 / 共 2 页
字号:
object frmPetinfo: TfrmPetinfo
  Left = 174
  Top = 79
  BorderStyle = bsDialog
  Caption = #23456#29289#20449#24687#31649#29702
  ClientHeight = 327
  ClientWidth = 619
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object PageControl1: TPageControl
    Left = 0
    Top = 0
    Width = 619
    Height = 327
    ActivePage = frmPetinfo_zcq_TabSheet1
    Align = alClient
    TabIndex = 0
    TabOrder = 0
    object frmPetinfo_zcq_TabSheet1: TTabSheet
      Caption = #23456#29289#22522#26412#20449#24687#26597#35810
      object Panel1: TPanel
        Left = 0
        Top = 0
        Width = 265
        Height = 299
        Align = alLeft
        Caption = 'Panel1'
        TabOrder = 0
        object GroupBox1: TGroupBox
          Left = 1
          Top = 1
          Width = 263
          Height = 297
          Align = alClient
          Caption = #26465#20214#26597#35810
          TabOrder = 0
          object Petinfo_xxcx_sh: TSpeedButton
            Left = 16
            Top = 199
            Width = 73
            Height = 25
            Caption = #26597#35810'>>'
            OnClick = Petinfo_xxcx_shClick
          end
          object Petinfo_xxcx_del: TSpeedButton
            Left = 123
            Top = 199
            Width = 78
            Height = 26
            Caption = #21024#38500'>>'
            OnClick = Petinfo_xxcx_delClick
          end
          object SpeedButton3: TSpeedButton
            Left = 16
            Top = 248
            Width = 73
            Height = 25
            Caption = #20462#25913'>>'
            OnClick = SpeedButton3Click
          end
          object SpeedButton4: TSpeedButton
            Left = 128
            Top = 248
            Width = 73
            Height = 25
            Caption = #36820#22238'<<'
            OnClick = SpeedButton4Click
          end
          object Petinfo_CheckBox1: TCheckBox
            Left = 16
            Top = 24
            Width = 97
            Height = 17
            Caption = #23456#29289#21495#30721
            TabOrder = 0
            OnClick = Petinfo_CheckBox1Click
          end
          object Petinfo_CheckBox2: TCheckBox
            Left = 16
            Top = 54
            Width = 97
            Height = 17
            Caption = #23456#29289#21517#31216
            TabOrder = 1
            OnClick = Petinfo_CheckBox2Click
          end
          object Petinfo_CheckBox3: TCheckBox
            Left = 16
            Top = 84
            Width = 97
            Height = 17
            Caption = #23456#29289#31181#31867
            TabOrder = 2
          end
          object Petinfo_CheckBox4: TCheckBox
            Left = 16
            Top = 114
            Width = 97
            Height = 17
            Caption = #23456#29289#29366#24577
            TabOrder = 3
          end
          object Petinfo_CheckBox5: TCheckBox
            Left = 16
            Top = 144
            Width = 97
            Height = 17
            Caption = #27880#20876#26085#26399
            TabOrder = 4
          end
          object frmPetinfo_Petinfo_DateTimePicker1: TDateTimePicker
            Left = 104
            Top = 144
            Width = 121
            Height = 21
            CalAlignment = dtaLeft
            Date = 38229.8238064236
            Time = 38229.8238064236
            DateFormat = dfShort
            DateMode = dmComboBox
            Kind = dtkDate
            ParseInput = False
            TabOrder = 5
          end
          object frmPetinfo_DBEdit1: TEdit
            Left = 104
            Top = 24
            Width = 121
            Height = 21
            TabOrder = 6
          end
          object frmPetinfo_DBEdit2: TEdit
            Left = 104
            Top = 54
            Width = 121
            Height = 21
            TabOrder = 7
          end
          object frmPetinfo_DBComboBox1: TComboBox
            Left = 104
            Top = 84
            Width = 121
            Height = 21
            ItemHeight = 13
            TabOrder = 8
            Items.Strings = (
              #29399
              #29483
              #40736
              #40479
              #29275
              #39532)
          end
          object frmPetinfo_DBComboBox2: TComboBox
            Left = 104
            Top = 114
            Width = 121
            Height = 21
            ItemHeight = 13
            TabOrder = 9
            Items.Strings = (
              ''
              '')
          end
        end
      end
      object Panel2: TPanel
        Left = 265
        Top = 0
        Width = 346
        Height = 299
        Align = alClient
        Caption = 'Panel2'
        TabOrder = 1
        object GroupBox2: TGroupBox
          Left = 1
          Top = 1
          Width = 344
          Height = 297
          Align = alClient
          Caption = #26597#35810#32467#26524
          TabOrder = 0
          object DBGrid1: TDBGrid
            Left = 2
            Top = 15
            Width = 340
            Height = 280
            Align = alClient
            DataSource = DataSource1
            TabOrder = 0
            TitleFont.Charset = DEFAULT_CHARSET
            TitleFont.Color = clWindowText
            TitleFont.Height = -11
            TitleFont.Name = 'MS Sans Serif'
            TitleFont.Style = []
            Columns = <
              item
                Expanded = False
                FieldName = 'PetId'
                Title.Caption = #23456#29289#21495#30721
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'PetName'
                Title.Caption = #23456#29289#21517#31216
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'PetType'
                Title.Caption = #23456#29289#31181#31867
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'PetState'
                Title.Caption = #23456#29289#29366#24577
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'RegisterDate'
                Title.Caption = #27880#20876#26085#26399
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'PetBirth'
                Title.Caption = #20986#29983#26085#26399
                Visible = True
              end>
          end
        end
      end
    end
    object Petinfo_TabSheet2: TTabSheet
      Caption = #23456#29289#20449#24687#20462#25913
      ImageIndex = 1
      object Panel3: TPanel
        Left = 0
        Top = 0
        Width = 611
        Height = 299
        Align = alClient
        Caption = 'Panel3'
        TabOrder = 0
        object GroupBox3: TGroupBox
          Left = 1
          Top = 1
          Width = 609
          Height = 297
          Align = alClient
          Caption = #23456#29289#20449#24687#20462#25913
          TabOrder = 0
          object Label1: TLabel
            Left = 48
            Top = 27
            Width = 57
            Height = 13
            Caption = #23456#29289#21495#30721'   '
          end
          object Label2: TLabel
            Left = 48
            Top = 68
            Width = 57
            Height = 13
            Caption = #23456#29289#21517#31216'   '
          end
          object Label3: TLabel
            Left = 48
            Top = 109
            Width = 57
            Height = 13
            Caption = #23456#29289#31181#31867'   '
          end
          object Label4: TLabel
            Left = 48
            Top = 151
            Width = 57
            Height = 13
            Caption = #35786#25152#21495#30721'   '
          end
          object Label5: TLabel
            Left = 48
            Top = 192
            Width = 57
            Height = 13
            Caption = #20986#29983#26085#26399'   '
          end
          object Label6: TLabel
            Left = 48
            Top = 234
            Width = 57
            Height = 13
            Caption = #23456#29289#29366#24577'   '
          end
          object Label7: TLabel
            Left = 264
            Top = 32
            Width = 66
            Height = 13
            Caption = #27880#20876#26085#26399'      '
          end
          object Label8: TLabel
            Left = 264
            Top = 72
            Width = 66
            Height = 13
            Caption = #39038#23458#21495#30721'      '
          end
          object Label9: TLabel
            Left = 264
            Top = 112
            Width = 66
            Height = 13
            Caption = #23456#29289#25551#36848'      '
          end
          object Petinfo_xxxg_ok: TSpeedButton
            Left = 272
            Top = 208
            Width = 73
            Height = 25
            Caption = #30830#23450'>>'
            OnClick = Petinfo_xxtj_okClick
          end
          object Petinfo_xxxg_cl: TSpeedButton
            Left = 385
            Top = 208
            Width = 72
            Height = 25
            Caption = #21462#28040'>>'
            OnClick = Petinfo_xxxg_clClick
          end
          object Petinfo_xxxg_bk: TSpeedButton
            Left = 480
            Top = 208
            Width = 65
            Height = 25
            Caption = #36820#22238'>>'
            OnClick = Petinfo_xxxg_bkClick
          end
          object Petinfo_Edit3: TEdit
            Left = 120
            Top = 24
            Width = 121
            Height = 21
            TabOrder = 0
            OnChange = Petinfo_Edit3Change
          end
          object Petinfo_Edit4: TEdit
            Left = 120
            Top = 65
            Width = 121
            Height = 21
            TabOrder = 1
            OnChange = Petinfo_Edit3Change
          end
          object Petinfo_Edit6: TEdit
            Left = 120
            Top = 147
            Width = 121
            Height = 21
            TabOrder = 2
            OnChange = Petinfo_Edit3Change
          end
          object Petinfo_Edit7: TEdit
            Left = 120
            Top = 230
            Width = 121
            Height = 21
            TabOrder = 3
            OnChange = Petinfo_Edit3Change
          end
          object Petinfo_Edit8: TEdit
            Left = 328
            Top = 72
            Width = 121
            Height = 21
            TabOrder = 4
            OnChange = Petinfo_Edit3Change
          end
          object Petinfo_Edit9: TEdit
            Left = 328
            Top = 112
            Width = 121
            Height = 21
            TabOrder = 5
            OnChange = Petinfo_Edit3Change
          end
          object Petinfo_Edit5: TEdit
            Left = 120
            Top = 106
            Width = 121
            Height = 21
            TabOrder = 6
            OnChange = Petinfo_Edit3Change
          end
          object Petinfo_DateTimePicker2: TDateTimePicker
            Left = 120
            Top = 188
            Width = 121
            Height = 21
            CalAlignment = dtaLeft
            Date = 38230.4574321759
            Time = 38230.4574321759
            DateFormat = dfShort
            DateMode = dmComboBox
            Kind = dtkDate
            ParseInput = False
            TabOrder = 7
          end
          object Petinfo_DateTimePicker3: TDateTimePicker
            Left = 328
            Top = 32
            Width = 121
            Height = 21
            CalAlignment = dtaLeft
            Date = 38230.4580188426
            Time = 38230.4580188426
            DateFormat = dfShort
            DateMode = dmComboBox
            Kind = dtkDate
            ParseInput = False
            TabOrder = 8
          end
        end
      end
    end
    object Petinfo_TabSheet3: TTabSheet
      Caption = #23456#29289#20449#24687#28155#21152
      ImageIndex = 2
      object GroupBox4: TGroupBox
        Left = 0
        Top = 0
        Width = 611

⌨️ 快捷键说明

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