bmfzgzxmtj.dfm

有需要的同仁载回去慢慢研究

object FrmBmFzGzxmTj: TFrmBmFzGzxmTj
  Left = 1
  Top = -8
  BorderStyle = bsDialog
  Caption = #37096#38376'/'#20998#32452#24037#20316#39033#30446#24037#26102#32479#35745
  ClientHeight = 573
  ClientWidth = 792
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -16
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  Position = poMainFormCenter
  OnClose = FormClose
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 16
  object GroupBox5: TGroupBox
    Left = 296
    Top = 8
    Width = 484
    Height = 505
    Caption = #32479#35745#26465#20214
    TabOrder = 0
    object Label5: TLabel
      Left = 22
      Top = 56
      Width = 48
      Height = 16
      Caption = #37096#38376#65306
    end
    object Label19: TLabel
      Left = 238
      Top = 53
      Width = 80
      Height = 16
      Caption = #24037#20316#39033#30446#65306
    end
    object Label1: TLabel
      Left = 22
      Top = 18
      Width = 24
      Height = 16
      Caption = #20174':'
    end
    object Label2: TLabel
      Left = 238
      Top = 18
      Width = 24
      Height = 16
      Caption = #21040':'
    end
    object Label3: TLabel
      Left = 118
      Top = 471
      Width = 112
      Height = 16
      Caption = #37096#38376#24037#26102#21512#35745#65306
    end
    object Label4: TLabel
      Left = 264
      Top = 471
      Width = 8
      Height = 16
      Caption = '0'
      Font.Charset = GB2312_CHARSET
      Font.Color = clRed
      Font.Height = -16
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label6: TLabel
      Left = 22
      Top = 96
      Width = 48
      Height = 16
      Caption = #33539#22260#65306
    end
    object DBGrid2: TDBGrid
      Left = 2
      Top = 128
      Width = 475
      Height = 337
      Color = clInfoBk
      DataSource = DM_GSGL.DSBmFzGzxmTj
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = #23435#20307
      Font.Style = []
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      ParentFont = False
      ReadOnly = True
      TabOrder = 0
      TitleFont.Charset = GB2312_CHARSET
      TitleFont.Color = clNavy
      TitleFont.Height = -16
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
    end
    object CbDept: TComboBox
      Left = 62
      Top = 50
      Width = 168
      Height = 24
      Style = csDropDownList
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      ItemHeight = 16
      TabOrder = 1
      OnChange = CbDeptChange
    end
    object CbGzxm: TComboBox
      Left = 313
      Top = 51
      Width = 141
      Height = 24
      Style = csDropDownList
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      ItemHeight = 16
      TabOrder = 2
    end
    object DTPDate1: TDateTimePicker
      Left = 62
      Top = 16
      Width = 139
      Height = 24
      Date = 37602.553882175900000000
      Time = 37602.553882175900000000
      DateFormat = dfLong
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      TabOrder = 3
    end
    object DTPDate2: TDateTimePicker
      Left = 310
      Top = 16
      Width = 139
      Height = 24
      Date = 37602.553882175900000000
      Time = 37602.553882175900000000
      DateFormat = dfLong
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      TabOrder = 4
    end
    object CheckBox1: TCheckBox
      Left = 249
      Top = 92
      Width = 136
      Height = 16
      Caption = #20840#37096#24037#20316#39033#30446
      TabOrder = 5
    end
    object ComboBox1: TComboBox
      Left = 64
      Top = 88
      Width = 145
      Height = 24
      Style = csDropDownList
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      ItemHeight = 16
      TabOrder = 6
      Items.Strings = (
        #20840#37096
        #22806#21253#24037
        #27491#24335#24037)
    end
  end
  object BtnAppend: TBitBtn
    Left = 374
    Top = 522
    Width = 65
    Height = 41
    Caption = #32479#35745
    TabOrder = 1
    OnClick = BtnAppendClick
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000120B0000120B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      33333FFFFFFFFFFFFFFF000000000000000077777777777777770FFFFFFFFFFF
      FFF07F3FF3FF3FF3FFF70F00F00F00F000F07F773773773777370FFFFFFFFFFF
      FFF07F3FF3FF3FF3FFF70F00F00F00F000F07F773773773777370FFFFFFFFFFF
      FFF07F3FF3FF3FF3FFF70F00F00F00F000F07F773773773777370FFFFFFFFFFF
      FFF07F3FF3FF3FF3FFF70F00F00F00F000F07F773773773777370FFFFFFFFFFF
      FFF07FFFFFFFFFFFFFF70CCCCCCCCCCCCCC07777777777777777088CCCCCCCCC
      C8807FF7777777777FF700000000000000007777777777777777333333333333
      3333333333333333333333333333333333333333333333333333}
    NumGlyphs = 2
  end
  object BtnExit: TBitBtn
    Left = 621
    Top = 522
    Width = 65
    Height = 41
    Caption = #36864#20986
    ModalResult = 1
    TabOrder = 2
    Glyph.Data = {
      06020000424D0602000000000000760000002800000028000000140000000100
      0400000000009001000000000000000000001000000010000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00377777777777
      777777773FFFFFFFFFFFF333333F888888888888F7F7F7888888888888883333
      33888888888888877F7F788888888888888F333FF88844444400888FFF444444
      88888888888333888883333334D5007FFF433333333338F888F3338F33333333
      345D50FFFF4333333333388788F3338F3333333334D5D0FFFF433333333338F8
      78F3338F33333333345D50FEFE4333333333388788F3338F3333333334D5D0FF
      FF433333333338F878F3338F33333333345D50FEFE4333333333388788F3338F
      3333333334D5D0FFFF433333333338F878F3338F33333333345D50FEFE433333
      3333388788F3338F3333333334D5D0EFEF433333333338F878F3338F33333333
      345D50FEFE4333333333388788F3338F3333333334D5D0EFEF433333333338F8
      F8FFFF8F33333333344444444443333333333888888888833333333333333333
      3333333333333333FFFFFF333333333333300000033333333333333888888F33
      333333333330AAAA0333333333333338FFFF8F33333333333330000003333333
      33333338888883333333}
    NumGlyphs = 2
  end
  object TVFZ: TTreeView
    Left = 0
    Top = 0
    Width = 281
    Height = 573
    Align = alLeft
    HideSelection = False
    Indent = 19
    ReadOnly = True
    TabOrder = 3
  end
  object Button1: TButton
    Left = 472
    Top = 520
    Width = 113
    Height = 41
    Caption = #36755#20986#21040'Excel'
    TabOrder = 4
    OnClick = Button1Click
  end
end