object fmDeleteIndPOrd: TfmDeleteIndPOrd Left = 76 Top = 111 HelpContext = 651 AutoScroll = False Caption = 'Delete Purchase Order Individually' ClientHeight = 348 ClientWidth = 679 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] Scaled = False OnCloseQuery = FormCloseQuery OnCreate = FormCreate OnShow = FormShow PixelsPerInch = 120 TextHeight = 16 object Panel1: TPanel Left = 0 Top = 0 Width = 679 Height = 153 Align = alTop BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 0 object wwDBGrid1: TwwDBGrid Left = 2 Top = 2 Width = 675 Height = 149 Selected.Strings = ( 'ORDNO'#9'10'#9'Order No'#9'F' 'PORDTYPE'#9'14'#9'Type'#9'F' 'PODATE'#9'10'#9'Date'#9'F' 'NAME'#9'32'#9'Supplier Name'#9'F' 'INVTOTAL'#9'10'#9'Total'#9'F' 'PrintedIndex'#9'6'#9'Printed'#9'F' 'DeleteIndex'#9'6'#9'Delete'#9'F') TitleColor = clBtnFace FixedCols = 0 ShowHorzScrollBar = True EditControlOptions = [ecoCheckboxSingleClick, ecoSearchOwnerForm] Align = alClient DataSource = DM1.dsMainPurcOrder EditCalculated = True KeyOptions = [] Options = [dgTitles, dgIndicator, dgColumnResize, dgTabs, dgConfirmDelete, dgCancelOnExit, dgWordWrap] PopupMenu = RCMainPopup TabOrder = 0 TitleAlignment = taLeftJustify TitleFont.Charset = DEFAULT_CHARSET TitleFont.Color = clWindowText TitleFont.Height = -13 TitleFont.Name = 'Arial' TitleFont.Style = [] TitleLines = 1 TitleButtons = True UseTFields = False OnCalcCellColors = wwDBGrid1CalcCellColors OnTitleButtonClick = wwDBGrid1TitleButtonClick OnKeyUp = wwDBGrid1KeyUp OnMouseMove = wwDBGrid1MouseMove OnMouseUp = wwDBGrid1MouseUp IndicatorColor = icBlack OnTopRowChanged = wwDBGrid1TopRowChanged OnCalcTitleImage = wwDBGrid1CalcTitleImage ImageList = ImagesDM.GenralBM TitleImageList = ImagesDM.GenralBM object wwDBGrid1IButton: TwwIButton Left = 0 Top = 0 Width = 13 Height = 25 AllowAllUp = True end end end object Panel2: TPanel Left = 0 Top = 303 Width = 679 Height = 45 Align = alBottom BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 1 object BtnDelete: TBitBtn Left = 6 Top = 8 Width = 75 Height = 30 Hint = 'Delete all tagged transactions' Caption = '&Delete' ParentShowHint = False ShowHint = True TabOrder = 0 OnClick = BtnDeleteClick NumGlyphs = 2 end object BtnCancel: TBitBtn Left = 164 Top = 8 Width = 75 Height = 30 Cancel = True Caption = '&Cancel' ModalResult = 2 ParentShowHint = False ShowHint = True TabOrder = 1 NumGlyphs = 2 end object BtnReverse: TBitBtn Left = 85 Top = 8 Width = 75 Height = 30 Hint = 'Reverse the selections' Cancel = True Caption = '&Reverse' ParentShowHint = False ShowHint = True TabOrder = 2 OnClick = BtnReverseClick NumGlyphs = 2 end object BtnHelp: TBitBtn Left = 598 Top = 8 Width = 75 Height = 30 Cancel = True Caption = '&Help' ParentShowHint = False ShowHint = True TabOrder = 3 OnClick = BtnHelpClick NumGlyphs = 2 end end object Panel3: TPanel Left = 0 Top = 156 Width = 679 Height = 147 Align = alClient BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 2 object wwDBGrid2: TwwDBGrid Left = 2 Top = 2 Width = 675 Height = 143 Selected.Strings = ( 'STOCKCODE'#9'16'#9'Stock Code'#9'No' 'DESC'#9'28'#9'Description'#9'No' 'QUAN'#9'8'#9'Qty'#9'No' 'PRICE'#9'10'#9'Price'#9'No' 'DISC'#9'6'#9'Disc%'#9'No' 'SUBTOT'#9'10'#9'Net'#9'F' 'TOTAL'#9'10'#9'Total'#9'No') MemoAttributes = [mSizeable, mWordWrap, mGridShow] TitleColor = clBtnFace FixedCols = 0 ShowHorzScrollBar = True Align = alClient Color = clWhite DataSource = DM1.dsLinePurcOrder Options = [dgTitles, dgIndicator, dgColumnResize, dgTabs, dgConfirmDelete, dgCancelOnExit, dgWordWrap] PopupMenu = RCLinePopup TabOrder = 0 TitleAlignment = taLeftJustify TitleFont.Charset = DEFAULT_CHARSET TitleFont.Color = clWindowText TitleFont.Height = -13 TitleFont.Name = 'Arial' TitleFont.Style = [] TitleLines = 1 TitleButtons = True UseTFields = False OnCalcCellColors = wwDBGrid2CalcCellColors OnCalcTitleAttributes = wwDBGrid2CalcTitleAttributes IndicatorColor = icBlack OnTopRowChanged = wwDBGrid2TopRowChanged object wwDBGrid2IButton: TwwIButton Left = 0 Top = 0 Width = 13 Height = 25 AllowAllUp = True end end end object RxSplitter1: TRxSplitter Left = 0 Top = 153 Width = 679 Height = 3 ControlFirst = Panel1 ControlSecond = Panel3 Align = alTop 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 = 48 Top = 220 ScreenWidth = ( 800) ScreenHeight = ( 600) OriginalFormWidth = ( 687) OriginalFormHeight = ( 375) OriginalFormLeft = ( 76) OriginalFormTop = ( 111) OriginalFormPPI = ( 120) OriginalClientWidth = ( 679) OriginalClientHeight = ( 348) end object RCMainPopup: TRxPopupMenu Style = msOwnerDraw ShowCheckMarks = False OnGetItemParams = RCMainPopupGetItemParams Left = 237 Top = 244 object pmChangeColor: TMenuItem Caption = 'Change Grid Colour' OnClick = pmChangeColorClick end end object RCLinePopup: TRxPopupMenu Style = msOwnerDraw ShowCheckMarks = False OnGetItemParams = RCLinePopupGetItemParams Left = 149 Top = 240 object pmLineGridColour: TMenuItem Caption = 'Change Grid Colour' OnClick = pmLineGridColourClick end end end