lldcx.~dfm

来自「应对服装行业的生产成本控制系统」· ~DFM 代码 · 共 968 行 · 第 1/2 页

~DFM
968
字号
      object qsl: TEdit
        Left = 345
        Top = 40
        Width = 83
        Height = 22
        Ctl3D = True
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Times New Roman'
        Font.Style = []
        ParentCtl3D = False
        ParentFont = False
        TabOrder = 31
      end
      object qdj: TEdit
        Left = 488
        Top = 40
        Width = 83
        Height = 21
        Ctl3D = True
        ParentCtl3D = False
        TabOrder = 32
      end
      object Cllr: TCheckBox
        Left = 18
        Top = 71
        Width = 63
        Height = 17
        Caption = #39046#26009
        Color = clSkyBlue
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlue
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentColor = False
        ParentFont = False
        TabOrder = 34
      end
      object qllr: TEdit
        Left = 64
        Top = 71
        Width = 80
        Height = 21
        Ctl3D = True
        ParentCtl3D = False
        TabOrder = 35
      end
    end
    object GroupBox1: TGroupBox
      Left = 2
      Top = 104
      Width = 1015
      Height = 521
      Caption = #39046#26009#35760#24405
      Color = clSkyBlue
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentColor = False
      ParentFont = False
      TabOrder = 1
      object DBGrid5: TDBGrid
        Left = 2
        Top = 15
        Width = 1011
        Height = 504
        Align = alClient
        Color = clWhite
        DataSource = DataModule1.DataSource20
        FixedColor = clWhite
        Options = [dgEditing, dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit, dgMultiSelect]
        ReadOnly = True
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clBlue
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        OnKeyPress = DBGrid5KeyPress
        OnTitleClick = DBGrid5TitleClick
        Columns = <
          item
            Expanded = False
            FieldName = 'lldh'
            Title.Alignment = taCenter
            Title.Caption = #32534#21495
            Title.Color = clMoneyGreen
            Width = 78
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ddh'
            Title.Alignment = taCenter
            Title.Caption = #35746#21333#21495
            Title.Color = clMoneyGreen
            Width = 70
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'rq'
            Title.Alignment = taCenter
            Title.Caption = #26085#26399
            Title.Color = clMoneyGreen
            Width = 87
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'clmc'
            Title.Alignment = taCenter
            Title.Caption = #26448#26009#21517#31216
            Title.Color = clMoneyGreen
            Width = 75
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'clfl'
            Title.Alignment = taCenter
            Title.Caption = #26448#26009#20998#31867
            Title.Color = clMoneyGreen
            Width = 68
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'dw'
            Title.Alignment = taCenter
            Title.Caption = #21333#20301
            Title.Color = clMoneyGreen
            Width = 35
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ggxh'
            Title.Alignment = taCenter
            Title.Caption = #35268#26684#22411#21495
            Title.Color = clMoneyGreen
            Width = 56
            Visible = True
          end
          item
            Alignment = taRightJustify
            Expanded = False
            FieldName = 'ys'
            Title.Alignment = taCenter
            Title.Caption = #39068#33394
            Title.Color = clMoneyGreen
            Width = 48
            Visible = True
          end
          item
            Alignment = taRightJustify
            Expanded = False
            FieldName = 'sl'
            Title.Alignment = taCenter
            Title.Caption = #25968#37327
            Title.Color = clMoneyGreen
            Width = 56
            Visible = True
          end
          item
            Alignment = taRightJustify
            Expanded = False
            FieldName = 'dj'
            Title.Alignment = taCenter
            Title.Caption = #21333#20215
            Title.Color = clMoneyGreen
            Width = 48
            Visible = True
          end
          item
            Alignment = taRightJustify
            Expanded = False
            FieldName = 'je'
            Title.Alignment = taCenter
            Title.Caption = #37329#39069
            Title.Color = clMoneyGreen
            Width = 58
            Visible = True
          end
          item
            Alignment = taRightJustify
            Expanded = False
            FieldName = 'bz'
            Title.Alignment = taCenter
            Title.Caption = #22791#27880
            Title.Color = clMoneyGreen
            Width = 61
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'fb'
            Title.Alignment = taCenter
            Title.Caption = #37096#38376
            Title.Color = clMoneyGreen
            Width = 58
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'fz'
            Title.Alignment = taCenter
            Title.Caption = #20998#32452
            Title.Color = clMoneyGreen
            Width = 58
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'llr'
            Title.Alignment = taCenter
            Title.Caption = #39046#26009#20154
            Title.Color = clMoneyGreen
            Width = 48
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'flr'
            Title.Alignment = taCenter
            Title.Caption = #21457#26009#20154
            Title.Color = clMoneyGreen
            Width = 48
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'zgr'
            Title.Alignment = taCenter
            Title.Caption = #20027#31649#20154
            Title.Color = clMoneyGreen
            Width = 48
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'czy'
            Title.Alignment = taCenter
            Title.Caption = #25805#20316#21592
            Title.Color = clMoneyGreen
            Width = 48
            Visible = True
          end>
      end
    end
  end
  object Pd: TPanel
    Left = 0
    Top = 658
    Width = 1024
    Height = 54
    Align = alBottom
    BevelInner = bvLowered
    BorderStyle = bsSingle
    Color = clWhite
    TabOrder = 1
    object bprint: TBitBtn
      Left = 706
      Top = 9
      Width = 89
      Height = 33
      Caption = #25171'    '#21360
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 0
      OnClick = bprintClick
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        04000000000080000000120B0000120B00001000000010000000000000000084
        840084848400C6C6C6000000FF0000FFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
        FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00333333333333
        3333330000000000033330313131313010330000000000000103013131355531
        0003031313122213010300000000000001100131313131301010300000000003
        0100330666666660301044446000002203033333066666663033444444000002
        2203333333066666633044444444000000003333333333333333}
    end
    object breturn: TBitBtn
      Left = 798
      Top = 9
      Width = 89
      Height = 33
      Caption = #36820'    '#22238
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 1
      OnClick = breturnClick
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        04000000000080000000120B0000120B00001000000010000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF00C0C0C00000FFFF00FF000000C0C0C000FFFF0000FFFFFF00DADADA0ADADA
        DADAADADA00DADADADADDADA0A007ADADADAADA0ADAD707DADADDAD0DADADA07
        DADAADAD0D007DA0ADADDADAD00A70DA0ADAADADAD0DAD0D0DADDADADADADAD0
        0ADAADADADADADA00DADDADADADAD70A0ADAADADADA707AD0DADDADA0007DAD0
        DADAADAD0DADA707ADADDADA0AD7077ADADAADAD00077DADADAD}
    end
    object Bquery: TBitBtn
      Left = 156
      Top = 9
      Width = 89
      Height = 33
      Caption = #26597'    '#35810
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 2
      OnClick = BqueryClick
      Glyph.Data = {
        66010000424D6601000000000000760000002800000014000000140000000100
        040000000000F0000000CE0E0000C40E00001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
        FFFFFFFF0000FFFFFFFFFFFFFFFFFFFF0000FFFFFFF000FFFFF000FF0000FFFF
        FFF080FFFFF080FF0000FFFFFFF0007FFF7000FF0000FFFFFFF00000000000FF
        0000FF0000008000080000FF0000FF0FFFF08000080000FF0000FF0F00F00000
        000000FF0000FF0FFFFF0000F0000FFF0000FF0CCCCCC00CCC00FFFF0000FFFC
        FFFFF00FFF00FFFF0000FFFCF00F00080F00FFFF0000FFFCFFFFFFFFFFCFFFFF
        0000FFFCCCCCCCCCCCCFFFFF0000FFFC8CC8CC8CC8CFFFFF0000FFFCCCCCCCCC
        CCCFFFFF0000FFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFFFFFFFFFF0000FFFF
        FFFFFFFFFFFFFFFF0000}
    end
    object bprintc: TBitBtn
      Left = 614
      Top = 9
      Width = 89
      Height = 33
      Caption = 'EXCEL'#34920
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -9
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 3
      OnClick = bprintcClick
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        04000000000080000000120B0000120B00001000000010000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF00C0C0C00000FFFF00FF000000C0C0C000FFFF0000FFFFFF00DADADADADADA
        DADAADADADAD00000000DADA4ADA0FFFFFF0ADAD44AD0F7777F04444444A0FFF
        FFF0ADAD44AD0F7777F0DADA4ADA0FFFFFF0ADADADAD0F7777F0DA00000A0FFF
        FFF0AD0FFF0D0000000000000F0ADADADADA0FFF0F0DADADADAD0F7F000ADADA
        DADA0F7F00ADADADADAD0FF00ADADADADADA0000ADADADADADAD}
    end
    object Bddhz: TBitBtn
      Left = 247
      Top = 9
      Width = 89
      Height = 33
      Caption = #35746#21333#27719#24635
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 4
      OnClick = BddhzClick
      Glyph.Data = {
        66010000424D6601000000000000760000002800000014000000140000000100
        040000000000F0000000CE0E0000C40E00001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
        FFFFFFFF0000FFFFFFFFFFFFFFFFFFFF0000FFFFFFF000FFFFF000FF0000FFFF
        FFF080FFFFF080FF0000FFFFFFF0007FFF7000FF0000FFFFFFF00000000000FF
        0000FF0000008000080000FF0000FF0FFFF08000080000FF0000FF0F00F00000
        000000FF0000FF0FFFFF0000F0000FFF0000FF0CCCCCC00CCC00FFFF0000FFFC
        FFFFF00FFF00FFFF0000FFFCF00F00080F00FFFF0000FFFCFFFFFFFFFFCFFFFF
        0000FFFCCCCCCCCCCCCFFFFF0000FFFC8CC8CC8CC8CFFFFF0000FFFCCCCCCCCC
        CCCFFFFF0000FFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFFFFFFFFFF0000FFFF
        FFFFFFFFFFFFFFFF0000}
    end
    object Bfbhz: TBitBtn
      Left = 339
      Top = 9
      Width = 89
      Height = 33
      Caption = #20998#37096#27719#24635
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 5
      OnClick = BfbhzClick
      Glyph.Data = {
        66010000424D6601000000000000760000002800000014000000140000000100
        040000000000F0000000CE0E0000C40E00001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
        FFFFFFFF0000FFFFFFFFFFFFFFFFFFFF0000FFFFFFF000FFFFF000FF0000FFFF
        FFF080FFFFF080FF0000FFFFFFF0007FFF7000FF0000FFFFFFF00000000000FF
        0000FF0000008000080000FF0000FF0FFFF08000080000FF0000FF0F00F00000
        000000FF0000FF0FFFFF0000F0000FFF0000FF0CCCCCC00CCC00FFFF0000FFFC
        FFFFF00FFF00FFFF0000FFFCF00F00080F00FFFF0000FFFCFFFFFFFFFFCFFFFF
        0000FFFCCCCCCCCCCCCFFFFF0000FFFC8CC8CC8CC8CFFFFF0000FFFCCCCCCCCC
        CCCFFFFF0000FFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFFFFFFFFFF0000FFFF
        FFFFFFFFFFFFFFFF0000}
    end
    object Bfzhz: TBitBtn
      Left = 431
      Top = 9
      Width = 89
      Height = 33
      Caption = #20998#32452#27719#24635
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 6
      OnClick = BfzhzClick
      Glyph.Data = {
        66010000424D6601000000000000760000002800000014000000140000000100
        040000000000F0000000CE0E0000C40E00001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
        FFFFFFFF0000FFFFFFFFFFFFFFFFFFFF0000FFFFFFF000FFFFF000FF0000FFFF
        FFF080FFFFF080FF0000FFFFFFF0007FFF7000FF0000FFFFFFF00000000000FF
        0000FF0000008000080000FF0000FF0FFFF08000080000FF0000FF0F00F00000
        000000FF0000FF0FFFFF0000F0000FFF0000FF0CCCCCC00CCC00FFFF0000FFFC
        FFFFF00FFF00FFFF0000FFFCF00F00080F00FFFF0000FFFCFFFFFFFFFFCFFFFF
        0000FFFCCCCCCCCCCCCFFFFF0000FFFC8CC8CC8CC8CFFFFF0000FFFCCCCCCCCC
        CCCFFFFF0000FFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFFFFFFFFFF0000FFFF
        FFFFFFFFFFFFFFFF0000}
    end
    object Bllrhz: TBitBtn
      Left = 522
      Top = 9
      Width = 89
      Height = 33
      Caption = #39046#26009#20154#27719#24635
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 7
      OnClick = BllrhzClick
      Glyph.Data = {
        66010000424D6601000000000000760000002800000014000000140000000100
        040000000000F0000000CE0E0000C40E00001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
        FFFFFFFF0000FFFFFFFFFFFFFFFFFFFF0000FFFFFFF000FFFFF000FF0000FFFF
        FFF080FFFFF080FF0000FFFFFFF0007FFF7000FF0000FFFFFFF00000000000FF
        0000FF0000008000080000FF0000FF0FFFF08000080000FF0000FF0F00F00000
        000000FF0000FF0FFFFF0000F0000FFF0000FF0CCCCCC00CCC00FFFF0000FFFC
        FFFFF00FFF00FFFF0000FFFCF00F00080F00FFFF0000FFFCFFFFFFFFFFCFFFFF
        0000FFFCCCCCCCCCCCCFFFFF0000FFFC8CC8CC8CC8CFFFFF0000FFFCCCCCCCCC
        CCCFFFFF0000FFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFFFFFFFFFF0000FFFF
        FFFFFFFFFFFFFFFF0000}
    end
  end
  object OpenDialog1: TOpenDialog
    Left = 280
    Top = 256
  end
end

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?