ddchwh.dfm

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

object Frmddchwh: TFrmddchwh
  Left = 124
  Top = -10
  Width = 1032
  Height = 746
  Align = alClient
  Caption = #12304#35746#21333#20986#36135#32500#25252#12305
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  WindowState = wsMaximized
  OnActivate = FormActivate
  OnClose = FormClose
  PixelsPerInch = 96
  TextHeight = 13
  object Label7: TLabel
    Left = 659
    Top = 536
    Width = 92
    Height = 14
    AutoSize = False
    Caption = #23458#25143
    Color = clSkyBlue
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentColor = False
    ParentFont = False
  end
  object Pz: TPanel
    Left = 0
    Top = 0
    Width = 1024
    Height = 658
    Align = alClient
    Alignment = taRightJustify
    BevelInner = bvLowered
    BevelOuter = bvLowered
    BorderStyle = bsSingle
    Color = clSkyBlue
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    TabOrder = 0
    object Label25: TLabel
      Left = 19
      Top = 592
      Width = 102
      Height = 14
      AutoSize = False
      Caption = #24207#21495
      Color = clSkyBlue
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentColor = False
      ParentFont = False
    end
    object Label28: TLabel
      Left = 283
      Top = 592
      Width = 115
      Height = 14
      AutoSize = False
      Caption = #26412#27425#20986#36135#37327
      Color = clSkyBlue
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentColor = False
      ParentFont = False
    end
    object Label29: TLabel
      Left = 802
      Top = 592
      Width = 102
      Height = 14
      AutoSize = False
      Caption = #22791#27880
      Color = clSkyBlue
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentColor = False
      ParentFont = False
    end
    object Label41: TLabel
      Left = 456
      Top = 592
      Width = 99
      Height = 14
      AutoSize = False
      Caption = #20986#36135#24635#37327
      Color = clSkyBlue
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentColor = False
      ParentFont = False
    end
    object help: TLabel
      Left = 2
      Top = 627
      Width = 1016
      Height = 25
      Align = alBottom
      AutoSize = False
      Color = clGradientActiveCaption
      Font.Charset = GB2312_CHARSET
      Font.Color = clWhite
      Font.Height = -16
      Font.Name = #26999#20307'_GB2312'
      Font.Style = [fsBold]
      ParentColor = False
      ParentFont = False
      Layout = tlCenter
    end
    object Label6: TLabel
      Left = 149
      Top = 592
      Width = 99
      Height = 14
      AutoSize = False
      Caption = #26085#26399
      Color = clSkyBlue
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentColor = False
      ParentFont = False
    end
    object Label8: TLabel
      Left = 623
      Top = 593
      Width = 108
      Height = 14
      AutoSize = False
      Caption = #21097#20313#24212#20986#37327
      Color = clSkyBlue
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentColor = False
      ParentFont = False
    end
    object tsl: TEdit
      Left = 355
      Top = 589
      Width = 83
      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 = 0
      OnChange = tslChange
      OnKeyPress = tslKeyPress
    end
    object tbz: TEdit
      Left = 832
      Top = 589
      Width = 97
      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 = 1
      OnKeyPress = tbzKeyPress
    end
    object txh: TEdit
      Left = 48
      Top = 589
      Width = 81
      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 = 2
      OnKeyPress = txhKeyPress
    end
    object tczl: TEdit
      Left = 512
      Top = 589
      Width = 91
      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 = 3
      OnKeyPress = tczlKeyPress
    end
    object twcl: TEdit
      Left = 695
      Top = 590
      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 = 4
      OnKeyPress = twclKeyPress
    end
    object rq: TDateTimePicker
      Left = 180
      Top = 589
      Width = 86
      Height = 21
      BevelInner = bvNone
      BevelOuter = bvNone
      Date = 38907.000000000000000000
      Time = 38907.000000000000000000
      Color = clWhite
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      TabOrder = 5
      OnKeyPress = rqKeyPress
    end
    object pq: TPanel
      Left = 2
      Top = 2
      Width = 1016
      Height = 47
      Align = alTop
      BevelInner = bvLowered
      BevelOuter = bvLowered
      Color = clSkyBlue
      TabOrder = 6
      object cddh: TCheckBox
        Left = 12
        Top = 11
        Width = 57
        Height = 16
        Caption = #35746#21333
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlue
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 0
      end
      object qddh: TEdit
        Left = 58
        Top = 11
        Width = 80
        Height = 21
        Ctl3D = True
        ParentCtl3D = False
        TabOrder = 1
      end
      object cxh: TCheckBox
        Left = 152
        Top = 11
        Width = 57
        Height = 16
        Caption = #24207#21495
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlue
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 2
      end
      object qxh: TEdit
        Left = 199
        Top = 11
        Width = 81
        Height = 21
        Ctl3D = True
        ParentCtl3D = False
        TabOrder = 3
      end
      object ccl: TCheckBox
        Left = 581
        Top = 11
        Width = 63
        Height = 17
        Caption = #20986#37327
        Color = clSkyBlue
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlue
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentColor = False
        ParentFont = False
        TabOrder = 4
      end
      object qcl: TEdit
        Left = 627
        Top = 11
        Width = 83
        Height = 21
        Ctl3D = True
        ParentCtl3D = False
        TabOrder = 5
      end
      object ccz: TCheckBox
        Left = 724
        Top = 11
        Width = 63
        Height = 17
        Caption = #20986#24635
        Color = clSkyBlue
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlue
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentColor = False
        ParentFont = False
        TabOrder = 6
      end
      object qcz: TEdit
        Left = 770
        Top = 11
        Width = 83
        Height = 21
        Ctl3D = True
        ParentCtl3D = False
        TabOrder = 7
      end
      object cbz: TCheckBox
        Left = 865
        Top = 11
        Width = 63
        Height = 17
        Caption = #22791#27880
        Color = clSkyBlue
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlue
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentColor = False
        ParentFont = False
        TabOrder = 8
      end
      object qbz: TEdit
        Left = 911
        Top = 11