object fmStockControl: TfmStockControl
  Left = 47
  Top = 106
  HelpContext = 7
  AutoScroll = False
  Caption = 'Stock Control'
  ClientHeight = 432
  ClientWidth = 698
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'Arial'
  Font.Style = []
  FormStyle = fsMDIChild
  Position = poDefaultPosOnly
  Scaled = False
  Visible = True
  OnActivate = FormActivate
  OnClose = FormClose
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  OnDeactivate = FormDeactivate
  PixelsPerInch = 120
  TextHeight = 16
  object Panel1: TPanel
    Left = 0
    Top = 286
    Width = 698
    Height = 146
    Align = alBottom
    TabOrder = 0
    object Bevel1: TBevel
      Left = 5
      Top = 3
      Width = 172
      Height = 135
      Shape = bsFrame
    end
    object Label4: TLabel
      Left = 11
      Top = 12
      Width = 43
      Height = 16
      Caption = 'Price A'
    end
    object Label5: TLabel
      Left = 11
      Top = 36
      Width = 43
      Height = 16
      Caption = 'Price B'
    end
    object Label6: TLabel
      Left = 11
      Top = 61
      Width = 43
      Height = 16
      Caption = 'Price C'
    end
    object Label18: TLabel
      Left = 11
      Top = 111
      Width = 61
      Height = 16
      Caption = 'Cost Price'
    end
    object Bevel2: TBevel
      Left = 180
      Top = 3
      Width = 321
      Height = 135
      Shape = bsFrame
    end
    object Bevel3: TBevel
      Left = 505
      Top = 3
      Width = 188
      Height = 135
      Shape = bsFrame
    end
    object Label27: TLabel
      Left = 191
      Top = 12
      Width = 67
      Height = 16
      Caption = 'Unit of Sale'
    end
    object Label31: TLabel
      Left = 191
      Top = 36
      Width = 96
      Height = 16
      Caption = 'Unit of Purchase'
    end
    object Label19: TLabel
      Left = 191
      Top = 61
      Width = 103
      Height = 16
      Caption = 'Preferred Supplier'
    end
    object Label20: TLabel
      Left = 191
      Top = 86
      Width = 128
      Height = 16
      Caption = 'Supplier'#39's Stock Code'
    end
    object Label2: TLabel
      Left = 192
      Top = 111
      Width = 49
      Height = 16
      Caption = 'Location'
    end
    object lblInStock: TLabel
      Left = 515
      Top = 12
      Width = 48
      Height = 16
      Caption = 'In Stock'
    end
    object lblOnOrder: TLabel
      Left = 515
      Top = 36
      Width = 53
      Height = 16
      Caption = 'On Order'
    end
    object lblReordLev: TLabel
      Left = 515
      Top = 86
      Width = 78
      Height = 16
      Caption = 'Reorder Level'
    end
    object Label8: TLabel
      Left = 515
      Top = 111
      Width = 70
      Height = 16
      Caption = 'Reorder Qty'
    end
    object wwDBEdit6: TwwDBEdit
      Left = 83
      Top = 57
      Width = 90
      Height = 24
      TabStop = False
      Ctl3D = True
      DataField = 'SALEPRICE3'
      DataSource = DM1.dsStock
      ParentColor = True
      ParentCtl3D = False
      ReadOnly = True
      TabOrder = 0
      UnboundDataType = wwDefault
      WantReturns = False
      WordWrap = False
    end
    object wwDBEdit5: TwwDBEdit
      Left = 83
      Top = 32
      Width = 90
      Height = 24
      TabStop = False
      Ctl3D = True
      DataField = 'SALEPRICE2'
      DataSource = DM1.dsStock
      ParentColor = True
      ParentCtl3D = False
      ReadOnly = True
      TabOrder = 1
      UnboundDataType = wwDefault
      WantReturns = False
      WordWrap = False
    end
    object wwDBEdit4: TwwDBEdit
      Left = 83
      Top = 7
      Width = 90
      Height = 24
      TabStop = False
      Ctl3D = True
      DataField = 'SALEPRICE1'
      DataSource = DM1.dsStock
      ParentColor = True
      ParentCtl3D = False
      ReadOnly = True
      TabOrder = 2
      UnboundDataType = wwDefault
      WantReturns = False
      WordWrap = False
    end
    object wwDBEdit16: TwwDBEdit
      Left = 83
      Top = 107
      Width = 90
      Height = 24
      TabStop = False
      Ctl3D = True
      DataField = 'COSTPRICE'
      DataSource = DM1.dsStock
      ParentColor = True
      ParentCtl3D = False
      ReadOnly = True
      TabOrder = 3
      UnboundDataType = wwDefault
      WantReturns = False
      WordWrap = False
    end
    object wwDBEdit24: TwwDBEdit
      Left = 336
      Top = 7
      Width = 90
      Height = 24
      TabStop = False
      Ctl3D = True
      DataField = 'UNITSALE'
      DataSource = DM1.dsStock
      ParentColor = True
      ParentCtl3D = False
      ReadOnly = True
      TabOrder = 4
      UnboundDataType = wwDefault
      WantReturns = False
      WordWrap = False
    end
    object wwDBEdit25: TwwDBEdit
      Left = 336
      Top = 32
      Width = 90
      Height = 24
      TabStop = False
      Ctl3D = True
      DataField = 'UNITPURC'
      DataSource = DM1.dsStock
      ParentColor = True
      ParentCtl3D = False
      ReadOnly = True
      TabOrder = 5
      UnboundDataType = wwDefault
      WantReturns = False
      WordWrap = False
    end
    object wwDBEdit17: TwwDBEdit
      Left = 337
      Top = 57
      Width = 90
      Height = 24
      TabStop = False
      Ctl3D = True
      DataField = 'SUPPLIER'
      DataSource = DM1.dsStock
      ParentColor = True
      ParentCtl3D = False
      ReadOnly = True
      TabOrder = 6
      UnboundDataType = wwDefault
      WantReturns = False
      WordWrap = False
    end
    object wwDBEdit18: TwwDBEdit
      Left = 337
      Top = 82
      Width = 155
      Height = 24
      TabStop = False
      Ctl3D = True
      DataField = 'PARTREF'
      DataSource = DM1.dsStock
      ParentColor = True
      ParentCtl3D = False
      ReadOnly = True
      TabOrder = 7
      UnboundDataType = wwDefault
      WantReturns = False
      WordWrap = False
    end
    object wwDBEdit14: TwwDBEdit
      Left = 337
      Top = 107
      Width = 155
      Height = 24
      TabStop = False
      Ctl3D = True
      DataField = 'LOCATION'
      DataSource = DM1.dsStock
      ParentColor = True
      ParentCtl3D = False
      ReadOnly = True
      TabOrder = 8
      UnboundDataType = wwDefault
      WantReturns = False
      WordWrap = False
    end
    object wwDBEdit1: TwwDBEdit
      Left = 603
      Top = 7
      Width = 85
      Height = 24
      TabStop = False
      Ctl3D = True
      DataField = 'INSTOCK'
      DataSource = DM1.dsStock
      ParentColor = True
      ParentCtl3D = False
      ReadOnly = True
      TabOrder = 9
      UnboundDataType = wwDefault
      WantReturns = False
      WordWrap = False
    end
    object wwDBEdit2: TwwDBEdit
      Left = 603
      Top = 32
      Width = 85
      Height = 24
      TabStop = False
      Ctl3D = True
      DataField = 'ONORDER'
      DataSource = DM1.dsStock
      ParentColor = True
      ParentCtl3D = False
      ReadOnly = True
      TabOrder = 10
      UnboundDataType = wwDefault
      WantReturns = False
      WordWrap = False
    end
    object wwDBEdit3: TwwDBEdit
      Left = 603
      Top = 82
      Width = 85
      Height = 24
      TabStop = False
      Ctl3D = True
      DataField = 'REORDLEV'
      DataSource = DM1.dsStock
      ParentColor = True
      ParentCtl3D = False
      ReadOnly = True
      TabOrder = 11
      UnboundDataType = wwDefault
      WantReturns = False
      WordWrap = False
    end
    object wwDBEdit7: TwwDBEdit
      Left = 603
      Top = 107
      Width = 85
      Height = 24
      TabStop = False
      Ctl3D = True
      DataField = 'REORDQUAN'
      DataSource = DM1.dsStock
      ParentColor = True
      ParentCtl3D = False
      ReadOnly = True
      TabOrder = 12
      UnboundDataType = wwDefault
      WantReturns = False
      WordWrap = False
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 49
    Width = 698
    Height = 237
    Align = alClient
    TabOrder = 1
    object wwDBGrid1: TwwDBGrid
      Left = 1
      Top = 1
      Width = 696
      Height = 235
      Selected.Strings = (
        'STOCKCODE'#9'16'#9'Stock Code'
        'DESC'#9'35'#9'Description'
        'INSTOCK'#9'10'#9'In Stock'
        'ONORDER'#9'10'#9'On Order'#9'F'
        'REORDLEV'#9'10'#9'Reorder~Level'#9'F'
        'SALEPRICE1'#9'10'#9'Price A'
        'COSTPRICE'#9'10'#9'Cost Price'
        'SALEPRICE2'#9'10'#9'Price B'
        'SALEPRICE3'#9'10'#9'Price C'#9'No'
        'DISC1'#9'10'#9'Discount 1'#9'No'
        'DISC2'#9'10'#9'Discount 2'#9'No'
        'DISC3'#9'10'#9'Discount 3'#9'No'
        'LOCATION'#9'15'#9'Location'#9'No'
        'REORDQUAN'#9'10'#9'Re Order~Qty'#9'No'
        'LASTDEL'#9'10'#9'Last~Delivery'#9'No'
        'LASTSALE'#9'10'#9'Last~Sale'#9'No'
        'COMMODITY'#9'15'#9'Commodity'#9'No'
        'FSImage'#9'10'#9'Full~Stock'#9'F'
        'NOMINAL'#9'10'#9'Nominal~Ref'#9'No'
        'NOTEPAD'#9'30'#9'Notepad'#9'No'
        'PARTREF'#9'16'#9'Part Ref'#9'No'
        'PRODGROUP'#9'10'#9'Product~Group'#9'No'
        'PURCNOM'#9'10'#9'Purchase~Nom_Ref'#9'No'
        'PURCVAT'#9'1'#9'Purchase~VC'#9'No'
        'SALESVAT'#9'1'#9'Sales VC'#9'No'
        'SELLINCVAT'#9'5'#9'Selling~VC'#9'No'
        'SUPPLIER'#9'10'#9'Supplier~Ref'#9'No'
        'UNITPURC'#9'10'#9'Unit~Purchase'#9'No'
        'UNITSALE'#9'10'#9'Unit~Sale'#9'No')
      MemoAttributes = [mSizeable, mWordWrap, mGridShow, mViewOnly]
      TitleColor = clBtnFace
      FixedCols = 1
      ShowHorzScrollBar = True
      Align = alClient
      DataSource = DM1.dsStock
      Options = [dgTitles, dgIndicator, dgColumnResize, dgTabs, dgConfirmDelete, dgCancelOnExit, dgWordWrap]
      PopupMenu = RCPopup
      TabOrder = 0
      TitleAlignment = taCenter
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -13
      TitleFont.Name = 'Arial'
      TitleFont.Style = []
      TitleLines = 2
      TitleButtons = True
      UseTFields = False
      OnCalcCellColors = wwDBGrid1CalcCellColors
      OnTitleButtonClick = wwDBGrid1TitleButtonClick
      OnDblClick = BtnEditClick
      IndicatorColor = icBlack
      OnTopRowChanged = wwDBGrid1TopRowChanged
      OnCalcTitleImage = wwDBGrid1CalcTitleImage
      ImageList = ImagesDM.GenralBM
      TitleImageList = ImagesDM.GenralBM
    end
  end
  object SpeedBar: TSpeedBar
    Left = 0
    Top = 0
    Width = 698
    Height = 49
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Position = bpCustom
    Options = [sbAllowResize, sbFlatBtns, sbGrayedBtns, sbTransparentBtns]
    BtnOffsetHorz = 3
    BtnOffsetVert = 3
    BtnWidth = 69
    BtnHeight = 43
    TabOrder = 2
    InternalVer = 1
    object SpeedbarSection1: TSpeedbarSection
      Caption = 'Main'
    end
    object BtnNew: TSpeedItem
      BtnCaption = 'New'
      Caption = 'Add New Stock Item'
      Hint = 'Add New Stock Item|'
      Spacing = 1
      Left = 3
      Top = 3
      Visible = True
      OnClick = BtnNewClick
      SectionName = 'Main'
    end
    object BtnEdit: TSpeedItem
      BtnCaption = 'Edit'
      Caption = 'Edit Stock Item'
      Hint = 'Edit Stock Item|'
      Spacing = 1
      Left = 72
      Top = 3
      Visible = True
      OnClick = BtnEditClick
      SectionName = 'Main'
    end
    object BtnSearch: TSpeedItem
      BtnCaption = 'Search'
      Caption = 'Search for a Stock Item'
      Hint = 'Search for a Stock Item|'
      Spacing = 1
      Left = 141
      Top = 3
      Visible = True
      OnClick = BtnSearchClick
      SectionName = 'Main'
    end
    object BtnAdjust: TSpeedItem
      BtnCaption = 'Adjust'
      Caption = 'Adjust Stock Item'
      Hint = 'Adjust Stock Item|'
      Spacing = 1
      Left = 279
      Top = 3
      Visible = True
      OnClick = BtnAdjustClick
      SectionName = 'Main'
    end
    object BtnSales: TSpeedItem
      BtnCaption = 'Sales'
      Caption = 'Sales'
      Hint = 'Sales|'
      Spacing = 1
      Left = 417
      Top = 3
      Visible = True
      OnClick = BtnSalesClick
      SectionName = 'Main'
    end
    object BtnHistory: TSpeedItem
      BtnCaption = 'History'
      Caption = 'History'
      Hint = 'History|'
      Spacing = 1
      Left = 348
      Top = 3
      Visible = True
      OnClick = BtnHistoryClick
      SectionName = 'Main'
    end
    object BtnFilter: TSpeedItem
      BtnCaption = 'Filter'
      Caption = 'Filter'
      Hint = 'Filter|'
      Spacing = 1
      Left = 555
      Top = 3
      Visible = True
      OnClick = BtnFilterClick
      SectionName = 'Main'
    end
    object BtnReport: TSpeedItem
      BtnCaption = 'Reports'
      Caption = 'Generate Stock Report'
      DropDownMenu = StockReport
      Hint = 'Generate Stock Report|'
      Spacing = 1
      Left = 486
      Top = 3
      Visible = True
      SectionName = 'Main'
    end
    object BtnClose: TSpeedItem
      BtnCaption = 'Close'
      Caption = 'Close'
      Hint = 'Close|'
      Spacing = 1
      Left = 624
      Top = 3
      Visible = True
      OnClick = BtnCloseClick
      SectionName = 'Main'
    end
    object btnProdGrp: TSpeedItem
      BtnCaption = 'Groups'
      Caption = 'Product Groups'
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        0400000000008000000000000000000000001000000010000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00800000888800
        00000FFFF099990FFFF000000088880000008077088888807708800008888880
        0008889988888888998800000088880000000FFFF088880FFFF0000000888800
        0000807708888880770880000888888000088898800000088988889990FFFF09
        9988888990000009988888888807708888888888880000888888}
      Hint = 'Add/Edit Product Groups'
      Spacing = 1
      Left = 210
      Top = 3
      Visible = True
      OnClick = btnProdGrpClick
      SectionName = 'Main'
    end
  end
  object StockReport: TRxPopupMenu
    Alignment = paRight
    LeftMargin = 30
    Style = msOwnerDraw
    OnDrawMargin = StockReportDrawMargin
    Left = 628
    Top = 96
    object StockCheck1: TMenuItem
      Caption = 'Stock Check'
      OnClick = StockCheck1Click
    end
    object PriceList1: TMenuItem
      Caption = 'Price List'
      OnClick = PriceList1Click
    end
    object ReorderReport1: TMenuItem
      Caption = 'Reorder Report'
      OnClick = ReorderReport1Click
    end
    object StockValuation1: TMenuItem
      Caption = 'Stock Valuation'
      OnClick = StockValuation1Click
    end
    object StockSales: TMenuItem
      Caption = 'Stock Sales'
      OnClick = StockSalesClick
    end
    object SalesReport1: TMenuItem
      Caption = 'Stock Profit'
      object PeriodByPeriod1: TMenuItem
        Caption = 'Period Analysis'
        OnClick = PeriodByPeriod1Click
      end
      object PeriodAnalysis1: TMenuItem
        Caption = 'Period By Period'
        OnClick = PeriodAnalysis1Click
      end
    end
  end
  object Sizer1: TSizer
    Enabled = True
    ExceptionAction = eaIgnoreControl
    GridColumnSizing = gcSizeAllColumns
    GridRowSizing = grSizeByDefaults
    MinimumSize = True
    NavigateOnEnter = False
    OverrideParentFont = True
    PerformAssertions = True
    ShowAssertionFailures = False
    StretchFonts = True
    StretchImages = True
    StretchOnResize = True
    ThreadProcessing = False
    Left = 664
    Top = 93
    ScreenWidth = (
      800)
    ScreenHeight = (
      600)
    OriginalFormWidth = (
      706)
    OriginalFormHeight = (
      459)
    OriginalFormLeft = (
      47)
    OriginalFormTop = (
      106)
    OriginalFormPPI = (
      120)
    OriginalClientWidth = (
      698)
    OriginalClientHeight = (
      432)
  end
  object RCPopup: TRxPopupMenu
    OnPopup = RCPopupPopup
    Style = msOwnerDraw
    ShowCheckMarks = False
    OnGetItemParams = RCPopupGetItemParams
    Left = 600
    Top = 97
    object pmNew: TMenuItem
      Caption = 'New'
      OnClick = BtnNewClick
    end
    object pmEdit: TMenuItem
      Caption = 'Edit'
      OnClick = BtnEditClick
    end
    object N1: TMenuItem
      Caption = '-'
    end
    object pmPicture: TMenuItem
      Caption = 'Picture'
      OnClick = pmPictureClick
    end
    object N2: TMenuItem
      Caption = '-'
    end
    object pmAdjustment: TMenuItem
      Caption = 'Stock Adjustment'
      OnClick = BtnAdjustClick
    end
    object pmSales: TMenuItem
      Caption = 'Sales'
      OnClick = BtnSalesClick
    end
    object pmHistory: TMenuItem
      Caption = 'History'
      OnClick = BtnHistoryClick
    end
    object N3: TMenuItem
      Caption = '-'
    end
    object pmChangeGridColour: TMenuItem
      Caption = 'Change Grid Colour'
      OnClick = pmChangeGridColourClick
    end
  end
end