Computer Buyer 1998 July/dpcb0798.bin/Business/Persdesk/_SETUP.1/PERSYST1.EXE/0/RCDATA/TORGCHART/TORGCHART.txt

Text File | 1998-04-21 | 26KB | 606 lines

object OrgChart: TOrgChart
  Left = 99
  Top = 99
  Width = 652
  Height = 383
  Caption = 'Organisation Chart Creation'
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  KeyPreview = True
  WindowState = wsMaximized
  OnActivate = FormActivate
  OnClose = FormClose
  OnCreate = FormCreate
  OnKeyUp = FormKeyUp
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 644
    Height = 113
    Align = alTop
    TabOrder = 0
    object DrawChart: TExplorerButton
      Left = 144
      Top = 64
      Width = 113
      Height = 41
      Hint = 'Draws all organisation charts for employees'
      Alignment = taLeftJustify
      Caption = 'Draw Chart'
      Options = [boPopupMark, boShowBevel]
      UnselectedFontColor = clRed
      OnClick = DrawChartClick
      ParentShowHint = False
      ShowHint = True
      IBitmap = {}
    end
    object SaveChart: TExplorerButton
      Left = 272
      Top = 8
      Width = 89
      Height = 40
      Hint = 'Save Current chart'
      Bitmap.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        0400000000008000000000000000000000000000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777770000
        000077777777088FF8807777777708FFFF807777777708FFFF8077777777088F
        F8807777777700000000777878777770077777798987770CC0777779998770CC
        CC0087879887700CC000989898987770C077989799987770C077798779877770
        C077799999800000C0777779877CCCCCC0777779877000000077}
      Caption = 'Save Chart'
      Enabled = False
      Options = [boPopupMark, boShowBevel]
      UnselectedFontColor = clBlue
      OnClick = SaveChartClick
      ParentShowHint = False
      ShowHint = True
      IBitmap = {
        424D360300000000000036000000280000001000000010000000010018000000
        00000003000000000000000000000000000000000000BFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBF000000000000000000000000000000000000
        000000000000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0000
        00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000BFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFF000000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0000
        00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000BFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFF000000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0000
        00000000000000000000000000000000000000000000BFBFBFBFBFBFBFBFBFFF
        FFFFBFBFBFFFFFFFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF000000000000BFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFFFFFFFFFFFFFFFFFFFFFFFFFBFBFBFBFBF
        BFBFBFBF000000FFFFFFFFFFFF000000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFFF
        FFFFFFFFFFFFFFFFFFFFFFBFBFBFBFBFBF000000FFFFFFFFFFFFFFFFFFFFFFFF
        000000000000FFFFFFBFBFBFFFFFFFBFBFBFFFFFFFFFFFFFFFFFFFBFBFBFBFBF
        BF000000000000FFFFFFFFFFFF000000000000000000FFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFBFBFBFBFBFBFBFBFBF000000FFFFFF000000
        BFBFBFBFBFBFFFFFFFFFFFFFFFFFFFBFBFBFFFFFFFFFFFFFFFFFFFFFFFFFBFBF
        BFBFBFBFBFBFBF000000FFFFFF000000BFBFBFBFBFBFBFBFBFFFFFFFFFFFFFBF
        BFBFBFBFBFFFFFFFFFFFFFBFBFBFBFBFBFBFBFBFBFBFBF000000FFFFFF000000
        BFBFBFBFBFBFBFBFBFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000000000
        00000000000000000000FFFFFF000000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFFF
        FFFFFFFFFFBFBFBFBFBFBFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFFFFFFFFFFFFFBFBFBFBFBFBF0000000000
        00000000000000000000000000000000BFBFBFBFBFBF}
    end
    object PrintChart: TExplorerButton
      Left = 272
      Top = 64
      Width = 89
      Height = 40
      Hint = 'Print Current'
      Bitmap.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        0400000000008000000000000000000000000000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00700000000000
        7777088888888888077707B7B7B7B79707770B7B7B7B7B7B077707B7B7B7B7B7
        0777000000000000077770F8888888F0777770FFFFFFFFF07777770F8888888F
        0777770FFFFFFFFF07777770F888888FF0007770FFFFFFFFF0F077770F888888
        8F0F777770000000000077777777777777777777777777777777}
      Caption = 'Print Chart'
      Enabled = False
      Options = [boPopupMark, boShowBevel]
      UnselectedFontColor = clBlue
      OnClick = PrintChartClick
      ParentShowHint = False
      ShowHint = True
      IBitmap = {
        424D360300000000000036000000280000001000000010000000010018000000
        00000003000000000000000000000000000000000000BFBFBF00000000000000
        0000000000000000000000000000000000000000000000000000BFBFBFBFBFBF
        BFBFBFBFBFBF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFF000000BFBFBFBFBFBFBFBFBF000000BFBFBFFFFFFFBF
        BFBFFFFFFFBFBFBFFFFFFFBFBFBFFFFFFFBFBFBFFFFFFFBFBFBF000000BFBFBF
        BFBFBFBFBFBF000000FFFFFFBFBFBFFFFFFFBFBFBFFFFFFFBFBFBFFFFFFFBFBF
        BFFFFFFFBFBFBFFFFFFF000000BFBFBFBFBFBFBFBFBF000000BFBFBFFFFFFFBF
        BFBFFFFFFFBFBFBFFFFFFFBFBFBFFFFFFFBFBFBFFFFFFFBFBFBF000000BFBFBF
        BFBFBFBFBFBF0000000000000000000000000000000000000000000000000000
        00000000000000000000000000BFBFBFBFBFBFBFBFBFBFBFBF000000FFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000BFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFF000000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF000000FF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000BFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFF000000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF00
        0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000
        000000000000BFBFBFBFBFBFBFBFBF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFF000000FFFFFF000000BFBFBFBFBFBFBFBFBFBF
        BFBF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        000000FFFFFFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0000000000000000000000
        00000000000000000000000000000000000000000000BFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF}
    end
    object Exitbutton: TExplorerButton
      Left = 376
      Top = 64
      Width = 89
      Height = 40
      Hint = 'Close Organisation Chart Unit'
      Bitmap.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        0400000000008000000000000000000000000000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777770000007
        7777777000099000077777000799997000777007777997770007700077777777
        7007007007799777770000770079977777000077700997777700007777999977
        7700007779999997770000777999999077007007799999900007700777999977
        0007770077799777007777700007700007777777700000077777}
      Caption = 'Exit'
      Options = [boMonoDisplay, boPopupMark, boShowBevel]
      OnClick = ExitbuttonClick
      ParentShowHint = False
      ShowHint = True
      IBitmap = {
        424D360300000000000036000000280000001000000010000000010018000000
        00000003000000000000000000000000000000000000BFBFBFBFBFBFBFBFBFBF
        BFBFBFBFBF000000000000000000000000000000000000BFBFBFBFBFBFBFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBF000000000000000000000000FFFFFFFFFF
        FF000000000000000000000000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBF00000000
        0000000000BFBFBFFFFFFFFFFFFFFFFFFFFFFFFFBFBFBF000000000000000000
        BFBFBFBFBFBFBFBFBF000000000000BFBFBFBFBFBFBFBFBFBFBFBFFFFFFFFFFF
        FFBFBFBFBFBFBFBFBFBF000000000000000000BFBFBFBFBFBF00000000000000
        0000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF000000
        000000BFBFBF000000000000BFBFBF000000000000BFBFBFBFBFBFFFFFFFFFFF
        FFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF000000000000000000000000BFBFBFBF
        BFBF000000000000BFBFBFFFFFFFFFFFFFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
        000000000000000000000000BFBFBFBFBFBFBFBFBF000000000000FFFFFFFFFF
        FFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF000000000000000000000000BFBFBFBF
        BFBFBFBFBFBFBFBFFFFFFFFFFFFFFFFFFFFFFFFFBFBFBFBFBFBFBFBFBFBFBFBF
        000000000000000000000000BFBFBFBFBFBFBFBFBFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFBFBFBFBFBFBFBFBFBF000000000000000000000000BFBFBFBF
        BFBFBFBFBFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000BFBFBFBFBFBF
        000000000000BFBFBF000000000000BFBFBFBFBFBFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFF000000000000000000000000BFBFBFBFBFBF000000000000BF
        BFBFBFBFBFBFBFBFFFFFFFFFFFFFFFFFFFFFFFFFBFBFBFBFBFBF000000000000
        000000BFBFBFBFBFBFBFBFBF000000000000BFBFBFBFBFBFBFBFBFFFFFFFFFFF
        FFBFBFBFBFBFBFBFBFBF000000000000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBF00
        0000000000000000000000BFBFBFBFBFBF000000000000000000000000BFBFBF
        BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF0000000000000000000000
        00000000000000BFBFBFBFBFBFBFBFBFBFBFBFBFBFBF}
    end
    object Colorbutton: TExplorerButton
      Left = 584
      Top = 16
      Width = 49
      Height = 89
      Hint =
        'Press to change the style and background colour of employee boxe' +
        's.'
      Bitmap.Data = {
        96010000424D9601000000000000760000002800000018000000180000000100
        0400000000002001000000000000000000000000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3333333333333333333333333333333333333333333333333333333333333333
        8000000000000000033333338CCC0DDD0EEE0FFF033333338CCC0DDD0EEE0FFF
        033333338CCC0DDD0EEE0FFF0333333380000000000000000333333387770777
        0AAA0BBB03333333877707770AAA0BBB03333333877707770AAA0BBB03333333
        8000000000000000033333338444055506660888033333338444055506660888
        0333333384440555066608880333333380000000000000000333333380000111
        02220B1B0333333380000111022201B1033333338000011102220B1B03333333
        8888888888888888833333333333333333333333333333333333333333333333
        3333333333333333333333333333333333333333333333333333}
      Caption = 'Line and Box Button'
      Options = [boPopupMark, boShowBevel]
      UnselectedFontColor = clGreen
      WordWrap = True
      OnClick = ColourbuttonClick
      ParentShowHint = False
      ShowHint = True
      IBitmap = {
        424DF60600000000000036000000280000001800000018000000010018000000
        0000C006000000000000000000000000000000000000007F7F007F7F007F7F00
        7F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F
        007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F
        7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F00
        7F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F
        007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F
        7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F00
        7F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7FFFFFFF000000
        0000000000000000000000000000000000000000000000000000000000000000
        00000000000000000000000000007F7F007F7F007F7F007F7F007F7F007F7F00
        7F7FFFFFFFFFFFFFFFFFFFFFFFFF000000FFFFFFFFFFFFFFFFFF000000FFFFFF
        FFFFFFFFFFFF000000FFFFFFFFFFFFFFFFFF000000007F7F007F7F007F7F007F
        7F007F7F007F7F007F7FFFFFFFFFFFFFFFFFFFFFFFFF000000FFFFFFFFFFFFFF
        FFFF000000FFFFFFFFFFFFFFFFFF000000FFFFFFFFFFFFFFFFFF000000007F7F
        007F7F007F7F007F7F007F7F007F7F007F7FFFFFFFFFFFFFFFFFFFFFFFFF0000
        00FFFFFFFFFFFFFFFFFF000000FFFFFFFFFFFFFFFFFF000000FFFFFFFFFFFFFF
        FFFF000000007F7F007F7F007F7F007F7F007F7F007F7F007F7FFFFFFF000000
        0000000000000000000000000000000000000000000000000000000000000000
        00000000000000000000000000007F7F007F7F007F7F007F7F007F7F007F7F00
        7F7FFFFFFFFFFFFFFFFFFFFFFFFF000000FFFFFFFFFFFFFFFFFF000000FFFFFF
        FFFFFFFFFFFF000000FFFFFFFFFFFFFFFFFF000000007F7F007F7F007F7F007F
        7F007F7F007F7F007F7FFFFFFFFFFFFFFFFFFFFFFFFF000000FFFFFFFFFFFFFF
        FFFF000000FFFFFFFFFFFFFFFFFF000000FFFFFFFFFFFFFFFFFF000000007F7F
        007F7F007F7F007F7F007F7F007F7F007F7FFFFFFFFFFFFFFFFFFFFFFFFF0000
        00FFFFFFFFFFFFFFFFFF000000FFFFFFFFFFFFFFFFFF000000FFFFFFFFFFFFFF
        FFFF000000007F7F007F7F007F7F007F7F007F7F007F7F007F7FFFFFFF000000
        0000000000000000000000000000000000000000000000000000000000000000
        00000000000000000000000000007F7F007F7F007F7F007F7F007F7F007F7F00
        7F7FFFFFFF7F7F7F7F7F7F7F7F7F000000FFFFFFFFFFFFFFFFFF000000FFFFFF
        FFFFFFFFFFFF000000FFFFFFFFFFFFFFFFFF000000007F7F007F7F007F7F007F
        7F007F7F007F7F007F7FFFFFFF7F7F7F7F7F7F7F7F7F000000FFFFFFFFFFFFFF
        FFFF000000FFFFFFFFFFFFFFFFFF000000FFFFFFFFFFFFFFFFFF000000007F7F
        007F7F007F7F007F7F007F7F007F7F007F7FFFFFFF7F7F7F7F7F7F7F7F7F0000
        00FFFFFFFFFFFFFFFFFF000000FFFFFFFFFFFFFFFFFF000000FFFFFFFFFFFFFF
        FFFF000000007F7F007F7F007F7F007F7F007F7F007F7F007F7FFFFFFF000000
        0000000000000000000000000000000000000000000000000000000000000000
        00000000000000000000000000007F7F007F7F007F7F007F7F007F7F007F7F00
        7F7FFFFFFF0000000000000000000000007F7F7F7F7F7F7F7F7F0000007F7F7F
        7F7F7F7F7F7F000000FFFFFF7F7F7FFFFFFF000000007F7F007F7F007F7F007F
        7F007F7F007F7F007F7FFFFFFF0000000000000000000000007F7F7F7F7F7F7F
        7F7F0000007F7F7F7F7F7F7F7F7F0000007F7F7FFFFFFF7F7F7F000000007F7F
        007F7F007F7F007F7F007F7F007F7F007F7FFFFFFF0000000000000000000000
        007F7F7F7F7F7F7F7F7F0000007F7F7F7F7F7F7F7F7F000000FFFFFF7F7F7FFF
        FFFF000000007F7F007F7F007F7F007F7F007F7F007F7F007F7FFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFF007F7F007F7F007F7F007F7F007F7F007F7F00
        7F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F
        007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F
        7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F00
        7F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F
        007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F
        7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F00
        7F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F
        007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F
        7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F}
    end
    object Label1: TLabel
      Left = 368
      Top = 8
      Width = 117
      Height = 13
      Caption = 'Select Company to Draw'
    end
    object GroupBox1: TGroupBox
      Left = 8
      Top = 8
      Width = 129
      Height = 89
      Caption = 'Organisation Elements'
      TabOrder = 0
      object Namebutton: TCheckBox
        Left = 8
        Top = 16
        Width = 97
        Height = 17
        Hint = 'To show employee names on chart'
        Caption = 'Employee Name'
        ParentShowHint = False
        ShowHint = True
        State = cbChecked
        TabOrder = 0
      end
      object JobTitlebutton: TCheckBox
        Left = 8
        Top = 32
        Width = 97
        Height = 17
        Hint = 'To show employee job title on chart'
        Caption = 'Job Title'
        ParentShowHint = False
        ShowHint = True
        State = cbChecked
        TabOrder = 1
      end
      object Departmentbutton: TCheckBox
        Left = 8
        Top = 48
        Width = 97
        Height = 17
        Hint = 'To show employee department on chart'
        Caption = 'Department'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 2
      end
      object Sectionbutton: TCheckBox
        Left = 8
        Top = 64
        Width = 97
        Height = 17
        Hint = 'To show employee section on chart'
        Caption = 'Section'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 3
      end
    end
    object Fontbutton: TBitBtn
      Left = 144
      Top = 8
      Width = 113
      Height = 41
      Hint = 'Select new font for all of the employee entries'
      Caption = 'Element Font'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 1
      OnClick = FontbuttonClick
      Glyph.Data = {
        76020000424D7602000000000000760000002800000020000000200000000100
        0400000000000002000000000000000000000000000010000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
        FFFFFFFFFFFF77777FFFFFFFFFFFFFFFFFFFFFFFFF70000077FFFFFFFFFFFFFF
        FFFFFFFFF00BBBBB077FFFFFFFFFFFFFFFFFFFFF0BBB0000B077F777FFFFFFFF
        F77777F0BBB0FFFF0B070007FFFFFFFF000007F0BB07FFFFF00F09077FFFFFFF
        09990F0BBB07FFFFFFFFF0907777777099907F0BBB07FFFFFFFFF09990000000
        99907F0BBB07FFFFFFFFFF09999999999907FF0BBB07FFFFFF77FF0990000009
        990FFF0BBB07FFFF0007FFF0907FF099907FFFF0BB077FFF0B07FFF09077F099
        907FFFF0BBB07770BB07FFFF0907099907FFFFFF0BBB000BBB07FFFF09070999
        07FFFFFF00BBBBBBBB07FFFFF09099907FFFFFFF77000000000FFFFFF0999990
        F7FFFFF00007FFFFFFFFFFFFFF0999070F7700CCCCC077FFFFFFFFFFFF09990F
        F000CCCCCC00077FFFFFFFFFFFF0907FFF0CCCCC00FF0077FFFFFFFFFFF090FF
        FFF0CCC0FFFF0C077FFFFFFFFFFF0FFFFFF0000FFFFF0CC07FFFFFFFFFFFFFFF
        FFF0C077F770CCC07FFFFFFFFFFFFFFFF7F0CC07000CCCC0FFFFFFFFFFFFFFFF
        0FF0CC07F0CCCC0FFFFFFFFFFFFFFFF07FF0CC07FF0000FFFFFFFFFFFFFFFFF0
        77F0CC07FFF0077FFFFFFFFFFFFFFFF00770CC07FF0CC077FFFFFFFFFFFFFFF0
        C00CCC0770CCCC07FFFFFFFFFFFFFFF0CCCCCC000CCC000FFFFFFFFFFFFFFFFF
        0CCCCFFF0CC0FFFFFFFFFFFFFFFFFFFFF0000FFFF00FFFFFFFFF}
      Layout = blGlyphRight
    end
    object AniIcon1: TAniIcon
      Left = 216
      Top = 68
      Width = 32
      Height = 32
      AniFile.Data = {
        524946469C06000041434F4E4C4953544C000000494E464F494E414D0D000000
        48616E6420284E452D53572900084941525429000000436F7079726967687420
        2843292031393933204D6963726F736F667420436F72706F726174696F6E0000
        616E696824000000240000000200000002000000000000000000000000000000
        0000000008000000010000004C495354100600006672616D69636F6EFE020000
        0000020001002020000016000800E80200001600000028000000200000004000
        0000010004000000000080020000000000000000000000000000000000000000
        000000008000008000000080800080000000800080008080000080808000C0C0
        C0000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000400000000000000000000000000000044400000000000000000000000
        0000044444000000000000000000000000004444440000000000000000000000
        0004444444000000000000000000000000CC4444440000000000000000000000
        0CCCC44440F80000000000000000000004CCCC440FFF80000000000000000000
        004CCCC0FFFFF80000000000000000000004440FFFFFFF800000000000000000
        000007FFFFFFFFF80000000000000000000007FFFFFFFFFF8000000000000000
        000007FFFFFFFFFFF800000000000000000007FFFFFFFFFFFF80000000000000
        000007FFFFFFFFFFFF80000000000000000007FFFFFFFFFFFFF8000000000000
        000007FFFFFFFFFFFFF8000000000000000007FFFFFFF8777FFF800000000000
        000007FFFFF7F80007FF800000000000000007F7F7F7F800007F800000000000
        000007F7F7F7F800007F800000000000000007F7F7F7FF80000F800000000000
        00000077F7FF7FF8888000000000000000000007FF7FF7FFFFF8000000000000
        000000007FF7FF7777700000000000000000000007FF7FFFF000000000000000
        0000000000777777700000000000000000000000000000000000000000000000
        000000000000000000000000000000000000000000000000000000000000FFFF
        FFFFFFFFFFFFFFE7FFFFFFC3FFFFFF81FFFFFF01FFFFFE01FFFFFC00FFFFF800
        7FFFF8003FFFFC001FFFFE000FFFFF8007FFFF8003FFFF8001FFFF8000FFFF80
        00FFFF80007FFF80007FFF80003FFF80183FFF801C3FFF801C3FFF80003FFFC0
        003FFFE0007FFFF000FFFFF803FFFFFC07FFFFFFFFFFFFFFFFFFFFFFFFFF6963
        6F6EFE0200000000020001002020000016000800E80200001600000028000000
        2000000040000000010004000000000080020000000000000000000000000000
        0000000000000000000080000080000000808000800000008000800080800000
        80808000C0C0C0000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000
        FFFFFF0000000000000000000000000000000000000000000000000000000000
        0000000000000000000400000000000000000000000000000044400000000000
        0000000000000000044444000000000000000000000000004444440000000000
        0000000000000004444444000000000000000000000000CC4444440000000000
        0000000000000CCCC44440F80000000000000000000004CCCC440FFF80000000
        000000000000004CCCC0FFFFF80000000000000000000004440FFFFFFF800000
        000000000000000007FFFFFFFFF80000000000000000000007FFFFFFFFFF8000
        000000000000000007FFFFFFFFFFF800000000000000000007FFFFFFFFFFFF00
        00000000000000007FFFFFFFFFFFFF8000000000000000007FFFFFFFFFFFFF80
        00000000000000007FFFFFFF8777FF8000000000000000007FFFFF7F80007F80
        00000000000000007F7F7F7F80007F8000000000000000007F7F7F7F80000F80
        00000000000000007F7F7F7FF88880000000000000000000077F7FF7FFFFF000
        0000000000000000007FF7FF7777000000000000000000000007FF7FFF000000
        0000000000000000000077777700000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        00000000FFFFFFFFFFFFFFFFFFE7FFFFFFC3FFFFFF81FFFFFF01FFFFFE01FFFF
        FC00FFFFF8007FFFF8003FFFFC001FFFFE000FFFFF8007FFFF8003FFFF8001FF
        FF8001FFFF0000FFFF0000FFFF0000FFFF0030FFFF0030FFFF0000FFFF0001FF
        FF8003FFFFC007FFFFE01FFFFFF03FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFF}
      Animated = True
      Frame = 0
    end
    object pageview: TRadioGroup
      Left = 480
      Top = 56
      Width = 97
      Height = 49
      Caption = 'Page View'
      ItemIndex = 0
      Items.Strings = (
        'Landscape'
        'Portrait')
      TabOrder = 3
    end
    object DBLookupComboBox1: TDBLookupComboBox
      Left = 368
      Top = 24
      Width = 201
      Height = 21
      KeyField = 'Name'
      ListField = 'Name;Company Postcode'
      ListSource = companyset
      TabOrder = 4
    end
  end
  object PageControl1: TPageControl
    Left = 0
    Top = 113
    Width = 644
    Height = 223
    Align = alClient
    MultiLine = True
    TabOrder = 1
  end
  object Panel2: TPanel
    Left = 0
    Top = 336
    Width = 644
    Height = 20
    Align = alBottom
    Font.Color = clRed
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 2
  end
  object FontDialog1: TFontDialog
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = []
    Device = fdBoth
    MinFontSize = 0
    MaxFontSize = 0
    Options = [fdTrueTypeOnly, fdEffects, fdShowHelp]
    Left = 520
  end
  object Employee: TTable
    DatabaseName = 'Personnel_System'
    IndexFieldNames = 'Employee ID'
    TableName = 'Employee.DB'
    Left = 392
    Top = 24
    object EmployeeEmployeeID: TStringField
      FieldName = 'Employee ID'
      Size = 9
    end
    object EmployeeSurname: TStringField
      FieldName = 'Surname'
      Size = 25
    end
    object EmployeeFirstNames: TStringField
      FieldName = 'First Names'
      Size = 35
    end
    object EmployeeTitle: TStringField
      FieldName = 'Title'
      Size = 4
    end
    object EmployeeJobTitle: TStringField
      FieldName = 'Job Title'
      Size = 30
    end
    object EmployeeReportTo: TStringField
      FieldName = 'Report To'
      Size = 9
    end
    object EmployeeCompanyName: TStringField
      FieldName = 'Company Name'
      Size = 40
    end
  end
  object Employeeset: TDataSource
    DataSet = Employee
    Left = 456
    Top = 8
  end
  object Empljob: TTable
    DatabaseName = 'Personnel_System'
    IndexFieldNames = 'Employee ID'
    MasterFields = 'Employee ID'
    MasterSource = Employeeset
    TableName = 'Empljob.DB'
    Left = 432
    Top = 72
    object EmpljobEmployeeID: TStringField
      FieldName = 'Employee ID'
      Size = 9
    end
    object EmpljobJobTitle: TStringField
      FieldName = 'Job Title'
      Size = 30
    end
    object EmpljobDepartment: TStringField
      FieldName = 'Department'
      Size = 30
    end
    object EmpljobSection: TStringField
      FieldName = 'Section'
      Size = 30
    end
    object EmpljobBossID: TStringField
      FieldName = 'Boss ID'
      Size = 9
    end
    object EmpljobLevel: TIntegerField
      FieldName = 'Level'
    end
    object EmpljobJobstartdate: TDateField
      FieldName = 'Job start date'
    end
    object EmpljobJobenddate: TDateField
      FieldName = 'Job end date'
    end
  end
  object empljobset: TDataSource
    DataSet = Empljob
    Left = 400
    Top = 64
  end
  object Company: TTable
    DatabaseName = 'Personnel_System'
    IndexFieldNames = 'Name;Company Postcode'
    TableName = 'Company.DB'
    Left = 408
    Top = 40
    object CompanyName: TStringField
      FieldName = 'Name'
      Size = 40
    end
    object CompanyCompanyPostcode: TStringField
      FieldName = 'Company Postcode'
      Size = 12
    end
  end
  object companyset: TDataSource
    DataSet = Company
    Left = 424
    Top = 24
  end
  object PrintDialog1: TPrintDialog
    PrintRange = prSelection
    Left = 392
    Top = 56
  end
  object SaveDialog1: TSaveDialog
    DefaultExt = 'BMP'
    FileEditStyle = fsEdit
    Filter = 'Bitmap|BMP'
    Left = 424
    Top = 8
  end
end