Computer Buyer 1999 September/Dpcb0999.iso/Business/Empire/_SETUP.1/EmpireBuilder.exe/0/RCDATA/TFMVATZOOM/TFMVATZOOM.txt

Text File | 1999-06-21 | 5KB | 243 lines

object fmVATZoom: TfmVATZoom
  Left = 172
  Top = 120
  Width = 596
  Height = 401
  HelpContext = 339
  Caption = 'VAT Drill Down'
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'Arial'
  Font.Style = []
  Scaled = False
  Visible = True
  OnHide = FormHide
  OnShow = FormShow
  PixelsPerInch = 120
  TextHeight = 16
  object Panel1: TPanel
    Left = 0
    Top = 329
    Width = 588
    Height = 45
    Align = alBottom
    BevelInner = bvRaised
    BevelOuter = bvLowered
    TabOrder = 0
    object BtnZoom: TButton
      Left = 7
      Top = 8
      Width = 75
      Height = 30
      Caption = '&Zoom In'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 0
      OnClick = BtnZoomClick
    end
    object BtnClose: TButton
      Left = 88
      Top = 8
      Width = 75
      Height = 30
      Caption = '&Close'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 1
      OnClick = BtnCloseClick
    end
    object btnHelp: TButton
      Left = 505
      Top = 8
      Width = 75
      Height = 30
      Caption = '&Help'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 2
      OnClick = btnHelpClick
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 41
    Width = 588
    Height = 288
    Align = alClient
    BevelInner = bvRaised
    BevelOuter = bvLowered
    TabOrder = 1
    object SGZoomIn: TStringGrid
      Left = 2
      Top = 2
      Width = 584
      Height = 284
      Align = alClient
      RowCount = 11
      Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goDrawFocusSelected]
      TabOrder = 0
      OnDblClick = BtnZoomClick
    end
  end
  object Panel3: TPanel
    Left = 0
    Top = 0
    Width = 588
    Height = 41
    Align = alTop
    BevelInner = bvRaised
    BevelOuter = bvLowered
    TabOrder = 2
    object Label1: TLabel
      Left = 16
      Top = 12
      Width = 55
      Height = 16
      Caption = 'Box Total'
    end
    object CEBoxTotal: TCurrencyEdit
      Left = 92
      Top = 8
      Width = 109
      Height = 24
      AutoSize = False
      DisplayFormat = '0.00'
      ParentColor = True
      TabOrder = 0
    end
  end
  object dsVATTrans: TwwDataSource
    DataSet = taVATTrans
    Left = 524
    Top = 56
  end
  object taVATTrans: TwwTable
    OnCalcFields = taVATTransCalcFields
    ControlType.Strings = (
      'RECONCILE;CheckBox;True;False')
    SyncSQLByRange = True
    NarrowSearch = False
    ValidateWithMask = True
    Left = 552
    Top = 56
    object taVATTransLTRANSTYPE: TStringField
      DisplayLabel = 'Transaction Type'
      DisplayWidth = 25
      FieldName = 'LTRANSTYPE'
      Size = 25
      Calculated = True
    end
    object taVATTransTRANSDATE: TDateField
      DisplayLabel = 'Date'
      DisplayWidth = 10
      FieldName = 'TRANSDATE'
    end
    object taVATTransINVREF: TStringField
      DisplayLabel = 'Reference'
      DisplayWidth = 10
      FieldName = 'INVREF'
      Size = 10
    end
    object taVATTransDETAILS: TStringField
      DisplayLabel = 'Details'
      DisplayWidth = 30
      FieldName = 'DETAILS'
      Size = 30
    end
    object taVATTransNETVALUE: TFloatField
      DisplayLabel = 'Net Value'
      DisplayWidth = 10
      FieldName = 'NETVALUE'
      DisplayFormat = '0.00'
    end
    object taVATTransVATVALUE: TFloatField
      DisplayLabel = 'VAT Value'
      DisplayWidth = 10
      FieldName = 'VATVALUE'
      DisplayFormat = '0.00'
    end
    object taVATTransRECONCILE: TBooleanField
      DisplayLabel = 'Rec'
      DisplayWidth = 5
      FieldName = 'RECONCILE'
    end
    object taVATTransVALUE: TFloatField
      DisplayLabel = 'Value'
      DisplayWidth = 10
      FieldName = 'VALUE'
      Visible = False
      DisplayFormat = '0.00'
    end
    object taVATTransTTRANSNO: TFloatField
      DisplayWidth = 10
      FieldName = 'TTRANSNO'
      Visible = False
    end
    object taVATTransTRANSNO: TFloatField
      DisplayWidth = 10
      FieldName = 'TRANSNO'
      Visible = False
    end
    object taVATTransTRANSTYPE: TStringField
      DisplayWidth = 8
      FieldName = 'TRANSTYPE'
      Visible = False
      Size = 8
    end
    object taVATTransNOMREF: TStringField
      DisplayWidth = 10
      FieldName = 'NOMREF'
      Visible = False
      Size = 10
    end
    object taVATTransMODULE: TStringField
      DisplayWidth = 1
      FieldName = 'MODULE'
      Visible = False
      Size = 1
    end
    object taVATTransVATCODE: TStringField
      DisplayLabel = 'VAT Code'
      FieldName = 'VATCODE'
      Visible = False
      Size = 1
    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 = 488
    Top = 57
    ScreenWidth = (
      800)
    ScreenHeight = (
      600)
    OriginalFormWidth = (
      596)
    OriginalFormHeight = (
      401)
    OriginalFormLeft = (
      172)
    OriginalFormTop = (
      120)
    OriginalFormPPI = (
      120)
    OriginalClientWidth = (
      588)
    OriginalClientHeight = (
      374)
  end
end