yffdtjfrm.dfm

本人编写的有关军队营房工作的管理系统

object yffdtj: Tyffdtj
  Left = 250
  Top = 179
  BorderIcons = []
  BorderStyle = bsDialog
  Caption = #28155#21152#25151#23627
  ClientHeight = 453
  ClientWidth = 668
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  ShowHint = True
  PixelsPerInch = 96
  TextHeight = 12
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 668
    Height = 421
    Align = alClient
    BevelInner = bvLowered
    Color = clSkyBlue
    TabOrder = 0
    object Label1: TLabel
      Left = 16
      Top = 60
      Width = 60
      Height = 12
      Caption = #22352' '#33853' '#21495#65306
    end
    object Label2: TLabel
      Left = 256
      Top = 60
      Width = 60
      Height = 12
      Caption = #26635'    '#21495#65306
    end
    object Label3: TLabel
      Left = 16
      Top = 16
      Width = 60
      Height = 12
      Caption = #21333#20301#20195#30721#65306
    end
    object Label4: TLabel
      Left = 256
      Top = 16
      Width = 60
      Height = 12
      Caption = #20303#29992#21333#20301#65306
    end
    object Label11: TLabel
      Left = 16
      Top = 239
      Width = 60
      Height = 12
      Caption = #25151#23627#21306#20301#65306
    end
    object Label12: TLabel
      Left = 176
      Top = 239
      Width = 60
      Height = 12
      Caption = #31354#38386#29366#24577#65306
    end
    object Label13: TLabel
      Left = 344
      Top = 283
      Width = 60
      Height = 12
      Caption = #24314#31569#24180#20221#65306
    end
    object Label17: TLabel
      Left = 16
      Top = 283
      Width = 60
      Height = 12
      Caption = #36136#37327#31561#32423#65306
    end
    object Label18: TLabel
      Left = 176
      Top = 283
      Width = 60
      Height = 12
      Caption = #23618'    '#25968#65306
    end
    object Label19: TLabel
      Left = 346
      Top = 239
      Width = 60
      Height = 12
      Caption = #25151#23627#20135#26435#65306
    end
    object Label20: TLabel
      Left = 512
      Top = 239
      Width = 60
      Height = 12
      Caption = #24314#31569#32467#26500#65306
    end
    object Label21: TLabel
      Left = 16
      Top = 392
      Width = 60
      Height = 12
      Caption = #21464#26356#20381#25454#65306
    end
    object Label22: TLabel
      Left = 480
      Top = 60
      Width = 60
      Height = 12
      Caption = #24314#31569#38754#31215#65306
    end
    object Label14: TLabel
      Left = 512
      Top = 283
      Width = 84
      Height = 12
      Caption = #23478#23646#23487#33293#22871#25968#65306
    end
    object Label15: TLabel
      Left = 344
      Top = 341
      Width = 60
      Height = 12
      Caption = #21464#26356#21407#22240#65306
    end
    object Edit2: TEdit
      Left = 328
      Top = 11
      Width = 329
      Height = 20
      Color = clMoneyGreen
      ImeMode = imOpen
      ImeName = #20013#25991#20043#26143#26234#33021#29378#25340#8545#26631#20934#29256
      MaxLength = 50
      ReadOnly = True
      TabOrder = 1
    end
    object Edit3: TEdit
      Left = 328
      Top = 56
      Width = 137
      Height = 20
      Color = clMoneyGreen
      ImeMode = imOpen
      ImeName = #20013#25991#20043#26143#26234#33021#29378#25340#8545#26631#20934#29256
      MaxLength = 6
      TabOrder = 3
    end
    object Edit10: TEdit
      Left = 80
      Top = 279
      Width = 80
      Height = 20
      Color = clMoneyGreen
      ImeMode = imOpen
      ImeName = #20013#25991#20043#26143#26234#33021#29378#25340#8545#26631#20934#29256
      MaxLength = 10
      TabOrder = 13
    end
    object Edit11: TEdit
      Left = 240
      Top = 279
      Width = 80
      Height = 20
      Color = clMoneyGreen
      ImeMode = imOpen
      ImeName = #20013#25991#20043#26143#26234#33021#29378#25340#8545#26631#20934#29256
      MaxLength = 4
      TabOrder = 14
    end
    object GroupBox1: TGroupBox
      Left = 16
      Top = 320
      Width = 305
      Height = 49
      Caption = #33829#25151#35774#26045#29366#20917
      TabOrder = 17
      object CheckBox1: TCheckBox
        Left = 8
        Top = 20
        Width = 33
        Height = 17
        Cursor = crHandPoint
        Caption = #27700
        TabOrder = 0
      end
      object CheckBox2: TCheckBox
        Left = 57
        Top = 20
        Width = 33
        Height = 17
        Cursor = crHandPoint
        Caption = #30005
        TabOrder = 1
      end
      object CheckBox3: TCheckBox
        Left = 107
        Top = 20
        Width = 33
        Height = 17
        Cursor = crHandPoint
        Caption = #26262
        TabOrder = 2
      end
      object CheckBox4: TCheckBox
        Left = 156
        Top = 20
        Width = 33
        Height = 17
        Cursor = crHandPoint
        Caption = #27668
        TabOrder = 3
      end
      object CheckBox5: TCheckBox
        Left = 206
        Top = 20
        Width = 33
        Height = 17
        Cursor = crHandPoint
        Caption = #28040
        TabOrder = 4
      end
      object CheckBox6: TCheckBox
        Left = 256
        Top = 20
        Width = 33
        Height = 17
        Cursor = crHandPoint
        Caption = #21355
        TabOrder = 5
      end
    end
    object Edit14: TEdit
      Left = 411
      Top = 234
      Width = 80
      Height = 20
      Color = clMoneyGreen
      ImeMode = imOpen
      ImeName = #20013#25991#20043#26143#26234#33021#29378#25340#8545#26631#20934#29256
      MaxLength = 10
      TabOrder = 11
    end
    object dxLookupTreeView1: TdxLookupTreeView
      Left = 80
      Top = 11
      Width = 161
      Height = 20
      Cursor = crHandPoint
      Hint = #21333#20987#36873#25321#21333#20301#20195#30721
      CanSelectParents = True
      Color = clMoneyGreen
      Ctl3D = True
      DropDownRows = 12
      DropDownWidth = 180
      ParentColor = False
      ParentCtl3D = False
      TabOrder = 0
      TabStop = True
      TreeViewColor = clMoneyGreen
      TreeViewCursor = crHandPoint
      TreeViewFont.Charset = GB2312_CHARSET
      TreeViewFont.Color = clWindowText
      TreeViewFont.Height = -12
      TreeViewFont.Name = #23435#20307
      TreeViewFont.Style = []
      TreeViewImages = ImageList2
      TreeViewIndent = 19
      TreeViewReadOnly = True
      TreeViewShowButtons = True
      TreeViewShowHint = True
      TreeViewShowLines = True
      TreeViewShowRoot = True
      TreeViewSortType = stNone
      OnCloseUp = dxLookupTreeView1CloseUp
      DisplayField = #21333#20301#21517#31216
      DividedChar = '.'
      ListSource = yfgldata.Ddwqk
      KeyField = #21333#20301#20195#30721
      ListField = #21333#20301#20195#30721
      Options = [trDBConfirmDelete, trCanDBNavigate, trSmartRecordCopy, trCheckHasChildren]
      ParentField = #19978#32423#21333#20301#20195#30721
      TextStyle = tvtsShort
      Alignment = taLeftJustify
    end
    object Edit16: TEdit
      Left = 80
      Top = 388
      Width = 577
      Height = 20
      Color = clMoneyGreen
      ImeMode = imOpen
      ImeName = #20013#25991#20043#26143#26234#33021#29378#25340#8545#26631#20934#29256
      TabOrder = 19
    end
    object ComboBox1: TComboBox
      Left = 80
      Top = 56
      Width = 161
      Height = 20
      Cursor = crHandPoint
      Style = csDropDownList
      Color = clMoneyGreen
      ItemHeight = 12
      MaxLength = 30
      TabOrder = 2
    end
    object GroupBox2: TGroupBox
      Left = 16
      Top = 96
      Width = 313
      Height = 49
      Caption = #29992#36884#19968
      TabOrder = 5
      object Label5: TLabel
        Left = 8
        Top = 23
        Width = 36
        Height = 12
        Caption = #20998#31867#65306
      end
      object Label6: TLabel
        Left = 88
        Top = 23
        Width = 36
        Height = 12
        Caption = #21517#31216#65306
      end
      object Label7: TLabel
        Left = 192
        Top = 23
        Width = 36
        Height = 12
        Caption = #38754#31215#65306
      end
      object ComboBox2: TComboBox
        Left = 46
        Top = 19
        Width = 35
        Height = 20
        Cursor = crHandPoint
        Style = csDropDownList
        Color = clMoneyGreen
        ItemHeight = 12
        TabOrder = 0
        OnChange = ComboBox2Change
        Items.Strings = (
          #21150
          #38598
          #23478
          #20844
          #24211
          #19987
          #25307
          #23427)
      end
      object Edit4: TEdit
        Left = 125
        Top = 19
        Width = 60
        Height = 20
        Color = clMoneyGreen
        ReadOnly = True
        TabOrder = 1
      end
      object DBNumberEditEh4: TDBNumberEditEh
        Left = 229
        Top = 19
        Width = 76
        Height = 20
        Color = clMoneyGreen
        EditButton.Style = ebsUpDownEh
        EditButton.Visible = True
        EditButtons = <>
        MaxValue = 999999999.000000000000000000
        TabOrder = 2
        Value = 0.000000000000000000
        Visible = True
      end
    end
    object GroupBox3: TGroupBox
      Left = 344
      Top = 96
      Width = 313
      Height = 49
      Caption = #29992#36884#20108
      TabOrder = 6
      object Label8: TLabel
        Left = 8
        Top = 23
        Width = 36
        Height = 12
        Caption = #20998#31867#65306
      end
      object Label9: TLabel
        Left = 88
        Top = 23
        Width = 36
        Height = 12
        Caption = #21517#31216#65306
      end
      object Label10: TLabel
        Left = 192
        Top = 23
        Width = 36
        Height = 12
        Caption = #38754#31215#65306
      end
      object ComboBox3: TComboBox
        Left = 46
        Top = 19
        Width = 35
        Height = 20
        Cursor = crHandPoint
        Style = csDropDownList
        Color = clMoneyGreen
        ItemHeight = 12
        TabOrder = 0
        OnChange = ComboBox3Change
        Items.Strings = (
          #21150
          #38598
          #23478
          #20844
          #24211
          #19987
          #25307
          #23427)
      end
      object Edit5: TEdit
        Left = 125
        Top = 19
        Width = 60
        Height = 20
        Color = clMoneyGreen
        ReadOnly = True
        TabOrder = 1
      end
      object DBNumberEditEh5: TDBNumberEditEh