object fmBudgetVar: TfmBudgetVar Left = 253 Top = 113 Width = 420 Height = 196 ActiveControl = cbPer1 Caption = 'Budget Variance Report' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] Scaled = False OnActivate = FormActivate OnClose = FormClose OnCloseQuery = FormCloseQuery OnCreate = FormCreate OnShow = FormShow PixelsPerInch = 120 TextHeight = 16 object pnlSelPer: TPanel Left = 0 Top = 0 Width = 412 Height = 86 Align = alTop BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 1 object lblPer1: TLabel Left = 26 Top = 16 Width = 89 Height = 16 Caption = 'Select Period 1' end object lblPer2: TLabel Left = 26 Top = 56 Width = 89 Height = 16 Caption = 'Select Period 2' end object cbPer1: TComboBox Left = 160 Top = 12 Width = 194 Height = 24 Hint = 'Press F1 for help' HelpContext = 501 ItemHeight = 16 Items.Strings = ( 'This Month' 'This Year' 'Last Month' 'Last Year' 'Current Balances') ParentShowHint = False ShowHint = True TabOrder = 0 Text = 'This Month' OnChange = cbPer1Change end object rxcbePer1: TComboEdit Left = 353 Top = 12 Width = 25 Height = 24 Hint = 'Select periods' TabStop = False NumGlyphs = 1 ParentShowHint = False ShowHint = True TabOrder = 1 Text = 'rxcbePer1' OnButtonClick = rxcbePer1ButtonClick end object cbPer2: TComboBox Left = 160 Top = 52 Width = 194 Height = 24 Hint = 'Press F1 for help' HelpContext = 501 ItemHeight = 16 Items.Strings = ( 'This Month' 'This Year' 'Last Month' 'Last Year' 'Current Balances' 'None') ParentShowHint = False ShowHint = True TabOrder = 2 Text = 'This Year' OnChange = cbPer3Change end end object rxcbePer2: TComboEdit Left = 353 Top = 52 Width = 25 Height = 24 Hint = 'Select periods' TabStop = False NumGlyphs = 1 ParentShowHint = False ShowHint = True TabOrder = 0 Text = 'ComboEdit1' OnButtonClick = rxcbePer2ButtonClick end object pnlDIA: TPanel Left = 0 Top = 86 Width = 412 Height = 38 Align = alClient BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 2 object cbDIA: TCheckBox Left = 26 Top = 12 Width = 193 Height = 17 Hint = 'Press F1 for help' HelpContext = 500 Alignment = taLeftJustify Caption = 'Display Individual Accounts' ParentShowHint = False ShowHint = True TabOrder = 0 end end object Panel1: TPanel Left = 0 Top = 124 Width = 412 Height = 45 Align = alBottom BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 3 object btnPrint: TButton Left = 8 Top = 8 Width = 75 Height = 30 Hint = 'Print budget variance report' Caption = '&Print' ParentShowHint = False ShowHint = True TabOrder = 0 OnClick = btnPrintClick end object btnCancel: TButton Left = 248 Top = 8 Width = 75 Height = 30 Caption = '&Cancel' ParentShowHint = False ShowHint = True TabOrder = 3 OnClick = btnCancelClick end object BtnEmail: TButton Left = 168 Top = 8 Width = 75 Height = 30 Hint = 'Email budget variance report' Caption = '&Email' ParentShowHint = False ShowHint = True TabOrder = 2 OnClick = BtnEmailClick end object BtnGraph: TButton Left = 88 Top = 8 Width = 75 Height = 30 Hint = 'View budget variance graph' Caption = '&Graph' ParentShowHint = False ShowHint = True TabOrder = 1 OnClick = BtnGraphClick end object BtnHelp: TButton Left = 328 Top = 8 Width = 75 Height = 30 Caption = '&Help' ParentShowHint = False ShowHint = True TabOrder = 4 OnClick = BtnHelpClick end end object taAccPer: TwwTable Active = True OnCalcFields = taAccPerCalcFields DatabaseName = 'EmpireBuilder' TableName = 'Accper.DBF' SyncSQLByRange = False NarrowSearch = False ValidateWithMask = True Left = 298 Top = 99 object taAccPerPERIOD: TDateField FieldName = 'PERIOD' end object taAccPerMONTH: TSmallintField FieldName = 'MONTH' end object taAccPerYEAR: TSmallintField FieldName = 'YEAR' end object taAccPerPERIODNAME: TStringField FieldName = 'PERIODNAME' Size = 14 Calculated = True end end object Sizer1: TSizer Enabled = True ExceptionAction = eaIgnoreControl GridColumnSizing = gcSizeAllColumns GridRowSizing = grSizeByDefaults MinimumSize = True NavigateOnEnter = True OverrideParentFont = True PerformAssertions = True ShowAssertionFailures = False StretchFonts = True StretchImages = True StretchOnResize = True ThreadProcessing = False Left = 358 Top = 100 ScreenWidth = ( 800) ScreenHeight = ( 600) OriginalFormWidth = ( 420) OriginalFormHeight = ( 196) OriginalFormLeft = ( 253) OriginalFormTop = ( 113) OriginalFormPPI = ( 120) OriginalClientWidth = ( 412) OriginalClientHeight = ( 169) end object taBVTemp: TwwTable SyncSQLByRange = False NarrowSearch = False ValidateWithMask = True Left = 323 Top = 97 object taBVTempACREF: TStringField FieldName = 'ACREF' Size = 10 end object taBVTempNAME: TStringField FieldName = 'NAME' Size = 30 end object taBVTempTYPE: TStringField FieldName = 'TYPE' Size = 14 end object taBVTempCATEGORY: TStringField FieldName = 'CATEGORY' Size = 15 end object taBVTempGROUP: TStringField FieldName = 'GROUP' Size = 30 end object taBVTempAGROUP: TStringField FieldName = 'AGROUP' Size = 30 end object taBVTempBALPER1: TFloatField FieldName = 'BALPER1' end object taBVTempBALPER2: TFloatField FieldName = 'BALPER2' end object taBVTempBUDPER1: TFloatField FieldName = 'BUDPER1' end object taBVTempRATPER1: TFloatField FieldName = 'RATPER1' end object taBVTempBUDPER2: TFloatField FieldName = 'BUDPER2' end object taBVTempRATPER2: TFloatField FieldName = 'RATPER2' end object taBVTempVARPER1: TFloatField FieldName = 'VARPER1' end object taBVTempVARPER2: TFloatField FieldName = 'VARPER2' end end end