uaccept.dfm

天涯進銷存系統

        FF00FF00FF0000000000FFFFFFBFFFFFFF00FFFFFFBFFFFFFF00FFFFFFBFFFFF
        FF00FFFFFFBFFFFFFF0000000000FF00FF00FF00FF00FF00FF00FF00FF00FF00
        FF00FF00FF00FF00FF00000000BFFFFFFF000000000000000000000000000000
        0000000000BFFFFFFF0000000000FF00FF00FF00FF00FF00FF00FF00FF00FF00
        FF00FF00FF00FF00FF00000000BFFFFFFF00FFFFFFBFFFFFFF00FFFFFFBFFFFF
        FF00FFFFFFBFFFFFFF00FFFFFF0000000000FF00FF00FF00FF00FF00FF00FF00
        FF00FF00FF00FF00FF00FF00FF00000000000000000000000000000000000000
        000000000000000000000000000000000000FF00FF00FF00FF00FF00FF00FF00
        FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
        FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00}
      Style = tbsButton
    end
    object Image2: TImage
      Left = 0
      Top = 2
      Width = 8
      Height = 24
      Align = alLeft
      Center = True
      Picture.Data = {
        07544269746D61704E010000424D4E0100000000000036000000280000000600
        00000E000000010018000000000018010000C40E0000C40E0000000000000000
        0000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C00000C0C0C0C0C0C099999999
        9999999999C0C0C00000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C00000C0C0
        C0C0C0C0999999999999999999C0C0C00000C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C00000C0C0C0C0C0C0999999999999999999C0C0C00000C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C00000C0C0C0C0C0C0999999999999999999C0C0C0
        0000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C00000C0C0C0C0C0C099999999
        9999999999C0C0C00000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C00000C0C0
        C0C0C0C0999999999999999999C0C0C00000C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C00000C0C0C0C0C0C0999999999999999999C0C0C00000}
      Transparent = True
    end
    object Shape22: TShape
      Left = 0
      Top = 1
      Width = 800
      Height = 1
      Align = alTop
      Pen.Color = clWhite
    end
    object Shape23: TShape
      Left = 0
      Top = 0
      Width = 800
      Height = 1
      Align = alTop
      Pen.Color = 14282231
    end
    object Shape24: TShape
      Left = 0
      Top = 27
      Width = 800
      Height = 1
      Align = alBottom
      Pen.Color = 14282231
    end
    object Shape25: TShape
      Left = 0
      Top = 26
      Width = 800
      Height = 1
      Align = alBottom
      Pen.Color = clWhite
    end
    object LBSpeecButton9: TLBSpeecButton
      Left = 344
      Top = 3
      Width = 51
      Height = 22
      Cursor = crHandPoint
      Action = Action5
      Flat = True
      Glyph.Data = {
        36040000424D3604000000000000360000002800000010000000100000000100
        2000000000000004000000000000000000000000000000000000FF00FF000000
        0000000000000000000000000000000000000000000000000000000000000000
        000000000000000000000000000000000000FF00FF00FF00FF00FF00FF000000
        000000FFFFBFFFFFFF0000FFFFBFFFFFFF00800000BFFFFFFF0000FFFFBFFFFF
        FF0000FFFFBFFFFFFF0000FFFF0000000000FF00FF00FF00FF00FF00FF000000
        0000FFFFFF000000000000000080800000008000008080000000000000000000
        000000000000000000000000000000000000FF00FF00FF00FF00FF00FF000000
        000000FFFFBFFFFFFF008000008080000000800000808000000000FFFFBFFFFF
        FF0000FFFFBFFFFFFF0000FFFF0000000000FF00FF00FF00FF00FF00FF000000
        0000FFFFFF808000000080000080800000008000008080000000800000BFFFFF
        FF00FFFFFFBFFFFFFF00FFFFFF0000000000FF00FF00FF00FF00FF00FF000000
        0000800000808000000080000080C0C0C000C0C0C080C0C0C000800000808000
        0000C0C0C080C0C0C000FFFFFF0000000000FF00FF00FF00FF00FF00FF000000
        0000FFFFFF8080000000FFFFFFBFFFFFFF00FFFFFFBFFFFFFF00FFFFFF808000
        0000FFFFFFBFFFFFFF00FFFFFF0000000000FF00FF00FF00FF00FF00FF000000
        0000FFFFFF80C0C0C000C0C0C080C0C0C000C0C0C080C0C0C000C0C0C080C0C0
        C00080000080C0C0C000FFFFFF0000000000FF00FF00FF00FF00FF00FF000000
        0000FFFFFFBFFFFFFF00FFFFFFBFFFFFFF00FFFFFFBFFFFFFF00FFFFFFBFFFFF
        FF00FFFFFF8080000000FFFFFF0000000000FF00FF00FF00FF00FF00FF000000
        0000FFFFFF80C0C0C000C0C0C080C0C0C000C0C0C080C0C0C000C0C0C080C0C0
        C000C0C0C080C0C0C0008000000000000000FF00FF00FF00FF00FF00FF000000
        0000FFFFFFBFFFFFFF00FFFFFFBFFFFFFF00FFFFFFBFFFFFFF00FFFFFFBFFFFF
        FF00FFFFFFBFFFFFFF00FFFFFF8080000000FF00FF00FF00FF00FF00FF000000
        000000FFFFBFFFFFFF0000FFFFBFFFFFFF0000FFFFBFFFFFFF0000FFFFBFFFFF
        FF000000000000000000000000000000000080000000FF00FF00FF00FF000000
        0000FFFFFF000000000000000000000000000000000000000000000000000000
        0000000000BFFFFFFF0000000000FF00FF00FF00FF8080000000FF00FF000000
        000000FFFFBFFFFFFF0000FFFFBFFFFFFF0000FFFFBFFFFFFF0000FFFFBFFFFF
        FF000000000000000000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF000000
        0000000000000000000000000000000000000000000000000000000000000000
        000000000000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
        FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
        FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00}
      Style = tbsButton
    end
    object BillInfoLabel: TLabel
      Left = 781
      Top = 11
      Width = 6
      Height = 12
      Alignment = taRightJustify
      BiDiMode = bdRightToLeft
      Font.Charset = GB2312_CHARSET
      Font.Color = clRed
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentBiDiMode = False
      ParentFont = False
    end
  end
  object BillPanel: TPanel
    Left = 700
    Top = 35
    Width = 91
    Height = 26
    BevelOuter = bvNone
    Color = clWhite
    Enabled = False
    TabOrder = 6
    object BillNextButton: TLBLabel
      Left = 0
      Top = 8
      Width = 57
      Height = 12
      Cursor = crHandPoint
      AutoSize = False
      Caption = #19978#19968#21333
      Font.Charset = GB2312_CHARSET
      Font.Color = clBackground
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      OnClick = BillNextButtonClick
      MouseInColor = 14581072
    end
    object BillPriorButton: TLBLabel
      Left = 53
      Top = 8
      Width = 43
      Height = 12
      Cursor = crHandPoint
      AutoSize = False
      Caption = #19979#19968#21333' '
      Font.Charset = GB2312_CHARSET
      Font.Color = clBackground
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      OnClick = BillPriorButtonClick
      MouseInColor = 14581072
    end
  end
  object DBCtrlGrid: TDBCtrlGrid
    Left = 7
    Top = 112
    Width = 608
    Height = 255
    AllowDelete = False
    AllowInsert = False
    Color = clWhite
    DataSource = BillBodyDs
    PanelBorder = gbNone
    PanelHeight = 17
    PanelWidth = 592
    ParentColor = False
    TabOrder = 7
    RowCount = 15
    object Panel5: TPanel
      Left = 0
      Top = 0
      Width = 592
      Height = 17
      Align = alClient
      BevelOuter = bvNone
      Color = clWhite
      TabOrder = 0
      object Shape9: TShape
        Left = 120
        Top = -1
        Width = 1
        Height = 17
        Brush.Color = 10395294
        Pen.Color = clBackground
      end
      object Shape10: TShape
        Left = 208
        Top = -2
        Width = 1
        Height = 18
        Brush.Color = 10395294
        Pen.Color = clBackground
      end
      object Shape11: TShape
        Left = 305
        Top = -2
        Width = 1
        Height = 18
        Brush.Color = 10395294
        Pen.Color = clBackground
      end
      object Shape12: TShape
        Left = 392
        Top = -2
        Width = 1
        Height = 18
        Brush.Color = 10395294
        Pen.Color = clBackground
      end
      object Shape14: TShape
        Left = 479
        Top = -2
        Width = 1
        Height = 18
        Brush.Color = 10395294
        Pen.Color = clBackground
      end
      object Shape15: TShape
        Left = 564
        Top = -2
        Width = 1
        Height = 18
        Brush.Color = 10395294
        Pen.Color = clBackground
      end
      object Panel6: TPanel
        Left = 0
        Top = 16
        Width = 592
        Height = 1
        Align = alBottom
        BevelOuter = bvNone
        Color = clBackground
        TabOrder = 0
      end
      object PartCodeDBEdit: TDBEdit
        Left = 1
        Top = 2
        Width = 119
        Height = 14
        BorderStyle = bsNone
        Color = clWhite
        DataField = 'PAYBILLCODE'
        DataSource = BillBodyDs
        ImeName = #20013#25991' ('#31616#20307') - '#29579#30721#20116#31508#22411'86'#29256
        ReadOnly = True
        TabOrder = 1
      end
      object PartNameDBEdit: TDBEdit
        Left = 122
        Top = 2
        Width = 84
        Height = 14
        BorderStyle = bsNone
        Color = clWhite
        DataField = 'PAYBILLDATE'
        DataSource = BillBodyDs
        ImeName = #20013#25991' ('#31616#20307') - '#29579#30721#20116#31508#22411'86'#29256
        ReadOnly = True
        TabOrder = 2
      end
      object CarModelDBEdit: TDBEdit
        Left = 210
        Top = 2
        Width = 95
        Height = 14
        BorderStyle = bsNone
        Color = clWhite
        DataField = 'PAYTOTALSUM'
        DataSource = BillBodyDs
        ImeName = #20013#25991' ('#31616#20307') - '#29579#30721#20116#31508#22411'86'#29256
        ReadOnly = True
        TabOrder = 3
      end
      object ProducingDBEdit: TDBEdit
        Left = 306
        Top = 2
        Width = 86
        Height = 14
        BorderStyle = bsNone
        Color = clWhite
        DataField = 'ALREADYPAYSUM'
        DataSource = BillBodyDs
        ImeName = #20013#25991' ('#31616#20307') - '#29579#30721#20116#31508#22411'86'#29256
        ReadOnly = True
        TabOrder = 4
      end
      object DepotPlaceDBEdit: TDBEdit
        Left = 482
        Top = 2
        Width = 81
        Height = 14
        BorderStyle = bsNone
        Color = clWhite
        DataField = 'CURRENTSUM'
        DataSource = BillBodyDs
        ImeName = #20013#25991' ('#31616#20307') - '#29579#30721#20116#31508#22411'86'#29256
        ReadOnly = True
        TabOrder = 5
      end
      object UnitDBEdit: TDBEdit
        Left = 394
        Top = 2
        Width = 85
        Height = 14
        BorderStyle = bsNone
        Color = clWhite
        DataField = 'OUGHTPAYSUM'
        DataSource = BillBodyDs
        ImeName = #20013#25991' ('#31616#20307') - '#29579#30721#20116#31508#22411'86'#29256
        ReadOnly = True
        TabOrder = 6
      end
      object ISPAYSUMCheck: TDBCheckBox
        Left = 571
        Top = 1
        Width = 17
        Height = 15
        DataField = 'ISPAYSUM'
        DataSource = BillBodyDs
        ReadOnly = True
        TabOrder = 7
        ValueChecked = 'True'
        ValueUnchecked = 'False'
      end
    end