wsr.dfm

来自「速达开源ERP系统」· DFM 代码 · 共 133 行

inherited frmWsr: TfrmWsr
  Left = 218
  Top = 168
  Width = 552
  Height = 435
  Caption = '工单报废原因'
  OldCreateOrder = True
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  inherited sbBar: TStatusBar
    Top = 367
    Width = 544
  end
  inherited CoolBar1: TCoolBar
    Width = 544
    Bands = <
      item
        Control = tbMainBar
        ImageIndex = -1
        MinHeight = 35
        Width = 544
      end>
    inherited tbMainBar: TToolBar
      Width = 531
    end
  end
  object FloatPanel1: TFloatPanel [2]
    Left = 289
    Top = 39
    Width = 255
    Height = 328
    Align = alClient
    Color = clWhite
    Caption = 'FloatPanel1'
    ParentColor = False
    TabOrder = 2
    object Label1: TLabel
      Left = 6
      Top = 17
      Width = 54
      Height = 12
      Caption = '原因代码:'
    end
    object Label2: TLabel
      Left = 5
      Top = 45
      Width = 54
      Height = 12
      Caption = '原因说明:'
    end
    object seWsrCode: TSDEdit
      Left = 58
      Top = 12
      Width = 178
      Height = 18
      Ctl3D = False
      ParentColor = True
      ParentCtl3D = False
      TabOrder = 0
      Text = 'seWsrCode'
      SplitSymbol = ' | '
    end
    object memWsrDesc: TMemo
      Left = 58
      Top = 46
      Width = 178
      Height = 48
      Color = clWhite
      Ctl3D = False
      Lines.Strings = (
        'memWsrdDesc')
      ParentCtl3D = False
      TabOrder = 1
    end
  end
  object sgWsr: TSDGrid [3]
    Left = 0
    Top = 39
    Width = 289
    Height = 328
    Align = alLeft
    BiDiMode = bdRightToLeftReadingOnly
    Color = clWhite
    ColCount = 2
    Ctl3D = False
    DefaultRowHeight = 21
    FixedColor = 8564917
    FixedCols = 0
    RowCount = 4
    Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSizing, goColSizing]
    ParentBiDiMode = False
    ParentCtl3D = False
    TabOrder = 3
    OnClick = sgWsrClick
    EvenGridColor = 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 = (
      104
      176)
  end
  inherited MainMenu1: TMainMenu
    Left = 206
    Top = 147
  end
  inherited RecPrintDlg: TPrintDialog
    Left = 547
    Top = 7
  end
  inherited PrnSetupDlg: TPrinterSetupDialog
    Left = 551
    Top = 7
  end
end