updateoil.dfm

管理车队用车记录

      OnClick = BitBtn1Click
      Glyph.Data = {
        42020000424D4202000000000000420000002800000010000000100000000100
        1000030000000002000000000000000000000000000000000000007C0000E003
        00001F000000FF7FFF7FFF7FFF7FFF7F7A6F6E0CB2149214CE18FF7FFF7FFF7F
        FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F5A6BD8183D251E251321FE7FFF7FFF7F
        FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F5A6FB6141B211C211321FF7FFF7FFF7F
        FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F5A6FB6141B211C21131DFF7FFF7FFF7F
        FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F7A6FB6141B211C21131DFF7FFF7FFF7F
        FF7FFF7FFF7FFF7FFE7FFF7FFF7FFF7FB873B7143C211C211221FE7FFF7FFF7F
        FF7FFE7FFF7FCE1813211321131D131D1221F91C1B211B21F61C1221131D131D
        13211321CE18B3141E251C211C211C211C211B211B211B211B211C211C211C21
        1C211E259314B2143D251B211B211B211C211B211B211B211B211C211B211B21
        1B213D25B2146E0CD818B614B614B614D7181B211B211B21F920B714B614B614
        B614D8186E0C7A6F5A6B5A6F5A6F7A6FF55ED7181B211C211221B8737A6F5A6F
        5A6F5A6B7A6FFF7FFF7FFF7FFF7FFF7F7A6FB6141B211C21131DFF7FFF7FFF7F
        FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F5A6FB6141B211C21131DFF7FFF7FFF7F
        FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F5A6FB6141B211C211321FF7FFF7FFF7F
        FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F5A6BD8183D251E251321FE7FFF7FFF7F
        FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F7A6F6E0CB214B214CE18FF7FFF7FFF7F
        FF7FFF7FFF7F}
    end
    object ComboBox2: TComboBox
      Left = 360
      Top = 20
      Width = 121
      Height = 24
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBtnText
      Font.Height = -15
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
      ItemHeight = 16
      ParentFont = False
      TabOrder = 1
      OnEnter = ComboBox2Enter
    end
    object ComboBox3: TComboBox
      Left = 104
      Top = 65
      Width = 121
      Height = 24
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBtnText
      Font.Height = -15
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
      ItemHeight = 16
      ParentFont = False
      TabOrder = 2
      OnEnter = ComboBox3Enter
    end
    object BitBtn5: TBitBtn
      Left = 224
      Top = 65
      Width = 25
      Height = 22
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clGrayText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 10
      OnClick = BitBtn5Click
      Glyph.Data = {
        42020000424D4202000000000000420000002800000010000000100000000100
        1000030000000002000000000000000000000000000000000000007C0000E003
        00001F000000FF7FFF7FFF7FFF7FFF7F7A6F6E0CB2149214CE18FF7FFF7FFF7F
        FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F5A6BD8183D251E251321FE7FFF7FFF7F
        FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F5A6FB6141B211C211321FF7FFF7FFF7F
        FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F5A6FB6141B211C21131DFF7FFF7FFF7F
        FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F7A6FB6141B211C21131DFF7FFF7FFF7F
        FF7FFF7FFF7FFF7FFE7FFF7FFF7FFF7FB873B7143C211C211221FE7FFF7FFF7F
        FF7FFE7FFF7FCE1813211321131D131D1221F91C1B211B21F61C1221131D131D
        13211321CE18B3141E251C211C211C211C211B211B211B211B211C211C211C21
        1C211E259314B2143D251B211B211B211C211B211B211B211B211C211B211B21
        1B213D25B2146E0CD818B614B614B614D7181B211B211B21F920B714B614B614
        B614D8186E0C7A6F5A6B5A6F5A6F7A6FF55ED7181B211C211221B8737A6F5A6F
        5A6F5A6B7A6FFF7FFF7FFF7FFF7FFF7F7A6FB6141B211C21131DFF7FFF7FFF7F
        FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F5A6FB6141B211C21131DFF7FFF7FFF7F
        FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F5A6FB6141B211C211321FF7FFF7FFF7F
        FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F5A6BD8183D251E251321FE7FFF7FFF7F
        FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F7A6F6E0CB214B214CE18FF7FFF7FFF7F
        FF7FFF7FFF7F}
    end
    object ComboBox4: TComboBox
      Left = 104
      Top = 113
      Width = 121
      Height = 24
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBtnText
      Font.Height = -15
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
      ItemHeight = 16
      ParentFont = False
      TabOrder = 4
      OnEnter = ComboBox4Enter
    end
    object BitBtn6: TBitBtn
      Left = 224
      Top = 113
      Width = 25
      Height = 22
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clGrayText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 11
      OnClick = BitBtn6Click
      Glyph.Data = {
        42020000424D4202000000000000420000002800000010000000100000000100
        1000030000000002000000000000000000000000000000000000007C0000E003
        00001F000000FF7FFF7FFF7FFF7FFF7F7A6F6E0CB2149214CE18FF7FFF7FFF7F
        FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F5A6BD8183D251E251321FE7FFF7FFF7F
        FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F5A6FB6141B211C211321FF7FFF7FFF7F
        FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F5A6FB6141B211C21131DFF7FFF7FFF7F
        FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F7A6FB6141B211C21131DFF7FFF7FFF7F
        FF7FFF7FFF7FFF7FFE7FFF7FFF7FFF7FB873B7143C211C211221FE7FFF7FFF7F
        FF7FFE7FFF7FCE1813211321131D131D1221F91C1B211B21F61C1221131D131D
        13211321CE18B3141E251C211C211C211C211B211B211B211B211C211C211C21
        1C211E259314B2143D251B211B211B211C211B211B211B211B211C211B211B21
        1B213D25B2146E0CD818B614B614B614D7181B211B211B21F920B714B614B614
        B614D8186E0C7A6F5A6B5A6F5A6F7A6FF55ED7181B211C211221B8737A6F5A6F
        5A6F5A6B7A6FFF7FFF7FFF7FFF7FFF7F7A6FB6141B211C21131DFF7FFF7FFF7F
        FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F5A6FB6141B211C21131DFF7FFF7FFF7F
        FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F5A6FB6141B211C211321FF7FFF7FFF7F
        FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F5A6BD8183D251E251321FE7FFF7FFF7F
        FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F7A6F6E0CB214B214CE18FF7FFF7FFF7F
        FF7FFF7FFF7F}
    end
    object DateTimePicker1: TDateTimePicker
      Left = 360
      Top = 64
      Width = 145
      Height = 21
      Date = 0.484138263891509200
      Time = 0.484138263891509200
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #40657#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 3
    end
    object Edit1: TEdit
      Left = 360
      Top = 113
      Width = 145
      Height = 21
      TabOrder = 7
      OnChange = Edit1Change
      OnKeyPress = Edit1KeyPress
    end
    object Edit2: TEdit
      Left = 104
      Top = 163
      Width = 145
      Height = 21
      TabOrder = 6
      OnChange = Edit2Change
      OnKeyPress = Edit2KeyPress
    end
    object Edit3: TEdit
      Left = 360
      Top = 163
      Width = 145
      Height = 21
      TabOrder = 5
      OnChange = Edit3Change
      OnKeyPress = Edit3KeyPress
    end
    object Edit4: TEdit
      Left = 360
      Top = 144
      Width = 121
      Height = 21
      Enabled = False
      TabOrder = 12
      Visible = False
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 216
    Width = 699
    Height = 259
    Align = alBottom
    TabOrder = 4
    object DBGrid1: TDBGrid
      Left = 1
      Top = 1
      Width = 697
      Height = 257
      Align = alClient
      DataSource = Form_dm.DataSource5
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      OnCellClick = DBGrid1CellClick
      OnTitleClick = DBGrid1TitleClick
      Columns = <
        item
          Alignment = taCenter
          Expanded = False
          FieldName = 'id'
          Title.Alignment = taCenter
          Title.Font.Charset = DEFAULT_CHARSET
          Title.Font.Color = clHighlight
          Title.Font.Height = -13
          Title.Font.Name = 'MS Sans Serif'
          Title.Font.Style = [fsBold]
          Visible = False
        end
        item
          Alignment = taCenter
          Expanded = False
          FieldName = 'car_id'
          Title.Alignment = taCenter
          Title.Caption = #36710#29260#21495
          Title.Font.Charset = DEFAULT_CHARSET
          Title.Font.Color = clHighlight
          Title.Font.Height = -13
          Title.Font.Name = 'MS Sans Serif'
          Title.Font.Style = [fsBold]
          Visible = True
        end
        item
          Alignment = taCenter
          Expanded = False
          FieldName = 'driver_name'
          Title.Alignment = taCenter
          Title.Caption = #39550#39542#21592
          Title.Font.Charset = DEFAULT_CHARSET
          Title.Font.Color = clHighlight
          Title.Font.Height = -13
          Title.Font.Name = 'MS Sans Serif'
          Title.Font.Style = [fsBold]
          Visible = True
        end
        item
          Alignment = taCenter
          Expanded = False
          FieldName = 'date'
          Title.Alignment = taCenter
          Title.Caption = #21152#27833#26085#26399
          Title.Font.Charset = DEFAULT_CHARSET
          Title.Font.Color = clHighlight
          Title.Font.Height = -13
          Title.Font.Name = 'MS Sans Serif'
          Title.Font.Style = [fsBold]
          Visible = True
        end
        item
          Alignment = taCenter
          Expanded = False
          FieldName = 'place'
          Title.Alignment = taCenter
          Title.Caption = #21152#27833#31449
          Title.Font.Charset = DEFAULT_CHARSET
          Title.Font.Color = clHighlight
          Title.Font.Height = -13
          Title.Font.Name = 'MS Sans Serif'
          Title.Font.Style = [fsBold]
          Visible = True
        end
        item
          Alignment = taCenter
          Expanded = False
          FieldName = 'item'
          Title.Alignment = taCenter
          Title.Caption = #27833#31867#22411
          Title.Font.Charset = DEFAULT_CHARSET
          Title.Font.Color = clHighlight
          Title.Font.Height = -13
          Title.Font.Name = 'MS Sans Serif'
          Title.Font.Style = [fsBold]
          Visible = True
        end
        item
          Alignment = taCenter
          Expanded = False
          FieldName = 'price'
          Title.Alignment = taCenter
          Title.Caption = #21333#20215
          Title.Font.Charset = DEFAULT_CHARSET
          Title.Font.Color = clHighlight
          Title.Font.Height = -13
          Title.Font.Name = 'MS Sans Serif'
          Title.Font.Style = [fsBold]
          Visible = True
        end
        item
          Alignment = taCenter
          Expanded = False
          FieldName = 'amount'
          Title.Alignment = taCenter
          Title.Caption = #21319#25968
          Title.Font.Charset = DEFAULT_CHARSET
          Title.Font.Color = clHighlight
          Title.Font.Height = -13
          Title.Font.Name = 'MS Sans Serif'
          Title.Font.Style = [fsBold]
          Visible = True
        end
        item
          Alignment = taCenter
          Expanded = False
          FieldName = 'total'
          Title.Alignment = taCenter
          Title.Caption = #21152#27833#36153#29992
          Title.Font.Charset = DEFAULT_CHARSET
          Title.Font.Color = clHighlight
          Title.Font.Height = -13
          Title.Font.Name = 'MS Sans Serif'
          Title.Font.Style = [fsBold]
          Visible = True
        end>
    end
  end
end