gsgszx.dfm

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

object FrmGsZx: TFrmGsZx
  Left = 55
  Top = 55
  BorderStyle = bsDialog
  Caption = #21508#37096#38376#22312#32447#24037#26102#32479#35745
  ClientHeight = 453
  ClientWidth = 632
  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 = 0
    Top = 0
    Width = 632
    Height = 393
    Align = alTop
    Caption = #32479#35745#26465#20214
    TabOrder = 0
    object Label5: TLabel
      Left = 70
      Top = 48
      Width = 48
      Height = 16
      Caption = #37096#38376#65306
    end
    object Label1: TLabel
      Left = 70
      Top = 18
      Width = 24
      Height = 16
      Caption = #20174':'
    end
    object Label2: TLabel
      Left = 342
      Top = 18
      Width = 24
      Height = 16
      Caption = #21040':'
    end
    object Label3: TLabel
      Left = 118
      Top = 368
      Width = 112
      Height = 16
      Caption = #37096#38376#24037#26102#21512#35745#65306
    end
    object Label4: TLabel
      Left = 232
      Top = 368
      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 DBGrid2: TDBGrid
      Left = 3
      Top = 87
      Width = 622
      Height = 274
      Color = clInfoBk
      DataSource = DM_GSGL.DsGsZxTj
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = #23435#20307
      Font.Style = []
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      ParentFont = False
      ReadOnly = True
      TabOrder = 0
      TitleFont.Charset = GB2312_CHARSET
      TitleFont.Color = clNavy
      TitleFont.Height = -16
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
      Columns = <
        item
          Expanded = False
          FieldName = #24037#21495
          Width = 59
          Visible = True
        end
        item
          Expanded = False
          FieldName = #22995#21517
          Visible = True
        end
        item
          Expanded = False
          FieldName = #20154#21592#31867#21035
          Width = 94
          Visible = True
        end
        item
          Expanded = False
          FieldName = #24635#24037#26102
          Visible = True
        end>
    end
    object CbDept: TComboBox
      Left = 118
      Top = 42
      Width = 168
      Height = 24
      Style = csDropDownList
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      ItemHeight = 16
      TabOrder = 1
    end
    object DTPDate1: TDateTimePicker
      Left = 118
      Top = 16
      Width = 168
      Height = 24
      Date = 37602.553882175900000000
      Time = 37602.553882175900000000
      DateFormat = dfLong
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      TabOrder = 2
    end
    object DTPDate2: TDateTimePicker
      Left = 366
      Top = 16
      Width = 139
      Height = 24
      Date = 37602.553882175900000000
      Time = 37602.553882175900000000
      DateFormat = dfLong
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      TabOrder = 3
    end
    object CbZx: TCheckBox
      Left = 344
      Top = 48
      Width = 81
      Height = 17
      Caption = #22312#32447
      TabOrder = 4
    end
    object CheckBox1: TCheckBox
      Left = 416
      Top = 48
      Width = 81
      Height = 17
      Caption = #27491#24335#24037
      Checked = True
      State = cbChecked
      TabOrder = 5
    end
  end
  object BtnAppend: TBitBtn
    Left = 80
    Top = 404
    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 = 464
    Top = 404
    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 Button1: TButton
    Left = 260
    Top = 404
    Width = 121
    Height = 41
    Caption = #36755#20986#21040'Excel'
    TabOrder = 3
    OnClick = Button1Click
  end
end