⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 stbrclothoutin.dfm

📁 详细的ERP设计资料
💻 DFM
字号:
inherited STBrClothOutInForm: TSTBrClothOutInForm
  Left = 50
  Top = 108
  Width = 694
  Height = 495
  Caption = #26381#35013#35843#25320#31649#29702
  FormStyle = fsMDIChild
  PixelsPerInch = 96
  TextHeight = 12
  inherited ToolBar: TToolBar
    Width = 686
    ButtonWidth = 55
    object ToolButton1: TToolButton
      Left = 0
      Top = 2
      Action = AddNewAction
    end
    object ToolButton2: TToolButton
      Left = 55
      Top = 2
      Action = EditAction
    end
    object ToolButton3: TToolButton
      Left = 110
      Top = 2
      Action = DeleteAction
    end
    object ToolButton10: TToolButton
      Left = 165
      Top = 2
      Width = 8
      Caption = 'ToolButton10'
      ImageIndex = 9
      Style = tbsSeparator
    end
    object ToolButton4: TToolButton
      Left = 173
      Top = 2
      Action = PrintPreviewAction
    end
    object ToolButton5: TToolButton
      Left = 228
      Top = 2
      Action = PrintAction
    end
    object ToolButton11: TToolButton
      Left = 283
      Top = 2
      Width = 8
      Caption = 'ToolButton11'
      ImageIndex = 10
      Style = tbsSeparator
    end
    object ToolButton6: TToolButton
      Left = 291
      Top = 2
      Action = ExportAction
    end
    object ToolButton12: TToolButton
      Left = 346
      Top = 2
      Width = 8
      Caption = 'ToolButton12'
      ImageIndex = 11
      Style = tbsSeparator
    end
    object ToolButton7: TToolButton
      Left = 354
      Top = 2
      Action = FiltrateAction
    end
    object ToolButton14: TToolButton
      Left = 409
      Top = 2
      Action = CustomizeViewAction
    end
    object ToolButton8: TToolButton
      Left = 464
      Top = 2
      Action = RefreshAction
    end
    object ToolButton13: TToolButton
      Left = 519
      Top = 2
      Width = 8
      Caption = 'ToolButton13'
      ImageIndex = 9
      Style = tbsSeparator
    end
    object ToolButton9: TToolButton
      Left = 527
      Top = 2
      Action = ExitAction
    end
  end
  inherited Panel1: TPanel
    Width = 686
    Height = 427
    inherited PageControl: TPageControl
      Top = 400
      Width = 686
      Height = 27
      inherited TabSheet1: TTabSheet
        Caption = #26381#35013#35843#25320#36164#26009
      end
    end
    inherited DBGrid: TQLDBGrid
      Width = 686
      Height = 400
      FooterRowCount = 1
      Columns = <
        item
          Expanded = False
          FieldName = #32534#21495
          Title.Alignment = taCenter
          Width = 110
          Visible = True
        end
        item
          Expanded = False
          FieldName = #26085#26399
          Title.Alignment = taCenter
          Width = 110
          Visible = True
        end
        item
          Expanded = False
          FieldName = #19994#21153#31867#21035
          Title.Alignment = taCenter
          Width = 110
          Visible = True
        end
        item
          Expanded = False
          FieldName = #35843#20986#20179#24211
          Title.Alignment = taCenter
          Width = 110
          Visible = True
        end
        item
          Expanded = False
          FieldName = #35843#25320#37329#39069
          Title.Alignment = taCenter
          Width = 110
          Visible = True
        end
        item
          Expanded = False
          FieldName = #35843#20837#20179#24211
          Title.Alignment = taCenter
          Width = 110
          Visible = True
        end
        item
          Expanded = False
          FieldName = #20445#36136#26085#26399
          Title.Alignment = taCenter
          Width = 110
          Visible = True
        end
        item
          Expanded = False
          FieldName = #32463#25163#20154
          Title.Alignment = taCenter
          Width = 110
          Visible = True
        end
        item
          Expanded = False
          FieldName = #22791#27880
          Title.Alignment = taCenter
          Width = 110
          Visible = True
        end
        item
          Expanded = False
          FieldName = #20973#21333#29366#24577
          Title.Alignment = taCenter
          Width = 110
          Visible = True
        end>
    end
  end
  inherited ActionList: TActionList
    Left = 371
    Top = 77
  end
  inherited DataSource: TDataSource
    DataSet = adsMaster
    Left = 198
    Top = 108
  end
  object adsMaster: TADODataSet
    Connection = CommonData.acnConnection
    CursorType = ctStatic
    Filtered = True
    CommandText = 
      'select a.ID,a.ClientID,a. EmployeeID, A.RECORDSTATE,'#13#10'a.Code as ' +
      '['#32534#21495'],a.Date ['#26085#26399'],'#13#10'a.BillMode ['#19994#21153#31867#21035'],'#13#10'c.name as ['#35843#20986#20179#24211'] ,'#13#10'ttl.A' +
      'mount*a.ModeDC*a.ModeC as  ['#35843#25320#37329#39069'] ,'#13#10'd.name as ['#35843#20837#20179#24211'] ,'#13#10'b.name ' +
      'as ['#32463#25163#20154'], '#13#10'a.ClearDate as ['#20445#36136#26085#26399'], '#13#10'a.Memo as ['#22791#27880'],'#13#10'A.RECORDST' +
      'ATE as ['#20973#21333#29366#24577']'#13#10'from STGoodsOutInMaster a '#13#10'left outer join  MSEm' +
      'ployee b on b. ID=a.EmployeeID   '#13#10'left outer join  STWarehouse ' +
      'c on c.id=a.ClientID '#13#10'left outer join  STWarehouse d on d.id=a.' +
      'WarehouseID   '#13#10'left outer join '#13#10'(select masterID, sum(isnull(A' +
      'mount,0)) as Amount'#13#10'from STGoodsOutIndetail group by masterId  ' +
      ') as ttl '#13#10'on ttl.masterID=a.id '#13#10'WHERE  A.RECORDSTATE<>'#39#21024#38500#39' '#13#10'o' +
      'rder by a.ID DESC'
    Parameters = <>
    Left = 160
    Top = 108
    object adsMasterID: TAutoIncField
      FieldName = 'ID'
      ReadOnly = True
      Visible = False
    end
    object adsMasterClientID: TIntegerField
      FieldName = 'ClientID'
      Visible = False
    end
    object adsMasterEmployeeID: TIntegerField
      FieldName = 'EmployeeID'
      Visible = False
    end
    object adsMasterRECORDSTATE: TStringField
      FieldName = 'RECORDSTATE'
      Visible = False
      Size = 12
    end
    object adsMasterDSDesigner: TStringField
      FieldName = #32534#21495
    end
    object adsMasterDSDesigner2: TDateTimeField
      FieldName = #26085#26399
    end
    object adsMasterDSDesigner3: TStringField
      FieldName = #19994#21153#31867#21035
      Size = 16
    end
    object adsMasterDSDesigner4: TStringField
      FieldName = #35843#20986#20179#24211
      Size = 30
    end
    object adsMasterDSDesigner5: TBCDField
      FieldName = #35843#25320#37329#39069
      ReadOnly = True
      Precision = 32
      Size = 5
    end
    object adsMasterDSDesigner6: TStringField
      FieldName = #35843#20837#20179#24211
      Size = 30
    end
    object adsMasterDSDesigner7: TStringField
      FieldName = #32463#25163#20154
      Size = 30
    end
    object adsMasterDSDesigner8: TDateTimeField
      FieldName = #20445#36136#26085#26399
    end
    object adsMasterDSDesigner9: TStringField
      FieldName = #22791#27880
      Size = 60
    end
    object adsMasterDSDesigner10: TStringField
      FieldName = #20973#21333#29366#24577
      Size = 12
    end
  end
  object PopupMenu1: TPopupMenu
    Left = 320
    Top = 136
  end
end

⌨️ 快捷键说明

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