model3_employeemanage.dfm

这是我们班实习的时候做的一个宠物医院管理系统。sql数据库

object Form1_Employeemanage: TForm1_Employeemanage
  Left = 246
  Top = 148
  BorderStyle = bsDialog
  Caption = 'Form1_Employeemanage'
  ClientHeight = 348
  ClientWidth = 536
  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 Panel1_Employeemanage: TPanel
    Left = 0
    Top = 0
    Width = 536
    Height = 348
    Align = alClient
    Caption = 'Panel1_Employeemanage'
    TabOrder = 0
    object PageControl1_Employeemanage: TPageControl
      Left = 1
      Top = 1
      Width = 534
      Height = 346
      ActivePage = TabSheet1
      Align = alClient
      TabIndex = 1
      TabOrder = 0
      object TabSheet1_Employeemanage: TTabSheet
        Caption = #20449#24687#26597#35810
        object GroupBox1_Employeemanage: TGroupBox
          Left = 0
          Top = 0
          Width = 249
          Height = 318
          Align = alLeft
          Caption = #26597#35810#26465#20214
          TabOrder = 0
          object SpeedButton1_Employeemanage: TSpeedButton
            Left = 32
            Top = 248
            Width = 49
            Height = 22
            Caption = #26597#35810
            OnClick = SpeedButton1_EmployeemanageClick
          end
          object SpeedButton2_Employeemanage: TSpeedButton
            Left = 144
            Top = 248
            Width = 49
            Height = 22
            Caption = #36820#22238
            OnClick = SpeedButton2_EmployeemanageClick
          end
          object SpeedButton3_Employeemanage: TSpeedButton
            Left = 32
            Top = 280
            Width = 49
            Height = 22
            Caption = #28165#38500
            OnClick = SpeedButton3_EmployeemanageClick
          end
          object SpeedButton4_Employeemanage: TSpeedButton
            Left = 144
            Top = 280
            Width = 49
            Height = 22
            Caption = #25171#21360
          end
          object CheckBox1_Employeemanage: TCheckBox
            Left = 8
            Top = 24
            Width = 97
            Height = 17
            Caption = #21592#24037#21495
            TabOrder = 0
            OnClick = CheckBox1_EmployeemanageClick
          end
          object CheckBox2_Employeemanage: TCheckBox
            Left = 8
            Top = 56
            Width = 97
            Height = 17
            Caption = #21592#24037#22995#21517
            TabOrder = 1
            OnClick = CheckBox2_EmployeemanageClick
          end
          object CheckBox3_Employeemanage: TCheckBox
            Left = 8
            Top = 88
            Width = 97
            Height = 17
            Caption = #22478#24066
            TabOrder = 2
            OnClick = CheckBox3_EmployeemanageClick
          end
          object CheckBox4_Employeemanage: TCheckBox
            Left = 8
            Top = 120
            Width = 97
            Height = 17
            Caption = #32844#20301
            TabOrder = 3
            OnClick = CheckBox4_EmployeemanageClick
          end
          object CheckBox5_Employeemanage: TCheckBox
            Left = 8
            Top = 152
            Width = 97
            Height = 17
            Caption = #34903#36947
            TabOrder = 4
            OnClick = CheckBox5_EmployeemanageClick
          end
          object CheckBox6_Employeemanage: TCheckBox
            Left = 8
            Top = 184
            Width = 97
            Height = 17
            Caption = #30005#35805#21495#30721
            TabOrder = 5
            OnClick = CheckBox6_EmployeemanageClick
          end
          object Edit1_Employeemanage: TEdit
            Left = 96
            Top = 16
            Width = 121
            Height = 21
            TabOrder = 6
          end
          object Edit2_Employeemanage: TEdit
            Left = 96
            Top = 48
            Width = 121
            Height = 21
            TabOrder = 7
          end
          object Edit3_Employeemanage: TEdit
            Left = 96
            Top = 80
            Width = 121
            Height = 21
            TabOrder = 8
          end
          object Edit4_Employeemanage: TEdit
            Left = 96
            Top = 112
            Width = 121
            Height = 21
            TabOrder = 9
          end
          object Edit5_Employeemanage: TEdit
            Left = 96
            Top = 144
            Width = 121
            Height = 21
            TabOrder = 10
          end
          object Edit6_Employeemanage: TEdit
            Left = 96
            Top = 184
            Width = 121
            Height = 21
            TabOrder = 11
          end
          object CheckBox1: TCheckBox
            Left = 8
            Top = 216
            Width = 97
            Height = 17
            Caption = #35786#25152#21495
            TabOrder = 12
            OnClick = CheckBox1Click
          end
          object ComboBox1: TComboBox
            Left = 96
            Top = 216
            Width = 129
            Height = 21
            ItemHeight = 13
            TabOrder = 13
          end
        end
        object GroupBox2_Employeemanage: TGroupBox
          Left = 249
          Top = 0
          Width = 277
          Height = 318
          Align = alClient
          TabOrder = 1
          object DBGrid1_Employeemanage: TDBGrid
            Left = 2
            Top = 15
            Width = 273
            Height = 301
            Align = alClient
            DataSource = DataSource1_Employeemanage
            TabOrder = 0
            TitleFont.Charset = DEFAULT_CHARSET
            TitleFont.Color = clWindowText
            TitleFont.Height = -11
            TitleFont.Name = 'MS Sans Serif'
            TitleFont.Style = []
            Columns = <
              item
                Expanded = False
                FieldName = 'EmployeeId'
                Title.Caption = #21592#24037#21495
                Title.Font.Charset = DEFAULT_CHARSET
                Title.Font.Color = clMaroon
                Title.Font.Height = -11
                Title.Font.Name = 'MS Sans Serif'
                Title.Font.Style = []
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'EmployeePosition'
                Title.Caption = #21592#24037#32844#20301
                Title.Font.Charset = DEFAULT_CHARSET
                Title.Font.Color = clMaroon
                Title.Font.Height = -11
                Title.Font.Name = 'MS Sans Serif'
                Title.Font.Style = []
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'ClinicId'
                Title.Caption = #35786#25152#21495
                Title.Font.Charset = DEFAULT_CHARSET
                Title.Font.Color = clMaroon
                Title.Font.Height = -11
                Title.Font.Name = 'MS Sans Serif'
                Title.Font.Style = []
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'EmployeePwd'
                Title.Caption = #21592#24037#23494#30721
                Title.Font.Charset = DEFAULT_CHARSET
                Title.Font.Color = clMaroon
                Title.Font.Height = -11
                Title.Font.Name = 'MS Sans Serif'
                Title.Font.Style = []
                Visible = True
              end
              item
                Expanded = False
                FieldName = 'EmployeeName'