gxgx.~dfm

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

object Frmgxgx: TFrmgxgx
  Left = 68
  Top = -8
  Width = 1032
  Height = 746
  Align = alClient
  Caption = #12304#24037#24207#20449#24687#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 = 30
      Top = 592
      Width = 102
      Height = 14
      AutoSize = False
      Caption = #35746#21333#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 = 186
      Top = 592
      Width = 115
      Height = 14
      AutoSize = False
      Caption = #21517#31216
      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 = 334
      Top = 592
      Width = 99
      Height = 14
      AutoSize = False
      Caption = #26356#26032#21069#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
    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 Label8: TLabel
      Left = 509
      Top = 593
      Width = 108
      Height = 14
      AutoSize = False
      Caption = #26356#26032#21518#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
    end
    object Label1: TLabel
      Left = 687
      Top = 593
      Width = 108
      Height = 14
      AutoSize = False
      Caption = #20135#37327#36215#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 Label2: TLabel
      Left = 847
      Top = 593
      Width = 108
      Height = 14
      AutoSize = False
      Caption = #20135#37327#27490#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 tgxmc: TEdit
      Left = 218
      Top = 589
      Width = 97
      Height = 19
      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 = 0
      OnKeyPress = tgxmcKeyPress
    end
    object tddh: TEdit
      Left = 75
      Top = 589
      Width = 92
      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 = 1
      OnKeyPress = tddhKeyPress
    end
    object tdj: TEdit
      Left = 406
      Top = 589
      Width = 82
      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 = 2
      OnKeyPress = tdjKeyPress
    end
    object tdj1: TEdit
      Left = 580
      Top = 590
      Width = 82
      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 = tdj1KeyPress
    end
    object GroupBox1: TGroupBox
      Left = -1
      Top = 48
      Width = 1018
      Height = 521
      Caption = #24037#24207#21015#34920
      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
      object DBGrid5: TDBGrid
        Left = 2
        Top = 15
        Width = 1014
        Height = 504
        Align = alClient
        Color = clWhite
        DataSource = DataModule1.DataSource23
        FixedColor = clWhite
        ReadOnly = True
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clBlue
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        OnDblClick = DBGrid5DblClick
        OnTitleClick = DBGrid5TitleClick
        Columns = <
          item
            Expanded = False
            FieldName = 'ddh'
            Title.Alignment = taCenter
            Title.Caption = #35746#21333#21495
            Title.Color = clMoneyGreen
            Width = 83
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'gxmc'
            Title.Alignment = taCenter
            Title.Caption = #24037#24207#21517#31216
            Title.Color = clMoneyGreen
            Width = 80
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'dj'
            Title.Alignment = taCenter
            Title.Caption = #21333#20215
            Title.Color = clMoneyGreen
            Width = 73
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'xs'
            Title.Alignment = taCenter
            Title.Caption = #31995#25968
            Title.Color = clMoneyGreen
            Width = 78
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'bz'