ufrm_salesorder_list.dfm

来自「完整的进销存系统。 设计文件及完整的源代码。 Delphi6.0」· DFM 代码 · 共 249 行

inherited frm_salesorder_list: Tfrm_salesorder_list
  Left = 212
  Top = 234
  Caption = 'frm_salesorder_list'
  PixelsPerInch = 96
  TextHeight = 13
  inherited Splitter1: TSplitter
    Top = 185
  end
  inherited Page01: TPageControl
    Height = 152
    inherited TabSheet1: TTabSheet
      inherited panelEdit: TPanel
        Height = 124
        object Label1: TLabel
          Left = 16
          Top = 8
          Width = 51
          Height = 13
          Caption = #35746#21333#39033#27425':'
        end
        object Label2: TLabel
          Left = 16
          Top = 40
          Width = 51
          Height = 13
          Caption = #36135#21697#32534#21495':'
        end
        object Label3: TLabel
          Left = 40
          Top = 68
          Width = 27
          Height = 13
          Caption = #21333#20301':'
        end
        object Label4: TLabel
          Left = 40
          Top = 96
          Width = 27
          Height = 13
          Caption = #25968#37327':'
        end
        object DBText1: TDBText
          Left = 72
          Top = 8
          Width = 65
          Height = 17
          DataField = 'ORDERITEM'
          DataSource = ds_detail
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object DBEdit2: TDBEdit
          Left = 71
          Top = 63
          Width = 121
          Height = 21
          DataField = 'UNIT'
          DataSource = ds_detail
          ImeName = 'Chinese (Simplified) - Microsoft Pinyin'
          TabOrder = 0
        end
        object DBEdit3: TDBEdit
          Left = 71
          Top = 91
          Width = 121
          Height = 21
          DataField = 'ORDERQTY'
          DataSource = ds_detail
          ImeName = 'Chinese (Simplified) - Microsoft Pinyin'
          TabOrder = 1
        end
        object dxDBButtonEdit1: TdxDBButtonEdit
          Left = 72
          Top = 32
          Width = 121
          ImeName = 'Chinese (Simplified) - Microsoft Pinyin'
          TabOrder = 2
          DataField = 'GOODSNO'
          DataSource = ds_detail
          Buttons = <
            item
              Default = True
            end>
          OnButtonClick = dxDBButtonEdit1ButtonClick
          ExistButtons = True
        end
      end
    end
  end
  inherited PanelDetail1: TPanel
    Top = 188
    Height = 215
    inherited dbGrid: TdxDBGrid
      Height = 211
      KeyField = 'ORDERITEM'
      Filter.Criteria = {00000000}
      OptionsDB = [edgoCancelOnExit, edgoCanNavigation, edgoConfirmDelete, edgoLoadAllRecords, edgoSmartReload, edgoUseBookmarks]
      object dbGridORDERNO: TdxDBGridMaskColumn
        Visible = False
        BandIndex = 0
        RowIndex = 0
        FieldName = 'ORDERNO'
      end
      object dbGridORDERITEM: TdxDBGridMaskColumn
        BandIndex = 0
        RowIndex = 0
        FieldName = 'ORDERITEM'
      end
      object dbGridGOODSNO: TdxDBGridMaskColumn
        BandIndex = 0
        RowIndex = 0
        FieldName = 'GOODSNO'
      end
      object dbGridORDERQTY: TdxDBGridMaskColumn
        BandIndex = 0
        RowIndex = 0
        FieldName = 'ORDERQTY'
      end
      object dbGridUNIT: TdxDBGridMaskColumn
        BandIndex = 0
        RowIndex = 0
        FieldName = 'UNIT'
      end
      object dbGridACTI: TdxDBGridMaskColumn
        Visible = False
        BandIndex = 0
        RowIndex = 0
        FieldName = 'ACTI'
      end
      object dbGridOWUS: TdxDBGridMaskColumn
        Visible = False
        BandIndex = 0
        RowIndex = 0
        FieldName = 'OWUS'
      end
      object dbGridGRUP: TdxDBGridMaskColumn
        Visible = False
        BandIndex = 0
        RowIndex = 0
        FieldName = 'GRUP'
      end
      object dbGridCRET: TdxDBGridDateColumn
        BandIndex = 0
        RowIndex = 0
        FieldName = 'CRET'
      end
      object dbGridMODU: TdxDBGridMaskColumn
        Visible = False
        BandIndex = 0
        RowIndex = 0
        FieldName = 'MODU'
      end
      object dbGridMODT: TdxDBGridDateColumn
        Visible = False
        BandIndex = 0
        RowIndex = 0
        FieldName = 'MODT'
      end
      object dbGridD_SN: TdxDBGridMaskColumn
        Visible = False
        BandIndex = 0
        RowIndex = 0
        FieldName = 'D_SN'
      end
    end
  end
  inherited IList_tools: TImageList
    Left = 185
  end
  inherited qy_master: TQuery
    DatabaseName = 'JXC_CSD'
    Left = 248
    Top = 56
  end
  inherited qy_detail: TQuery
    DatabaseName = 'JXC_CSD'
    Left = 280
    Top = 56
    object qy_detailORDERNO: TStringField
      FieldName = 'ORDERNO'
      Origin = 'JXC_CSD.T_ORDERLIST.ORDERNO'
      Size = 10
    end
    object qy_detailORDERITEM: TIntegerField
      DisplayLabel = #35746#21333#39033#27425
      FieldName = 'ORDERITEM'
      Origin = 'JXC_CSD.T_ORDERLIST.ORDERITEM'
    end
    object qy_detailGOODSNO: TStringField
      DisplayLabel = #36135#21697#32534#21495
      FieldName = 'GOODSNO'
      Origin = 'JXC_CSD.T_ORDERLIST.GOODSNO'
    end
    object qy_detailORDERQTY: TFloatField
      DisplayLabel = #35746#21333#25968#37327
      FieldName = 'ORDERQTY'
      Origin = 'JXC_CSD.T_ORDERLIST.ORDERQTY'
    end
    object qy_detailUNIT: TStringField
      DisplayLabel = #21333#20301
      FieldName = 'UNIT'
      Origin = 'JXC_CSD.T_ORDERLIST.UNIT'
      Size = 8
    end
    object qy_detailACTI: TStringField
      FieldName = 'ACTI'
      Origin = 'JXC_CSD.T_ORDERLIST.ACTI'
      Size = 1
    end
    object qy_detailOWUS: TStringField
      FieldName = 'OWUS'
      Origin = 'JXC_CSD.T_ORDERLIST.OWUS'
      Size = 10
    end
    object qy_detailGRUP: TStringField
      FieldName = 'GRUP'
      Origin = 'JXC_CSD.T_ORDERLIST.GRUP'
      Size = 10
    end
    object qy_detailCRET: TDateTimeField
      DisplayLabel = #24314#31435#26085#26399
      FieldName = 'CRET'
      Origin = 'JXC_CSD.T_ORDERLIST.CRET'
    end
    object qy_detailMODU: TStringField
      FieldName = 'MODU'
      Origin = 'JXC_CSD.T_ORDERLIST.MODU'
      Size = 10
    end
    object qy_detailMODT: TDateTimeField
      FieldName = 'MODT'
      Origin = 'JXC_CSD.T_ORDERLIST.MODT'
    end
    object qy_detailD_SN: TFloatField
      FieldName = 'D_SN'
      Origin = 'JXC_CSD.T_ORDERLIST.D_SN'
    end
  end
  inherited ds_detail: TDataSource
    Left = 312
    Top = 56
  end
end