qt_js.dfm

汽配前台收费,一个具有详细功能的小系统

object frm_qt_js: Tfrm_qt_js
  Left = 28
  Top = 71
  BorderStyle = bsDialog
  Caption = #19994#21153#31649#29702'--'#20462#36710#32467#31639
  ClientHeight = 435
  ClientWidth = 701
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = #23435#20307
  Font.Style = []
  FormStyle = fsStayOnTop
  OldCreateOrder = False
  Position = poScreenCenter
  OnClose = FormClose
  OnDestroy = FormDestroy
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object pe_bh: TPanel
    Left = 0
    Top = 0
    Width = 700
    Height = 36
    BevelInner = bvLowered
    Color = clHighlight
    TabOrder = 0
    object Label1: TLabel
      Left = 19
      Top = 12
      Width = 59
      Height = 13
      Caption = #22996#25176#32534#21495':'
      Font.Charset = GB2312_CHARSET
      Font.Color = clYellow
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object combo_p: TComboBox
      Left = 440
      Top = 8
      Width = 145
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      TabOrder = 0
      Visible = False
    end
    object combo_bh: TComboBox
      Left = 80
      Top = 6
      Width = 310
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      TabOrder = 1
      OnChange = combo_bhChange
      OnKeyPress = ControlKeyPress
    end
  end
  object pe_info: TPanel
    Left = 0
    Top = 96
    Width = 700
    Height = 129
    BevelInner = bvLowered
    TabOrder = 1
    object DBGrid1: TDBGrid
      Left = 5
      Top = 5
      Width = 689
      Height = 119
      DataSource = ds_pj_add
      Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
      ReadOnly = True
      TabOrder = 0
      TitleFont.Charset = GB2312_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -13
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
      Columns = <
        item
          Expanded = False
          FieldName = 'pj_kind'
          Title.Alignment = taCenter
          Title.Caption = #37197#20214#31867#22411
          Width = 111
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'pj_gg'
          Title.Alignment = taCenter
          Title.Caption = #37197#20214#35268#26684
          Width = 109
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'pj_name'
          Title.Alignment = taCenter
          Title.Caption = #37197#20214#21517#31216
          Width = 140
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'pj_sy_sum'
          Title.Alignment = taCenter
          Title.Caption = #20351#29992#25968#37327
          Width = 80
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'pj_unit'
          Title.Alignment = taCenter
          Title.Caption = #21333#20301
          Width = 50
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'pj_dj1'
          Title.Alignment = taCenter
          Title.Caption = #21333#20215#65509
          Width = 90
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'pj_je1'
          Title.Alignment = taCenter
          Title.Caption = #37329#39069#65509
          Visible = True
        end>
    end
  end
  object Panel1: TPanel
    Left = 0
    Top = 225
    Width = 441
    Height = 111
    BevelInner = bvLowered
    TabOrder = 2
    object DBGrid2: TDBGrid
      Left = 5
      Top = 5
      Width = 431
      Height = 100
      DataSource = ds_gs_add
      Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
      ReadOnly = True
      TabOrder = 0
      TitleFont.Charset = GB2312_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -13
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
      Columns = <
        item
          Expanded = False
          FieldName = 'gs_text'
          Title.Alignment = taCenter
          Title.Caption = #24037#26102#20869#23481
          Width = 175
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'gs_sum'
          Title.Alignment = taCenter
          Title.Caption = #24037#26102#25968
          Width = 70
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'gs_dj1'
          Title.Alignment = taCenter
          Title.Caption = #21333#20215#65509
          Width = 80
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'gs_zj1'
          Title.Alignment = taCenter
          Title.Caption = #24635#35745#65509
          Width = 80
          Visible = True
        end>
    end
  end
  object pe_money: TPanel
    Left = 0
    Top = 336
    Width = 700
    Height = 60
    BevelInner = bvLowered
    Enabled = False
    TabOrder = 3
    object Label2: TLabel
      Left = 9
      Top = 10
      Width = 59
      Height = 13
      Caption = #26448#26009#36153'('#21547
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlue
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label4: TLabel
      Left = 103
      Top = 74
      Width = 46
      Height = 13
      Caption = #19977#21253#36153':'
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlue
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      Visible = False
    end
    object Label5: TLabel
      Left = 287
      Top = 10
      Width = 59
      Height = 13
      Caption = #24050#20132#25276#37329':'
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlue
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object lbl_yf: TLabel
      Left = 442
      Top = 10
      Width = 59
      Height = 13
      Caption = #24212#25910#37329#39069':'
      Font.Charset = GB2312_CHARSET
      Font.Color = clRed
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label6: TLabel
      Left = 110
      Top = 10
      Width = 86
      Height = 13
      Caption = '%'#38468#21152#36153')'#12288#12288':'
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlue
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label11: TLabel
      Left = 9
      Top = 34
      Width = 59
      Height = 13
      Caption = #24037#26102#36153'('#21547
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlue
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label3: TLabel
      Left = 110
      Top = 34
      Width = 86
      Height = 13
      Caption = '%'#20302#20540#26131#32791#36153'):'
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlue
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label15: TLabel
      Left = 287
      Top = 34
      Width = 59
      Height = 13
      Caption = #20854#20182#36153#29992':'
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlue
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object txt_clf: TEdit
      Left = 198
      Top = 7
      Width = 79
      Height = 21
      Color = clMenu
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlue
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      TabOrder = 0
    end
    object txt_gsf: TEdit
      Left = 198
      Top = 30
      Width = 79
      Height = 21
      Color = clMenu
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlue
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      TabOrder = 1
    end
    object txt_sbf: TEdit
      Left = 152
      Top = 71
      Width = 79
      Height = 21
      Color = clMenu
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlue
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      TabOrder = 2
      Visible = False
    end
    object txt_yj: TEdit
      Left = 348
      Top = 7
      Width = 79
      Height = 21
      Color = clMenu
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlue
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      TabOrder = 3
    end
    object txt_yf: TEdit
      Left = 502
      Top = 7
      Width = 147
      Height = 21
      Color = clMenu
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlue
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      TabOrder = 4
    end
    object txt_fjf: TEdit
      Left = 348
      Top = 30
      Width = 79
      Height = 21
      Color = clMenu
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlue
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 5
      OnChange = ControlChange
    end
    object txt_h1: TEdit
      Left = 70
      Top = 7
      Width = 35
      Height = 21
      TabOrder = 6
      Text = '17'
      OnChange = ControlChange
      OnKeyPress = ControlKeyPress4
    end
    object txt_h2: TEdit
      Left = 70
      Top = 30
      Width = 35
      Height = 21
      TabOrder = 7
      Text = '0'
      OnChange = ControlChange
      OnKeyPress = ControlKeyPress4
    end
  end
  object pe_op: TPanel
    Left = 0
    Top = 396
    Width = 700
    Height = 38
    BevelInner = bvLowered
    TabOrder = 4
    object cmd_p_qd: TBitBtn
      Tag = 26
      Left = 8
      Top = 6
      Width = 111
      Height = 25
      Caption = #25171#21360#32500#20462#28165#21333
      Enabled = False
      TabOrder = 0
      OnClick = cmd_p_qdClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
        00033FFFFFFFFFFFFFFF0888888888888880777777777777777F088888888888
        8880777777777777777F0000000000000000FFFFFFFFFFFFFFFF0F8F8F8F8F8F
        8F80777777777777777F08F8F8F8F8F8F9F0777777777777777F0F8F8F8F8F8F
        8F807777777777777F7F0000000000000000777777777777777F3330FFFFFFFF
        03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
        03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
        33333337F3FF7F3733333330F08F0F0333333337F7737F7333333330FFFF0033
        33333337FFFF7733333333300000033333333337777773333333}
      NumGlyphs = 2
    end
    object cmd_js: TBitBtn
      Tag = 26
      Left = 582
      Top = 6
      Width = 111
      Height = 25
      Caption = #32500#20462#32467#31639
      Enabled = False
      TabOrder = 1
      OnClick = cmd_jsClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333330000000
        00003333377777777777333330FFFFFFFFF03FF3F7FFFF33FFF7003000000FF0
        00F077F7777773F77737E00FBFBFB0FFFFF07773333FF7FF33F7E0FBFB00000F
        F0F077F333777773F737E0BFBFBFBFB0FFF077F3333FFFF733F7E0FBFB00000F
        F0F077F333777773F737E0BFBFBFBFB0FFF077F33FFFFFF733F7E0FB0000000F
        F0F077FF777777733737000FB0FFFFFFFFF07773F7F333333337333000FFFFFF
        FFF0333777F3FFF33FF7333330F000FF0000333337F777337777333330FFFFFF
        0FF0333337FFFFFF7F37333330CCCCCC0F033333377777777F73333330FFFFFF
        0033333337FFFFFF773333333000000003333333377777777333}
      NumGlyphs = 2
    end
    object txt_zf: TEdit
      Left = 449
      Top = 7
      Width = 94
      Height = 21
      Color = clMenu
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlue
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      TabOrder = 2
      Visible = False
    end
    object cb_clf: TCheckBox
      Left = 136
      Top = 8
      Width = 161
      Height = 17
      Caption = #26448#26009#36153#21253#21547#38468#21152#36153#23383#26679
      Checked = True
      State = cbChecked
      TabOrder = 3
    end
    object cb_print: TCheckBox
      Left = 304
      Top = 8
      Width = 97
      Height = 17
      Caption = #25171#21360#39044#35272
      TabOrder = 4
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 36
    Width = 700
    Height = 60
    BevelInner = bvLowered
    Color = clActiveCaption
    Enabled = False
    TabOrder = 5
    object Label7: TLabel
      Left = 19
      Top = 10
      Width = 59
      Height = 13
      Caption = #30331#35760#26085#26399':'
      Font.Charset = GB2312_CHARSET
      Font.Color = clYellow
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label8: TLabel
      Left = 208
      Top = 10
      Width = 59
      Height = 13
      Caption = #36710#29260#21495#30721':'
      Font.Charset = GB2312_CHARSET