Chip 1999 Extra/Chip_Extra_1999.iso/top50/netbuddy/netbuddy.exe/NetBuddy.exe/0/RCDATA/TREPORTFORM/TREPORTFORM.txt

Text File | 1999-08-25 | 8KB | 322 lines

object ReportForm: TReportForm
  Left = 321
  Top = 309
  Width = 686
  Height = 460
  HelpContext = 1040
  HorzScrollBar.Visible = False
  VertScrollBar.Visible = False
  BorderIcons = [biSystemMenu, biMaximize]
  Caption = 'Net Buddy report for user : '
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {<image000.ico>}
  Menu = MainMenu1
  OldCreateOrder = True
  Position = poScreenCenter
  OnConstrainedResize = FormConstrainedResize
  OnCreate = FormCreate
  OnResize = FormResize
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 8
    Top = 266
    Width = 73
    Height = 13
    Caption = 'Account Period'
  end
  object Label2: TLabel
    Left = 8
    Top = 316
    Width = 30
    Height = 13
    Caption = 'Month'
  end
  object Label3: TLabel
    Left = 115
    Top = 318
    Width = 22
    Height = 13
    Caption = 'Year'
  end
  object BackGroundImage: TImage
    Left = -1
    Top = -1
    Width = 154
    Height = 102
    Stretch = True
    Visible = False
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 395
    Width = 681
    Height = 19
    Align = alNone
    Anchors = [akLeft, akRight]
    Constraints.MinHeight = 19
    Constraints.MinWidth = 600
    Panels = <
      item
        Text = 'Total Connections : '
        Width = 200
      end
      item
        Text = 'Total Time Online : '
        Width = 200
      end
      item
        Text = 'Total cost :'
        Width = 50
      end>
    SimplePanel = False
  end
  object MonthComboBox: TComboBox
    Left = 7
    Top = 334
    Width = 82
    Height = 21
    Style = csDropDownList
    ItemHeight = 13
    Items.Strings = (
      'January'
      'Febuary'
      'March'
      'April'
      'May'
      'June'
      'July'
      'August'
      'September'
      'October'
      'November'
      'December')
    TabOrder = 1
    OnChange = MonthComboBoxChange
  end
  object YearComboBox: TComboBox
    Left = 115
    Top = 334
    Width = 78
    Height = 21
    Style = csDropDownList
    ItemHeight = 13
    Items.Strings = (
      '1998'
      '1999'
      '2000'
      '2001'
      '2002'
      '2003'
      '2004'
      '2005'
      '2006'
      '2007'
      '2008'
      '2009')
    TabOrder = 2
    OnChange = YearComboBoxChange
  end
  object AccountComboBox: TComboBox
    Left = 7
    Top = 288
    Width = 186
    Height = 21
    Style = csDropDownList
    ItemHeight = 13
    Items.Strings = (
      'January'
      'Febuary'
      'March'
      'April'
      'May'
      'June'
      'July'
      'August'
      'September'
      'October'
      'November'
      'December')
    TabOrder = 3
    OnChange = MonthComboBoxChange
  end
  object Button2: TButton
    Left = 501
    Top = 363
    Width = 75
    Height = 25
    Caption = 'Zoom &out'
    TabOrder = 4
    OnClick = Button2Click
  end
  object Button1: TButton
    Left = 592
    Top = 363
    Width = 73
    Height = 25
    Cancel = True
    Caption = '&Close'
    Default = True
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = []
    ParentFont = False
    TabOrder = 5
    OnClick = Button1Click
  end
  object GroupBox1: TGroupBox
    Left = -4
    Top = -5
    Width = 685
    Height = 7
    TabOrder = 6
  end
  object GraphTreeView: TTreeView
    Left = 6
    Top = 12
    Width = 188
    Height = 80
    HideSelection = False
    Indent = 19
    Items.Data = {
      01000000250000000000000000000000FFFFFFFFFFFFFFFF0000000002000000
      0C477261706820666F726D6174240000000000000000000000FFFFFFFFFFFFFF
      FF00000000000000000B54696D65206F6E6C696E652400000000000000000000
      00FFFFFFFFFFFFFFFF00000000000000000B4F6E6C696E6520636F7374}
    ReadOnly = True
    ShowButtons = False
    TabOrder = 7
    OnChange = GraphTreeViewChange
  end
  object TreeView1: TTreeView
    Left = 6
    Top = 100
    Width = 188
    Height = 157
    HideSelection = False
    Indent = 19
    Items.Data = {
      02000000250000000000000000000000FFFFFFFFFFFFFFFF0000000003000000
      0C477261706820546F74616C73330000000000000000000000FFFFFFFFFFFFFF
      FF00000000000000001A546F74616C20666F722073656C656374656420616363
      6F756E74310000000000000000000000FFFFFFFFFFFFFFFF0000000000000000
      18546F74616C20666F722073656C6563746564206D6F6E746830000000000000
      0000000000FFFFFFFFFFFFFFFF000000000000000017546F74616C20666F7220
      73656C65637465642079656172270000000000000000000000FFFFFFFFFFFFFF
      FF00000000010000000E47726170682041766572616765733300000000000000
      00000000FFFFFFFFFFFFFFFF00000000000000001A4176657261676520757361
      6765207468726F756768207765656B}
    ReadOnly = True
    ShowButtons = False
    TabOrder = 8
    OnChange = TreeView1Change
  end
  object Chart1: TChart
    Left = 200
    Top = 12
    Width = 465
    Height = 345
    Cursor = crCross
    AnimatedZoom = True
    BackWall.Brush.Style = bsClear
    BottomWall.Color = clSilver
    Gradient.Visible = True
    LeftWall.Color = clSilver
    Title.Font.Charset = DEFAULT_CHARSET
    Title.Font.Color = clBlack
    Title.Font.Height = -16
    Title.Font.Name = 'Arial'
    Title.Font.Style = [fsBold]
    Title.Text.Strings = (
      'TChart')
    OnZoom = Chart1Zoom
    BottomAxis.Grid.Visible = False
    Chart3DPercent = 20
    DepthAxis.Title.Caption = 'Monthly Online Time'
    DepthAxis.TitleSize = 4
    Legend.Visible = False
    RightAxis.Visible = False
    TopAxis.Visible = False
    BevelOuter = bvLowered
    BevelWidth = 2
    Color = 14671839
    TabOrder = 9
    OnClick = Chart1Click
    object Series1: TBarSeries
      Marks.ArrowLength = 20
      Marks.Visible = False
      ShowInLegend = False
      BarWidthPercent = 85
      SideMargins = False
      SeriesColor = clRed
      XValues.DateTime = False
      XValues.Name = 'X'
      XValues.Multiplier = 1.000000000000000000
      XValues.Order = loAscending
      YValues.DateTime = False
      YValues.Name = 'Bar'
      YValues.Multiplier = 1.000000000000000000
      YValues.Order = loNone
    end
  end
  object MainMenu1: TMainMenu
    Left = 4
    Top = 492
    object file1: TMenuItem
      Caption = '&File'
      object Exportas1: TMenuItem
        Caption = '&Export as...'
        object Bitmap1: TMenuItem
          Caption = '&Bitmap'
          OnClick = Bitmap1Click
        end
        object WindowsMetaFileWMF1: TMenuItem
          Caption = '&Windows Meta File (WMF)'
          OnClick = WindowsMetaFileWMF1Click
        end
        object EnhancedMetaFileEMF1: TMenuItem
          Caption = 'Enhanced Meta File (EMF)'
          OnClick = EnhancedMetaFileEMF1Click
        end
      end
      object N2: TMenuItem
        Caption = '-'
      end
      object Close1: TMenuItem
        Caption = '&Close'
        OnClick = Close1Click
      end
    end
    object Edit1: TMenuItem
      Caption = '&Edit'
      object GraphSetup1: TMenuItem
        Caption = '&Graph Setup'
        OnClick = GraphSetup1Click
      end
    end
    object Help1: TMenuItem
      Caption = '&Help'
      object NetBuddyreportshelp1: TMenuItem
        Caption = 'Net Buddy reports &help'
        OnClick = NetBuddyreportshelp1Click
      end
    end
  end
  object SaveDialog1: TSaveDialog
    DefaultExt = 'BMP'
    Filter = 'Graphic (*.BMP, *.WMF, *.EMF)|*.BMP;*.WMF;*.EMF'
    Options = [ofOverwritePrompt, ofHideReadOnly]
    Title = 'Save report graph as'
    Left = 7
    Top = 524
  end
end