unit_rubb_wassum.dfm

此代码为企业原料管理代码

object Form_Rubb_WasSum: TForm_Rubb_WasSum
  Left = 107
  Top = 35
  Width = 647
  Height = 525
  Caption = '宁波市巨龙橡塑有限公司 炼胶车间管理系统'
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = '宋体'
  Font.Style = []
  OldCreateOrder = False
  OnClose = FormClose
  PixelsPerInch = 96
  TextHeight = 12
  object labDate: TLabel
    Left = 90
    Top = 58
    Width = 7
    Height = 14
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -14
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
  end
  object Label1: TLabel
    Left = 399
    Top = 58
    Width = 56
    Height = 14
    Caption = '打印日期'
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -14
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
  end
  object labCurdate: TLabel
    Left = 460
    Top = 57
    Width = 7
    Height = 14
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -14
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
  end
  object Bevel1: TBevel
    Left = 15
    Top = 74
    Width = 537
    Height = 8
    Shape = bsBottomLine
  end
  object Label2: TLabel
    Left = 19
    Top = 59
    Width = 70
    Height = 14
    Caption = '结帐期限：'
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -14
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
  end
  object DBGrid1: TDBGrid
    Left = 14
    Top = 89
    Width = 611
    Height = 344
    DataSource = DM.DataSource1
    Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
    TabOrder = 0
    TitleFont.Charset = GB2312_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -12
    TitleFont.Name = '宋体'
    TitleFont.Style = []
    Columns = <
      item
        Alignment = taCenter
        Expanded = False
        FieldName = '胶料名称'
        Title.Alignment = taCenter
        Visible = True
      end
      item
        Alignment = taCenter
        Expanded = False
        FieldName = '上月结存'
        Title.Alignment = taCenter
        Width = 67
        Visible = True
      end
      item
        Alignment = taCenter
        Expanded = False
        FieldName = '本月入库'
        Title.Alignment = taCenter
        Width = 69
        Visible = True
      end
      item
        Alignment = taCenter
        Expanded = False
        FieldName = '本月出库'
        Title.Alignment = taCenter
        Visible = True
      end
      item
        Alignment = taCenter
        Expanded = False
        FieldName = '成品重量'
        Title.Alignment = taCenter
        Width = 72
        Visible = True
      end
      item
        Alignment = taCenter
        Expanded = False
        FieldName = '本月库存'
        Title.Alignment = taCenter
        Width = 66
        Visible = True
      end
      item
        Alignment = taCenter
        Expanded = False
        FieldName = '损耗'
        Title.Alignment = taCenter
        Width = 67
        Visible = True
      end
      item
        Alignment = taCenter
        Expanded = False
        FieldName = '百分率'
        Title.Alignment = taCenter
        Visible = True
      end>
  end
  object BitBtn2: TBitBtn
    Left = 344
    Top = 451
    Width = 75
    Height = 25
    Caption = '打印(&P)'
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -14
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    OnClick = BitBtn2Click
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000130B0000130B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
      00033FFFFFFFFFFFFFFF0888888888888880777777777777777F088888888888
      8880777777777777777F0000000000000000FFFFFFFFFFFFFFFF0F8F8F8F8F8F
      8F80777777777777777F08F8F8F8F8F8F9F0777777777777777F0F8F8F8F8F8F
      8F807777777777777F7F0000000000000000777777777777777F3330FFFFFFFF
      03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
      03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
      33333337F3FF7F3733333330F08F0F0333333337F7737F7333333330FFFF0033
      33333337FFFF7733333333300000033333333337777773333333}
    NumGlyphs = 2
  end
  object BitBtn3: TBitBtn
    Left = 435
    Top = 451
    Width = 75
    Height = 25
    Caption = '预览(&V)'
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -14
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 2
    OnClick = BitBtn3Click
  end
  object Panel1: TPanel
    Left = 144
    Top = 8
    Width = 291
    Height = 41
    Caption = ' 炼 胶 车 间 月 报 表'
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlue
    Font.Height = -24
    Font.Name = '宋体'
    Font.Style = [fsBold, fsItalic]
    ParentFont = False
    TabOrder = 3
  end
  object Button1: TButton
    Left = 250
    Top = 451
    Width = 75
    Height = 26
    Cancel = True
    Caption = '退出(ESC)'
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -14
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 4
    OnClick = Button1Click
  end
  object Query1: TQuery
    DatabaseName = 'JL2000'
    Left = 184
    Top = 128
  end
  object Query2: TQuery
    DatabaseName = 'JL2000'
    Left = 224
    Top = 128
  end
  object Query3: TQuery
    DatabaseName = 'JL2000'
    Left = 264
    Top = 128
  end
end