object fmDeleteInd: TfmDeleteInd Left = 61 Top = 126 HelpContext = 486 BorderIcons = [biSystemMenu, biMinimize, biMaximize, biHelp] AutoScroll = False Caption = 'Delete Invoices Individually' ClientHeight = 352 ClientWidth = 687 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 = 687 Height = 153 Align = alTop BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 1 object wwDBGrid1: TwwDBGrid Left = 2 Top = 2 Width = 683 Height = 149 Selected.Strings = ( 'INVNO'#9'10'#9'Invoice No.'#9'F' 'INVTYPE'#9'11'#9'Type' 'INVDATE'#9'10'#9'Date'#9'F' 'NAME'#9'28'#9'Customer Name'#9'F' 'INVTOTAL'#9'10'#9'Total' 'PostedIndex'#9'6'#9'Posted'#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.dsMainInvoice 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 = 307 Width = 687 Height = 45 Align = alBottom BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 0 object BtnDelete: TBitBtn Left = 8 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 = 176 Top = 8 Width = 75 Height = 30 Cancel = True Caption = '&Cancel' ModalResult = 2 ParentShowHint = False ShowHint = True TabOrder = 2 NumGlyphs = 2 end object BtnReverse: TBitBtn Left = 92 Top = 8 Width = 75 Height = 30 Hint = 'Reverse selected deletions' Cancel = True Caption = '&Reverse' ParentShowHint = False ShowHint = True TabOrder = 1 OnClick = BtnReverseClick NumGlyphs = 2 end object BtnHelp: TBitBtn Left = 600 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 = 687 Height = 151 Align = alClient BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 2 object wwDBGrid2: TwwDBGrid Left = 2 Top = 2 Width = 683 Height = 147 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' 'SUBTOTAL'#9'10'#9'Net'#9'No' 'TOTAL'#9'10'#9'Total'#9'No') MemoAttributes = [mSizeable, mWordWrap, mGridShow] TitleColor = clBtnFace FixedCols = 0 ShowHorzScrollBar = True Align = alClient Color = clWhite DataSource = DM1.dsLineInvoice 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 = False UseTFields = False OnCalcCellColors = wwDBGrid2CalcCellColors OnCalcTitleAttributes = wwDBGrid2CalcTitleAttributes IndicatorColor = icBlack OnTopRowChanged = wwDBGrid2TopRowChanged end end object RxSplitter1: TRxSplitter Left = 0 Top = 153 Width = 687 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 = 464 Top = 244 ScreenWidth = ( 800) ScreenHeight = ( 600) OriginalFormWidth = ( 695) OriginalFormHeight = ( 379) OriginalFormLeft = ( 61) OriginalFormTop = ( 126) OriginalFormPPI = ( 120) OriginalClientWidth = ( 687) OriginalClientHeight = ( 352) end object RCLinePopup: TRxPopupMenu Style = msOwnerDraw ShowCheckMarks = False OnGetItemParams = RCLinePopupGetItemParams Left = 409 Top = 244 object pmLineGridColour: TMenuItem Caption = 'Change Grid Colour' OnClick = pmLineGridColourClick end end object RCMainPopup: TRxPopupMenu Style = msOwnerDraw ShowCheckMarks = False OnGetItemParams = RCMainPopupGetItemParams Left = 437 Top = 244 object pmChangeColor: TMenuItem Caption = 'Change Grid Colour' OnClick = pmChangeColorClick end end end