📄 unit6.~dfm

📁 数据库编程人事档案管理
💻 ~DFM
字号:
object Form6: TForm6
  Left = 181
  Top = 248
  Width = 544
  Height = 375
  Caption = 'Form6'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 184
    Top = 32
    Width = 145
    Height = 20
    AutoSize = False
    Caption = #36890#29992#20154#20107#26723#26696#31649#29702
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label2: TLabel
    Left = 24
    Top = 80
    Width = 32
    Height = 20
    AutoSize = False
    Caption = #32534#21495
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label3: TLabel
    Left = 248
    Top = 80
    Width = 32
    Height = 20
    AutoSize = False
    Caption = #22995#21517
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label4: TLabel
    Left = 24
    Top = 112
    Width = 32
    Height = 20
    AutoSize = False
    Caption = #24615#21035
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label5: TLabel
    Left = 24
    Top = 144
    Width = 32
    Height = 20
    AutoSize = False
    Caption = #27665#26063
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label6: TLabel
    Left = 24
    Top = 176
    Width = 64
    Height = 20
    AutoSize = False
    Caption = #25919#27835#38754#35980
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label7: TLabel
    Left = 24
    Top = 208
    Width = 64
    Height = 20
    AutoSize = False
    Caption = #20986#29983#26085#26399
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label8: TLabel
    Left = 24
    Top = 240
    Width = 64
    Height = 20
    AutoSize = False
    Caption = #36523#20221#35777#21495
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Panel1: TPanel
    Left = 288
    Top = 120
    Width = 225
    Height = 209
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    object Button1: TButton
      Left = 16
      Top = 16
      Width = 75
      Height = 25
      Caption = #31532#19968#20010
      TabOrder = 0
      OnClick = Button1Click
    end
    object Button2: TButton
      Left = 16
      Top = 64
      Width = 75
      Height = 25
      Caption = #21069#19968#20010
      TabOrder = 1
      OnClick = Button2Click
    end
    object Button3: TButton
      Left = 16
      Top = 112
      Width = 75
      Height = 25
      Caption = #21518#19968#20010
      TabOrder = 2
      OnClick = Button3Click
    end
    object Button4: TButton
      Left = 16
      Top = 152
      Width = 75
      Height = 25
      Caption = #26368#21518#19968#20010
      TabOrder = 3
      OnClick = Button4Click
    end
    object Button5: TButton
      Left = 120
      Top = 16
      Width = 75
      Height = 25
      Caption = #26032#22686
      TabOrder = 4
      OnClick = Button5Click
    end
    object Button6: TButton
      Left = 120
      Top = 64
      Width = 75
      Height = 25
      Caption = #20462#25913
      TabOrder = 5
      OnClick = Button6Click
    end
    object Button7: TButton
      Left = 120
      Top = 112
      Width = 75
      Height = 25
      Caption = #21024#38500
      TabOrder = 6
      OnClick = Button7Click
    end
    object Button8: TButton
      Left = 120
      Top = 152
      Width = 75
      Height = 25
      Caption = #36864#20986
      TabOrder = 7
      OnClick = Button8Click
    end
  end
  object DBbh: TDBEdit
    Left = 104
    Top = 80
    Width = 121
    Height = 28
    DataField = 'Id'
    DataSource = DataSource1
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 1
  end
  object DBxm: TDBEdit
    Left = 296
    Top = 72
    Width = 121
    Height = 28
    DataField = 'Name'
    DataSource = DataSource1
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 2
  end
  object DBxb: TDBComboBox
    Left = 104
    Top = 112
    Width = 145
    Height = 28
    DataField = 'Sex'
    DataSource = DataSource1
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ItemHeight = 20
    Items.Strings = (
      #30007
      #22899)
    ParentFont = False
    TabOrder = 3
  end
  object DBnation: TDBLookupComboBox
    Left = 104
    Top = 144
    Width = 145
    Height = 28
    DataField = 'Nation'
    DataSource = DataSource1
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    KeyField = 'Nation_id'
    ListField = 'Nation'
    ListSource = DataSource2
    ParentFont = False
    TabOrder = 4
  end
  object Dbparty: TDBLookupComboBox
    Left = 104
    Top = 176
    Width = 145
    Height = 28
    DataField = 'Party'
    DataSource = DataSource1
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    KeyField = 'Party_id'
    ListField = 'Party'
    ListSource = DataSource3
    ParentFont = False
    TabOrder = 5
  end
  object DBbirthday: TDBEdit
    Left = 104
    Top = 208
    Width = 121
    Height = 28
    DataField = 'Birthday'
    DataSource = DataSource1
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 6
  end
  object DBind: TDBEdit
    Left = 104
    Top = 240
    Width = 121
    Height = 28
    DataField = 'Indebtity'
    DataSource = DataSource1
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 7
  end
  object Table1: TTable
    DatabaseName = 'rsgl'
    TableName = 'basicinfo.DB'
    Left = 384
    Top = 8
  end
  object Table2: TTable
    DatabaseName = 'rsgl'
    TableName = 'nation.db'
    Left = 424
    Top = 16
  end
  object Table3: TTable
    DatabaseName = 'rsgl'
    TableName = 'party.db'
    Left = 464
    Top = 16
  end
  object DataSource1: TDataSource
    DataSet = Table1
    Left = 384
    Top = 40
  end
  object DataSource2: TDataSource
    DataSet = Table2
    Left = 432
    Top = 56
  end
  object DataSource3: TDataSource
    DataSet = Table3
    Left = 472
    Top = 56
  end
end
⌨️ 快捷键说明

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