cllr.~dfm

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

        Color = clSkyBlue
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlue
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentColor = False
        ParentFont = False
        TabOrder = 15
      end
      object cdj: TCheckBox
        Left = 724
        Top = 41
        Width = 63
        Height = 17
        Caption = #21333#20215
        Color = clSkyBlue
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlue
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentColor = False
        ParentFont = False
        TabOrder = 16
      end
      object qcpdw: TEdit
        Left = 770
        Top = 11
        Width = 83
        Height = 21
        Ctl3D = True
        ParentCtl3D = False
        TabOrder = 17
      end
      object qdj: TEdit
        Left = 770
        Top = 41
        Width = 83
        Height = 21
        Ctl3D = True
        ParentCtl3D = False
        TabOrder = 18
      end
      object sq: TDateTimePicker
        Left = 58
        Top = 40
        Width = 80
        Height = 21
        BevelInner = bvNone
        BevelOuter = bvNone
        Date = 38907.000000000000000000
        Time = 38907.000000000000000000
        TabOrder = 19
      end
      object cwgzt: TCheckBox
        Left = 865
        Top = 11
        Width = 63
        Height = 17
        Caption = #23436#24037
        Color = clSkyBlue
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlue
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentColor = False
        ParentFont = False
        TabOrder = 20
      end
      object cje: TCheckBox
        Left = 865
        Top = 41
        Width = 63
        Height = 17
        Caption = #37329#39069
        Color = clSkyBlue
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlue
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentColor = False
        ParentFont = False
        TabOrder = 21
      end
      object qwgzt: TEdit
        Left = 911
        Top = 11
        Width = 83
        Height = 21
        Ctl3D = True
        ParentCtl3D = False
        TabOrder = 22
      end
      object qje: TEdit
        Left = 911
        Top = 41
        Width = 83
        Height = 21
        Ctl3D = True
        ParentCtl3D = False
        TabOrder = 23
      end
      object Cjq: TCheckBox
        Left = 293
        Top = 40
        Width = 57
        Height = 17
        Caption = #20132#36215
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlue
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 24
      end
      object Cjz: TCheckBox
        Left = 436
        Top = 40
        Width = 57
        Height = 17
        Caption = #20132#27490
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlue
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 25
      end
      object jz: TDateTimePicker
        Left = 483
        Top = 40
        Width = 84
        Height = 21
        BevelInner = bvNone
        BevelOuter = bvNone
        Date = 38907.000000000000000000
        Time = 38907.000000000000000000
        TabOrder = 26
      end
      object jq: TDateTimePicker
        Left = 339
        Top = 40
        Width = 83
        Height = 21
        BevelInner = bvNone
        BevelOuter = bvNone
        Date = 38907.000000000000000000
        Time = 38907.000000000000000000
        TabOrder = 27
      end
    end
    object tgxmc: TEdit
      Left = 190
      Top = 593
      Width = 89
      Height = 19
      AutoSize = False
      Color = clWhite
      Ctl3D = False
      Enabled = False
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentCtl3D = False
      ParentFont = False
      TabOrder = 12
      OnChange = tgxmcChange
      OnKeyPress = tgxmcKeyPress
    end
    object GroupBox1: TGroupBox
      Left = -3
      Top = 185
      Width = 1015
      Height = 244
      Caption = #20135#37327#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 = 13
      object DBGrid5: TDBGrid
        Left = 2
        Top = 15
        Width = 1011
        Height = 227
        Align = alClient
        Color = clWhite
        DataSource = DataModule1.DataSource25
        FixedColor = clWhite
        ReadOnly = True
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clBlue
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        OnDrawColumnCell = DBGrid5DrawColumnCell
        OnTitleClick = DBGrid5TitleClick
        Columns = <
          item
            Expanded = False
            FieldName = 'clh'
            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 = 'gh'
            Title.Alignment = taCenter
            Title.Caption = #24037#21495
            Title.Color = clMoneyGreen
            Width = 75
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'fb'
            Title.Alignment = taCenter
            Title.Caption = #37096#38376
            Title.Color = clMoneyGreen
            Width = 68
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'fz'
            Title.Alignment = taCenter
            Title.Caption = #20998#32452
            Title.Color = clMoneyGreen
            Width = 35
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'yg'
            Title.Alignment = taCenter
            Title.Caption = #21592#24037
            Title.Color = clMoneyGreen
            Width = 56
            Visible = True
          end
          item
            Alignment = taRightJustify
            Expanded = False
            FieldName = 'bh'
            Title.Alignment = taCenter
            Title.Caption = #21253#21495
            Title.Color = clMoneyGreen
            Width = 48
            Visible = True
          end
          item
            Alignment = taRightJustify
            Expanded = False
            FieldName = 'ys'
            Title.Alignment = taCenter
            Title.Caption = #39068#33394
            Title.Color = clMoneyGreen
            Width = 56
            Visible = True
          end
          item
            Alignment = taRightJustify
            Expanded = False
            FieldName = 'cm'
            Title.Alignment = taCenter
            Title.Caption = #23610#30721
            Title.Color = clMoneyGreen
            Width = 48
            Visible = True
          end
          item
            Alignment = taRightJustify
            Expanded = False
            FieldName = 'gxmc'
            Title.Alignment = taCenter
            Title.Caption = #24037#24207#21517#31216
            Title.Color = clMoneyGreen
            Width = 58
            Visible = True
          end
          item
            Alignment = taRightJustify
            Expanded = False
            FieldName = 'dj'
            Title.Alignment = taCenter
            Title.Caption = #21333#20215
            Title.Color = clMoneyGreen
            Width = 61
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'xs'
            Title.Alignment = taCenter
            Title.Caption = #31995#25968
            Title.Color = clMoneyGreen
            Width = 58
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'sl'
            Title.Alignment = taCenter
            Title.Caption = #25968#37327
            Title.Color = clMoneyGreen
            Width = 58
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'cz'
            Title.Alignment = taCenter
            Title.Caption = #20135#20540
            Title.Color = clMoneyGreen
            Width = 48
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'bz'
            Title.Alignment = taCenter
            Title.Caption = #22791#27880
            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
    object txs: TEdit
      Left = 331
      Top = 593
      Width = 89
      Height = 19
      BiDiMode = bdRightToLeft
      Color = clWhite
      Ctl3D = False
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentBiDiMode = False
      ParentCtl3D = False
      ParentFont = False
      TabOrder = 14
      OnKeyPress = txsKeyPress
    end
    object tbh: TEdit
      Left = 752
      Top = 554
      Width = 89
      Height = 19
      Color = clWhite
      Ctl3D = False
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentCtl3D = False
      ParentFont = False
      TabOrder = 15
      OnChange = tbhChange
      OnKeyPress = tbhKeyPress
    end
    object tcm: TEdit
      Left = 50
      Top = 593
      Width = 89
      Height = 19
      AutoSize = False
      Color = clWhite
      Ctl3D = False
      Enabled = False
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentCtl3D = False
      ParentFont = False
      TabOrder = 16
      OnKeyPress = tcmKeyPress
    end
    object DBGrid2: TDBGrid
      Left = 6
      Top = 433
      Width = 411
      Height = 113
      Color = clWhite
      DataSource = DataModule1.DataSource23
      FixedColor = clWhite