gxtjfrm.dfm

来自「本人编写的有关军队营房工作的管理系统」· DFM 代码 · 共 537 行 · 第 1/2 页

object gxtj: Tgxtj
  Left = 246
  Top = 214
  BorderIcons = []
  BorderStyle = bsDialog
  Caption = #28155#21152#26032#31649#32447
  ClientHeight = 259
  ClientWidth = 670
  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 = 670
    Height = 227
    Align = alClient
    BevelInner = bvLowered
    Color = clSkyBlue
    TabOrder = 0
    object Label3: TLabel
      Left = 16
      Top = 16
      Width = 60
      Height = 12
      Caption = #21333#20301#20195#30721#65306
    end
    object Label4: TLabel
      Left = 262
      Top = 16
      Width = 60
      Height = 12
      Caption = #20303#29992#21333#20301#65306
    end
    object Label1: TLabel
      Left = 16
      Top = 62
      Width = 60
      Height = 12
      Caption = #22352' '#33853' '#21495#65306
    end
    object Label2: TLabel
      Left = 262
      Top = 62
      Width = 60
      Height = 12
      Caption = #31649#32447#32534#21495#65306
    end
    object Label5: TLabel
      Left = 471
      Top = 62
      Width = 60
      Height = 12
      Caption = #31649#32447#31867#22411#65306
    end
    object Label6: TLabel
      Left = 16
      Top = 109
      Width = 60
      Height = 12
      Caption = #31649#32447#38271#24230#65306
    end
    object Label7: TLabel
      Left = 262
      Top = 109
      Width = 60
      Height = 12
      Caption = #31649'    '#24452#65306
    end
    object Label8: TLabel
      Left = 471
      Top = 109
      Width = 60
      Height = 12
      Caption = #26448'    '#36136#65306
    end
    object Label9: TLabel
      Left = 16
      Top = 155
      Width = 60
      Height = 12
      Caption = #38138#35774#24180#20221#65306
    end
    object Label10: TLabel
      Left = 262
      Top = 155
      Width = 60
      Height = 12
      Caption = #38138#35774#26041#24335#65306
    end
    object Label11: TLabel
      Left = 471
      Top = 155
      Width = 60
      Height = 12
      Caption = #36136#37327#29366#20917#65306
    end
    object Label12: TLabel
      Left = 16
      Top = 202
      Width = 60
      Height = 12
      Caption = #20445#25252#26041#24335#65306
    end
    object Label13: TLabel
      Left = 262
      Top = 202
      Width = 60
      Height = 12
      Caption = #21464#26356#20381#25454#65306
    end
    object Label14: TLabel
      Left = 224
      Top = 155
      Width = 12
      Height = 12
      Caption = #24180
    end
    object Label15: TLabel
      Left = 224
      Top = 109
      Width = 12
      Height = 12
      Caption = #31859
    end
    object Label16: TLabel
      Left = 424
      Top = 109
      Width = 24
      Height = 12
      Caption = #27627#31859
    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 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 ComboBox1: TComboBox
      Left = 80
      Top = 57
      Width = 161
      Height = 20
      Cursor = crHandPoint
      Style = csDropDownList
      Color = clMoneyGreen
      ItemHeight = 12
      MaxLength = 30
      TabOrder = 2
    end
    object Edit1: TEdit
      Left = 328
      Top = 57
      Width = 121
      Height = 20
      Color = clMoneyGreen
      MaxLength = 20
      TabOrder = 3
    end
    object Edit3: TEdit
      Left = 536
      Top = 57
      Width = 121
      Height = 20
      Color = clMoneyGreen
      ImeMode = imOpen
      ImeName = #20013#25991#20043#26143#26234#33021#29378#25340#8545#26631#20934#29256
      MaxLength = 20
      TabOrder = 4
    end
    object DBNumberEditEh1: TDBNumberEditEh
      Left = 80
      Top = 104
      Width = 137
      Height = 20
      Color = clMoneyGreen
      EditButton.Style = ebsUpDownEh
      EditButton.Visible = True
      EditButtons = <>
      MaxValue = 999999999.000000000000000000
      TabOrder = 5
      Value = 0.000000000000000000
      Visible = True
    end
    object DBNumberEditEh2: TDBNumberEditEh
      Left = 328
      Top = 104
      Width = 89
      Height = 20
      Color = clMoneyGreen
      EditButton.Style = ebsUpDownEh
      EditButton.Visible = True
      EditButtons = <>
      MaxValue = 999999999.000000000000000000
      TabOrder = 6
      Value = 0.000000000000000000
      Visible = True
    end
    object Edit4: TEdit
      Left = 536
      Top = 104
      Width = 121
      Height = 20
      Color = clMoneyGreen
      ImeMode = imOpen
      ImeName = #20013#25991#20043#26143#26234#33021#29378#25340#8545#26631#20934#29256
      MaxLength = 20
      TabOrder = 7
    end
    object DBNumberEditEh3: TDBNumberEditEh
      Left = 80
      Top = 150
      Width = 137