shoufeiset.dfm

电力行业前台收费程序,需要有后台SQL数据库,和电费管理系统配合应用.

object FormSetup: TFormSetup
  Left = 232
  Top = 161
  BorderStyle = bsDialog
  Caption = #25910#36153#35774#32622
  ClientHeight = 313
  ClientWidth = 368
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 12
  object Bevel1: TBevel
    Left = 8
    Top = 257
    Width = 354
    Height = 5
    Shape = bsTopLine
    Style = bsRaised
  end
  object Label1: TLabel
    Left = 8
    Top = 104
    Width = 102
    Height = 12
    Caption = #21457#31080#26684#24335#25991#20214#35774#32622':'
  end
  object SpeedButtonPath: TSpeedButton
    Left = 313
    Top = 132
    Width = 48
    Height = 21
    Caption = #28155#21152
    Flat = True
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000130B0000130B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      33333333FF33333333FF333993333333300033377F3333333777333993333333
      300033F77FFF3333377739999993333333333777777F3333333F399999933333
      33003777777333333377333993333333330033377F3333333377333993333333
      3333333773333333333F333333333333330033333333F33333773333333C3333
      330033333337FF3333773333333CC333333333FFFFF77FFF3FF33CCCCCCCCCC3
      993337777777777F77F33CCCCCCCCCC3993337777777777377333333333CC333
      333333333337733333FF3333333C333330003333333733333777333333333333
      3000333333333333377733333333333333333333333333333333}
    NumGlyphs = 2
    ParentFont = False
    OnClick = SpeedButtonPathClick
  end
  object SpeedButtonYJPath: TSpeedButton
    Left = 339
    Top = 69
    Width = 22
    Height = 21
    Caption = '...'
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
    OnClick = SpeedButtonYJPathClick
  end
  object SpeedButtonDel: TSpeedButton
    Left = 313
    Top = 163
    Width = 48
    Height = 21
    Caption = #21024#38500
    Flat = True
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000130B0000130B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      333333333333333333FF33333333333330003333333333333777333333333333
      300033FFFFFF3333377739999993333333333777777F3333333F399999933333
      3300377777733333337733333333333333003333333333333377333333333333
      3333333333333333333F333333333333330033333F33333333773333C3333333
      330033337F3333333377333CC3333333333333F77FFFFFFF3FF33CCCCCCCCCC3
      993337777777777F77F33CCCCCCCCCC399333777777777737733333CC3333333
      333333377F33333333FF3333C333333330003333733333333777333333333333
      3000333333333333377733333333333333333333333333333333}
    NumGlyphs = 2
    ParentFont = False
    OnClick = SpeedButtonDelClick
  end
  object SpeedButtonEdit: TSpeedButton
    Left = 313
    Top = 194
    Width = 48
    Height = 21
    Caption = #20462#25913
    Flat = True
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000120B0000120B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000
      000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F
      00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF
      F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B
      0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F
      FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF
      FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F
      0FF03333737F37737F373330B00FFFFF0F033337F77F33337F733309030FFFFF
      00333377737FFFFF773333303300000003333337337777777333}
    NumGlyphs = 2
    ParentFont = False
    OnClick = SpeedButtonEditClick
  end
  object ButtonOK: TButton
    Left = 112
    Top = 268
    Width = 74
    Height = 23
    Caption = #30830#23450
    Default = True
    TabOrder = 1
    OnClick = ButtonOKClick
  end
  object ButtonCancel: TButton
    Left = 200
    Top = 268
    Width = 74
    Height = 23
    Cancel = True
    Caption = #21462#28040
    ModalResult = 2
    TabOrder = 2
  end
  object ButtonAdv: TButton
    Left = 288
    Top = 268
    Width = 74
    Height = 23
    Caption = #39640#32423'...'
    TabOrder = 3
    OnClick = ButtonAdvClick
  end
  object CheckBoxFC: TCheckBox
    Left = 8
    Top = 34
    Width = 73
    Height = 17
    Caption = #20998#27425#25910#36153
    Checked = True
    State = cbChecked
    TabOrder = 0
  end
  object CheckBoxYJ: TCheckBox
    Left = 8
    Top = 71
    Width = 73
    Height = 17
    Caption = #20801#35768#39044#20132
    TabOrder = 4
    OnClick = CheckBoxYJClick
  end
  object EditYJReport: TEdit
    Left = 104
    Top = 69
    Width = 235
    Height = 20
    TabOrder = 5
  end
  object CheckBoxZHNJ: TCheckBox
    Left = 104
    Top = 34
    Width = 89
    Height = 17
    Caption = #25351#23450#28382#32435#37329
    TabOrder = 6
  end
  object ListViewFP: TListView
    Left = 8
    Top = 120
    Width = 297
    Height = 129
    Columns = <
      item
        Caption = #21457#31080#21517#31216
        Width = 100
      end
      item
        Caption = #26684#24335#25991#20214#20301#32622
        Width = 180
      end>
    ReadOnly = True
    RowSelect = True
    TabOrder = 7
    ViewStyle = vsReport
  end
  object CheckBoxJEQZ: TCheckBox
    Left = 213
    Top = 34
    Width = 116
    Height = 17
    Caption = #37329#39069#21462#25972','#21462#25972#21040':'
    TabOrder = 8
    OnClick = CheckBoxJEQZClick
  end
  object ComboBoxQZ: TComboBox
    Left = 327
    Top = 32
    Width = 36
    Height = 20
    Style = csDropDownList
    ItemHeight = 12
    ItemIndex = 1
    TabOrder = 9
    Text = #35282
    Items.Strings = (
      #20803
      #35282)
  end
  object CheckBoxDP: TCheckBox
    Left = 8
    Top = 3
    Width = 129
    Height = 17
    Caption = #21333#26465#25910#36153#30452#25509#39044#35272
    TabOrder = 10
  end
  object CheckBoxVD: TCheckBox
    Left = 213
    Top = 3
    Width = 100
    Height = 17
    Caption = #26174#31034#26126#32454#39033#30446
    TabOrder = 11
  end
  object OpenDialog: TOpenDialog
    Filter = #25253#34920#25991#20214'|*.ept'
    Options = [ofPathMustExist, ofFileMustExist, ofEnableSizing]
    Left = 336
    Top = 98
  end
end