pg.dfm

来自「一个以前收集的基于C/S架构的ERP客户端源代码」· DFM 代码 · 共 253 行

DFM
253
字号
inherited frmPg: TfrmPg
  Left = 87
  Top = 65
  Height = 497
  Caption = '工序加工物品'
  OldCreateOrder = True
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  inherited sbBar: TStatusBar
    Top = 429
  end
  inherited CoolBar1: TCoolBar
    Bands = <
      item
        Control = tbMainBar
        ImageIndex = -1
        MinHeight = 35
        Width = 616
      end>
  end
  object sgPg: TSDGrid [2]
    Left = 0
    Top = 69
    Width = 337
    Height = 360
    Align = alLeft
    Color = clWhite
    ColCount = 2
    Ctl3D = False
    DefaultRowHeight = 18
    FixedColor = 8564917
    FixedCols = 0
    RowCount = 4
    Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSizing, goColSizing, goRowSelect]
    ParentCtl3D = False
    TabOrder = 2
    OnClick = sgPgClick
    SelectColor = clActiveCaption
    OddGridColor = clWhite
    Columns = <
      item
        ColumnFont.Charset = GB2312_CHARSET
        ColumnFont.Color = clNavy
        ColumnFont.Height = -12
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        TitleString = '物品编码'
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = GB2312_CHARSET
        ColumnFont.Color = clNavy
        ColumnFont.Height = -12
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        TitleString = '物品名称'
        ColumnWidth = 0
      end>
    ColWidths = (
      116
      174)
  end
  object FloatPanel1: TFloatPanel [3]
    Left = 337
    Top = 69
    Width = 279
    Height = 360
    Align = alClient
    Color = clWhite
    Caption = 'FloatPanel1'
    ParentColor = False
    TabOrder = 3
    object Label2: TLabel
      Left = 8
      Top = 19
      Width = 54
      Height = 12
      Caption = '产品编码:'
    end
    object Panel1: TPanel
      Left = 6
      Top = 39
      Width = 237
      Height = 136
      BevelOuter = bvNone
      Color = clWhite
      Ctl3D = False
      ParentCtl3D = False
      TabOrder = 0
      object Label5: TLabel
        Left = 3
        Top = 64
        Width = 54
        Height = 12
        Caption = '产品规格:'
        Enabled = False
      end
      object Label10: TLabel
        Left = 3
        Top = 92
        Width = 54
        Height = 12
        Caption = '产品型号:'
        Enabled = False
      end
      object Label1: TLabel
        Left = 3
        Top = 9
        Width = 54
        Height = 12
        Caption = '产品名称:'
        Enabled = False
      end
      object Label4: TLabel
        Left = 3
        Top = 37
        Width = 54
        Height = 12
        Caption = '计量单位:'
        Enabled = False
      end
      object sePgGoodsSpec: TSDEdit
        Left = 57
        Top = 58
        Width = 169
        Height = 18
        Ctl3D = False
        Font.Charset = GB2312_CHARSET
        Font.Color = clNavy
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentColor = True
        ParentCtl3D = False
        ParentFont = False
        TabOrder = 0
        SplitSymbol = ' | '
      end
      object sePgGoodsModel: TSDEdit
        Left = 57
        Top = 86
        Width = 169
        Height = 18
        Ctl3D = False
        Font.Charset = GB2312_CHARSET
        Font.Color = clNavy
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentColor = True
        ParentCtl3D = False
        ParentFont = False
        TabOrder = 1
        SplitSymbol = ' | '
      end
      object sePgGoodsName: TSDEdit
        Left = 57
        Top = 3
        Width = 169
        Height = 18
        Ctl3D = False
        Font.Charset = GB2312_CHARSET
        Font.Color = clNavy
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentColor = True
        ParentCtl3D = False
        ParentFont = False
        TabOrder = 2
        SplitSymbol = ' | '
      end
      object scPgGoodsUnit: TSDComboBox
        Left = 57
        Top = 29
        Width = 121
        Height = 20
        Style = csDropDownList
        Color = clWhite
        Ctl3D = False
        ItemHeight = 12
        ParentCtl3D = False
        TabOrder = 3
        OnClick = scPgProcessClick
        KeyItem = cbItem2
      end
    end
    object sePgGoods: TSDEdit
      Left = 62
      Top = 13
      Width = 171
      Height = 18
      Ctl3D = False
      ParentColor = True
      ParentCtl3D = False
      TabOrder = 1
      OnKeyDown = sePgGoodsKeyDown
      OnButtonClick = sePgGoodsButtonClick
      ButtonVisible = True
      SplitSymbol = ' | '
    end
  end
  object FloatPanel2: TFloatPanel [4]
    Left = 0
    Top = 39
    Width = 616
    Height = 30
    Align = alTop
    Color = clWhite
    Caption = 'FloatPanel2'
    ParentColor = False
    TabOrder = 4
    object Label9: TLabel
      Left = 9
      Top = 7
      Width = 54
      Height = 12
      Caption = '工序代码:'
    end
    object scPgProcess: TSDComboBox
      Left = 65
      Top = 2
      Width = 239
      Height = 20
      Style = csDropDownList
      Color = clWhite
      Ctl3D = False
      ItemHeight = 12
      ParentCtl3D = False
      TabOrder = 0
      OnClick = scPgProcessClick
      KeyItem = cbItem2
    end
  end
  inherited MainMenu1: TMainMenu
    Left = 166
    Top = 247
  end
  inherited ImageList1: TImageList
    Left = 165
    Top = 246
  end
  inherited RecPrintDlg: TPrintDialog
    Left = 227
    Top = 247
  end
  inherited PrnSetupDlg: TPrinterSetupDialog
    Left = 195
    Top = 247
  end
end

⌨️ 快捷键说明

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