soh.dfm

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

DFM
1,377
字号
inherited frmSoh: TfrmSoh
  Left = 40
  Top = 16
  Width = 745
  Height = 569
  Caption = '销售订单'
  OldCreateOrder = True
  OnClose = FormClose
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object FloatPanel2: TFloatPanel [0]
    Left = 0
    Top = 214
    Width = 737
    Height = 253
    Align = alClient
    Color = clWhite
    Caption = 'FloatPanel2'
    ParentColor = False
    TabOrder = 3
    object GpDetail1: TGroupBox
      Left = 5
      Top = 1
      Width = 354
      Height = 244
      TabOrder = 0
      object Label31: TLabel
        Left = 11
        Top = 45
        Width = 54
        Height = 12
        Caption = '货物编码:'
      end
      object Label32: TLabel
        Left = 11
        Top = 102
        Width = 54
        Height = 12
        Caption = '计量单位:'
      end
      object Label33: TLabel
        Left = 183
        Top = 104
        Width = 54
        Height = 12
        Caption = '换算系数:'
      end
      object Label34: TLabel
        Left = 11
        Top = 131
        Width = 54
        Height = 12
        Caption = '订单数量:'
      end
      object Label35: TLabel
        Left = 11
        Top = 16
        Width = 54
        Height = 12
        Caption = '订单行号:'
      end
      object Label37: TLabel
        Left = 181
        Top = 133
        Width = 54
        Height = 12
        Caption = '价格类型:'
      end
      object Label38: TLabel
        Left = 11
        Top = 160
        Width = 30
        Height = 12
        Caption = '单价:'
      end
      object Label40: TLabel
        Left = 11
        Top = 217
        Width = 42
        Height = 12
        Caption = '折扣率:'
      end
      object Label28: TLabel
        Left = 11
        Top = 73
        Width = 54
        Height = 12
        Caption = '货物名称:'
      end
      object Label16: TLabel
        Left = 11
        Top = 188
        Width = 30
        Height = 12
        Caption = '金额:'
        Enabled = False
      end
      object Label18: TLabel
        Left = 182
        Top = 189
        Width = 30
        Height = 12
        Caption = '税额:'
        Enabled = False
      end
      object Label19: TLabel
        Left = 181
        Top = 216
        Width = 42
        Height = 12
        Caption = '折扣额:'
        Enabled = False
      end
      object seSodLine: TSDEdit
        Tag = 1
        Left = 68
        Top = 13
        Width = 102
        Height = 18
        Ctl3D = False
        Enabled = False
        ParentColor = True
        ParentCtl3D = False
        ReadOnly = True
        TabOrder = 0
        Text = '0'
        DataType = dtNumber
        CharType = ctMathematic
        SplitSymbol = ' | '
        DefaultValue = '0'
      end
      object seSodQty: TSDEdit
        Tag = 6
        Left = 68
        Top = 127
        Width = 101
        Height = 18
        Ctl3D = False
        ParentColor = True
        ParentCtl3D = False
        TabOrder = 5
        Text = '0'
        OnExit = seSodQtyExit
        DigLen = 4
        DataType = dtNumber
        CharType = ctMathematic
        OnButtonClick = seSodQtyButtonClick
        ButtonVisible = True
        SplitSymbol = ' | '
        DefaultValue = '0'
      end
      object seSodConv: TSDEdit
        Tag = 5
        Left = 240
        Top = 98
        Width = 96
        Height = 18
        Ctl3D = False
        ParentColor = True
        ParentCtl3D = False
        TabOrder = 4
        Text = '0'
        DigLen = 4
        DataType = dtNumber
        CharType = ctMathematic
        SplitSymbol = ' | '
        DefaultValue = '0'
      end
      object seSodGoodsName: TSDEdit
        Tag = 1
        Left = 68
        Top = 70
        Width = 157
        Height = 18
        Ctl3D = False
        ParentColor = True
        ParentCtl3D = False
        TabOrder = 2
        Text = 'seSodGoodsName'
        SplitSymbol = ' | '
      end
      object seSodPrice: TSDEdit
        Tag = 7
        Left = 68
        Top = 155
        Width = 102
        Height = 18
        Ctl3D = False
        ParentColor = True
        ParentCtl3D = False
        TabOrder = 6
        Text = '0'
        OnExit = seSodPriceExit
        DigLen = 4
        DataType = dtNumber
        CharType = ctMathematic
        OnButtonClick = seSodPriceButtonClick
        ButtonVisible = True
        SplitSymbol = ' | '
        DefaultValue = '0'
      end
      object seSodDisc: TSDEdit
        Tag = 7
        Left = 68
        Top = 212
        Width = 105
        Height = 18
        Ctl3D = False
        ParentColor = True
        ParentCtl3D = False
        TabOrder = 7
        Text = '0'
        OnExit = seSodDiscExit
        DigLen = 4
        DataType = dtNumber
        CharType = ctMathematic
        OnButtonClick = seSodPriceButtonClick
        ButtonVisible = True
        SplitSymbol = ' | '
        DefaultValue = '0'
      end
      object seSodGoods: TSDEdit
        Left = 68
        Top = 41
        Width = 161
        Height = 18
        Ctl3D = False
        ParentColor = True
        ParentCtl3D = False
        TabOrder = 1
        Text = 'seSodGoods'
        OnExit = seSodGoodsExit
        OnButtonClick = seSodGoodsButtonClick
        ButtonVisible = True
        SplitSymbol = ' | '
      end
      object seSodSptCode: TSDEdit
        Left = 238
        Top = 130
        Width = 107
        Height = 18
        Ctl3D = False
        ParentColor = True
        ParentCtl3D = False
        TabOrder = 8
        Text = 'seSodSptCode'
        OnButtonClick = seSodSptCodeButtonClick
        ButtonVisible = True
        KeyItem = cbItem2
        SplitSymbol = ' | '
      end
      object seSodDAmt: TSDEdit
        Left = 234
        Top = 210
        Width = 105
        Height = 18
        Ctl3D = False
        ParentColor = True
        ParentCtl3D = False
        TabOrder = 9
        Text = '0'
        DigLen = 2
        DataType = dtNumber
        CharType = ctMathematic
        SplitSymbol = ' | '
        DefaultValue = '0'
      end
      object seSodAmt: TSDEdit
        Left = 68
        Top = 184
        Width = 100
        Height = 18
        Ctl3D = False
        ParentColor = True
        ParentCtl3D = False
        TabOrder = 10
        Text = '0'
        DigLen = 2
        DataType = dtNumber
        CharType = ctMathematic
        SplitSymbol = ' | '
        DefaultValue = '0'
      end
      object seSodTaxAmt: TSDEdit
        Left = 232
        Top = 184
        Width = 106
        Height = 18
        Ctl3D = False
        ParentColor = True
        ParentCtl3D = False
        TabOrder = 11
        Text = '0'
        DigLen = 2
        DataType = dtNumber
        CharType = ctMathematic
        SplitSymbol = ' | '
        DefaultValue = '0'
      end
      object seSodUnit: TSDEdit
        Left = 70
        Top = 98
        Width = 98
        Height = 18
        Ctl3D = False
        ParentColor = True
        ParentCtl3D = False
        ReadOnly = True
        TabOrder = 3
        Text = 'seSodUnit'
        OnButtonClick = seSodUnitButtonClick
        ButtonVisible = True
        KeyItem = cbItem2
        DispItem = cbItem1
        SplitSymbol = ' | '
      end
      object seSodGoodsSpec: TSDEdit
        Tag = 1
        Left = 247
        Top = 72
        Width = 90
        Height = 18
        Ctl3D = False
        ParentColor = True
        ParentCtl3D = False
        TabOrder = 12
        Visible = False
        SplitSymbol = ' | '
      end
    end
    object GpDetailClose: TGroupBox
      Left = 363
      Top = 132
      Width = 352
      Height = 112
      TabOrder = 1
      object Label22: TLabel
        Left = 165
        Top = 49
        Width = 54
        Height = 12
        Caption = '结清日期:'
      end
      object Label44: TLabel
        Left = 167
        Top = 79
        Width = 54
        Height = 12
        Caption = '订单状态:'
      end
      object Label20: TLabel
        Left = 12
        Top = 15
        Width = 54
        Height = 12
        Caption = '发货数量:'
        Enabled = False
      end
      object Label21: TLabel
        Left = 12
        Top = 35
        Width = 54
        Height = 12
        Caption = '备货数量:'
        Enabled = False
      end
      object Label25: TLabel
        Left = 13
        Top = 55
        Width = 54
        Height = 12
        Caption = '退货数量:'
        Enabled = False
      end
      object Label27: TLabel
        Left = 14
        Top = 92
        Width = 54
        Height = 12
        Caption = '换货数量:'
        Enabled = False
      end
      object Label29: TLabel
        Left = 12
        Top = 73
        Width = 54
        Height = 12
        Caption = '返修数量:'
        Enabled = False
      end
      object cheSodClose: TCheckBox
        Tag = 15
        Left = 165
        Top = 16
        Width = 60
        Height = 20
        Caption = '已结清'
        Color = clWhite
        Font.Charset = GB2312_CHARSET
        Font.Color = clRed
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentColor = False
        ParentFont = False
        TabOrder = 0
      end
      object deSodCloseDate: TDateEdit
        Tag = 11
        Left = 225
        Top = 45
        Width = 106
        Height = 18
        LineOffset = 2
        LineColor = clGreen
        LineVisible = False
        CDate = '2003-05-13'
        InitDate = '2003-05-13 13:39:38'
        ModalResult = 0
        Enabled = False
        TabOrder = 1
        Color = 50331647
        Ctl3D = False
        ParentCtl3D = False
      end
      object scSodState: TSDComboBox
        Tag = 16
        Left = 226
        Top = 73
        Width = 106
        Height = 20
        Style = csDropDownList
        Color = clWhite
        Ctl3D = False
        ItemHeight = 12
        ParentCtl3D = False
        TabOrder = 2
        Items.Strings = (
          '1-MRP计划订单'
          '2-确认订单'
          '3-待下达订单'
          '4-已下达订单'
          '5-关闭订单')
        KeyItem = cbItem2
      end
      object seSodSQty: TSDEdit
        Left = 65
        Top = 12
        Width = 73
        Height = 18
        Ctl3D = False
        Font.Charset = GB2312_CHARSET
        Font.Color = clNavy
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentColor = True
        ParentCtl3D = False

⌨️ 快捷键说明

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