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

Text File | 1999-06-21 | 9KB | 399 lines

object fmPLBalSheet: TfmPLBalSheet
  Left = 232
  Top = 115
  Width = 408
  Height = 305
  ActiveControl = cbPer1
  Caption = 'P&L and Balance Sheet Report'
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Scaled = False
  OnActivate = FormActivate
  OnClose = FormClose
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  OnDeactivate = FormDeactivate
  OnShow = FormShow
  PixelsPerInch = 120
  TextHeight = 16
  object pnlSelPer: TPanel
    Left = 0
    Top = 0
    Width = 400
    Height = 196
    Align = alTop
    BevelInner = bvRaised
    BevelOuter = bvLowered
    TabOrder = 0
    OnClick = pnlSelPerClick
    object lblPer1: TLabel
      Left = 26
      Top = 16
      Width = 94
      Height = 16
      Caption = 'Select  Period 1'
    end
    object lblPer2: TLabel
      Left = 26
      Top = 64
      Width = 91
      Height = 16
      Caption = 'Select Period 2'
    end
    object lblPer3: TLabel
      Left = 26
      Top = 112
      Width = 91
      Height = 16
      Caption = 'Select Period 3'
    end
    object lblPer4: TLabel
      Left = 26
      Top = 160
      Width = 91
      Height = 16
      Caption = 'Select Period 4'
    end
    object cbPer1: TComboBox
      Left = 160
      Top = 12
      Width = 189
      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 = 348
      Top = 12
      Width = 25
      Height = 24
      Hint = 'Select Periods'
      TabStop = False
      ButtonHint = 'Select periods'
      NumGlyphs = 1
      ParentShowHint = False
      ShowHint = True
      TabOrder = 1
      Text = 'rxcbePer1'
      OnButtonClick = rxcbePer1ButtonClick
    end
    object cbPer2: TComboBox
      Left = 160
      Top = 60
      Width = 189
      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 = cbPer2Change
    end
    object cbPer3: TComboBox
      Left = 160
      Top = 108
      Width = 189
      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 = 3
      Text = 'None'
      OnChange = cbPer3Change
    end
    object cbPer4: TComboBox
      Left = 160
      Top = 156
      Width = 189
      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 = 4
      Text = 'None'
      OnChange = cbPer4Change
    end
  end
  object rxcbePer2: TComboEdit
    Left = 348
    Top = 60
    Width = 25
    Height = 24
    Hint = 'Select Periods'
    TabStop = False
    ButtonHint = 'Select periods'
    NumGlyphs = 1
    ParentShowHint = False
    ShowHint = True
    TabOrder = 3
    Text = 'ComboEdit1'
    OnButtonClick = rxcbePer2ButtonClick
  end
  object rxcbePer3: TComboEdit
    Left = 348
    Top = 108
    Width = 25
    Height = 24
    Hint = 'Select periods'
    TabStop = False
    ButtonHint = 'Select periods'
    NumGlyphs = 1
    ParentShowHint = False
    ShowHint = True
    TabOrder = 4
    Text = 'ComboEdit1'
    OnButtonClick = rxcbePer3ButtonClick
  end
  object rxcbePer4: TComboEdit
    Left = 348
    Top = 156
    Width = 25
    Height = 24
    Hint = 'Select Periods'
    TabStop = False
    ButtonHint = 'Select periods'
    NumGlyphs = 1
    ParentShowHint = False
    ShowHint = True
    TabOrder = 5
    Text = 'ComboEdit1'
    OnButtonClick = rxcbePer4ButtonClick
  end
  object pnlDIA: TPanel
    Left = 0
    Top = 196
    Width = 400
    Height = 40
    Align = alClient
    BevelInner = bvRaised
    BevelOuter = bvLowered
    TabOrder = 1
    object cbDIA: TCheckBox
      Left = 26
      Top = 12
      Width = 210
      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 = 236
    Width = 400
    Height = 42
    Align = alBottom
    BevelInner = bvRaised
    BevelOuter = bvLowered
    TabOrder = 2
    object btnPrint: TButton
      Left = 8
      Top = 7
      Width = 75
      Height = 30
      Hint = 'Print financial reports'
      Caption = '&Print'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 0
      OnClick = btnPrintClick
    end
    object btnCancel: TButton
      Left = 242
      Top = 7
      Width = 75
      Height = 30
      Hint = 'Close the form'
      Caption = '&Cancel'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 3
      OnClick = btnCancelClick
    end
    object BtnEmail: TButton
      Left = 164
      Top = 7
      Width = 75
      Height = 30
      Hint = 'Email financial report'
      Caption = '&Email'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 2
      OnClick = BtnEmailClick
    end
    object BtnGraph: TButton
      Left = 86
      Top = 7
      Width = 75
      Height = 30
      Hint = 'View financial graph'
      Caption = '&Graph'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 1
      OnClick = BtnGraphClick
    end
    object btnHelp: TButton
      Left = 320
      Top = 7
      Width = 75
      Height = 30
      Caption = '&Help'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 4
      OnClick = btnHelpClick
    end
  end
  object taAccPer: TwwTable
    OnCalcFields = taAccPerCalcFields
    DatabaseName = 'EmpireBuilder'
    TableName = 'Accper.DBF'
    SyncSQLByRange = False
    NarrowSearch = False
    ValidateWithMask = True
    Left = 359
    Top = 197
    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 = 288
    Top = 197
    ScreenWidth = (
      800)
    ScreenHeight = (
      600)
    OriginalFormWidth = (
      408)
    OriginalFormHeight = (
      305)
    OriginalFormLeft = (
      232)
    OriginalFormTop = (
      115)
    OriginalFormPPI = (
      120)
    OriginalClientWidth = (
      400)
    OriginalClientHeight = (
      278)
  end
  object taPLBSTemp: TwwTable
    SyncSQLByRange = False
    NarrowSearch = False
    ValidateWithMask = True
    Left = 324
    Top = 196
    object taPLBSTempACREF: TStringField
      FieldName = 'ACREF'
      Size = 10
    end
    object taPLBSTempNAME: TStringField
      FieldName = 'NAME'
      Size = 30
    end
    object taPLBSTempTYPE: TStringField
      FieldName = 'TYPE'
      Size = 14
    end
    object taPLBSTempCATEGORY: TStringField
      FieldName = 'CATEGORY'
      Size = 15
    end
    object taPLBSTempGROUP: TStringField
      FieldName = 'GROUP'
      Size = 30
    end
    object taPLBSTempAGROUP: TStringField
      FieldName = 'AGROUP'
      Size = 30
    end
    object taPLBSTempBALPER1: TFloatField
      FieldName = 'BALPER1'
    end
    object taPLBSTempBALPER2: TFloatField
      FieldName = 'BALPER2'
    end
    object taPLBSTempBALPER3: TFloatField
      FieldName = 'BALPER3'
    end
    object taPLBSTempBALPER4: TFloatField
      FieldName = 'BALPER4'
    end
  end
end