uvadgsoomaterialdetail.dfm

来自「一整套的源代码」· DFM 代码 · 共 106 行

inherited VADGSOOMaterialDetail: TVADGSOOMaterialDetail
  Height = 296
  inherited RzPanel1: TRzPanel
    Height = 296
    inherited RzBackground1: TRzBackground
      Height = 296
    end
    inherited RzPanel2: TRzPanel
      Height = 296
      inherited Grid: TcxGrid
        Height = 296
        inherited GridDBTableView: TcxGridDBTableView
          DataController.Filter.Criteria = {FFFFFFFF0000000000}
          object GridDBTableViewSOOMATERIALDETAILID: TcxGridDBColumn
            FooterAlignmentHorz = taCenter
            HeaderAlignmentHorz = taCenter
            HeaderAlignmentVert = vaCenter
            HeaderGlyphAlignmentHorz = taCenter
            Width = 100
            DataBinding.FieldName = 'SOOMATERIALDETAILID'
          end
          object GridDBTableViewPRICE: TcxGridDBColumn
            FooterAlignmentHorz = taCenter
            HeaderAlignmentHorz = taCenter
            HeaderAlignmentVert = vaCenter
            HeaderGlyphAlignmentHorz = taCenter
            Width = 100
            DataBinding.FieldName = 'PRICE'
          end
          object GridDBTableViewAMOUNT: TcxGridDBColumn
            FooterAlignmentHorz = taCenter
            HeaderAlignmentHorz = taCenter
            HeaderAlignmentVert = vaCenter
            HeaderGlyphAlignmentHorz = taCenter
            Width = 100
            DataBinding.FieldName = 'AMOUNT'
          end
          object GridDBTableViewTOTAL: TcxGridDBColumn
            FooterAlignmentHorz = taCenter
            HeaderAlignmentHorz = taCenter
            HeaderAlignmentVert = vaCenter
            HeaderGlyphAlignmentHorz = taCenter
            Width = 100
            DataBinding.FieldName = 'TOTAL'
          end
          object GridDBTableViewSTOCKOUTORDERID: TcxGridDBColumn
            PropertiesClassName = 'TcxLookupComboBoxProperties'
            Properties.KeyFieldNames = 'STOCKOUTORDERID'
            Properties.ListColumns = <
              item
                FieldName = 'STOCKOUTORDERID'
              end>
            Properties.ListSource = StockoutorderID
            FooterAlignmentHorz = taCenter
            HeaderAlignmentHorz = taCenter
            HeaderAlignmentVert = vaCenter
            HeaderGlyphAlignmentHorz = taCenter
            Width = 100
            DataBinding.FieldName = 'STOCKOUTORDERID'
          end
          object GridDBTableViewMATERIALSTOCKID: TcxGridDBColumn
            PropertiesClassName = 'TcxLookupComboBoxProperties'
            Properties.KeyFieldNames = 'MATERIALSTOCKID'
            Properties.ListColumns = <
              item
                FieldName = 'MATERIALSTOCKID'
              end>
            Properties.ListSource = MaterialStockID
            FooterAlignmentHorz = taCenter
            HeaderAlignmentHorz = taCenter
            HeaderAlignmentVert = vaCenter
            HeaderGlyphAlignmentHorz = taCenter
            Width = 100
            DataBinding.FieldName = 'MATERIALSTOCKID'
          end
          object GridDBTableViewISAPPROVE: TcxGridDBColumn
            PropertiesClassName = 'TcxCheckBoxProperties'
            Properties.DisplayUnchecked = 'False'
            Properties.ValueChecked = 1
            Properties.ValueUnchecked = 0
            FooterAlignmentHorz = taCenter
            HeaderAlignmentHorz = taCenter
            HeaderAlignmentVert = vaCenter
            HeaderGlyphAlignmentHorz = taCenter
            Width = 100
            DataBinding.FieldName = 'ISAPPROVE'
          end
        end
      end
    end
  end
  inherited DataSource: TDataSource
    DataSet = MADSOOMaterialDetail.ClientDataSet
  end
  object MaterialStockID: TDataSource
    DataSet = MADMaterialStock.ClientDataSet
    Left = 136
    Top = 16
  end
  object StockoutorderID: TDataSource
    DataSet = MADStockOutOrder.ClientDataSet
    Left = 184
    Top = 16
  end
end