object DiagForm: TDiagForm
  Left = 384
  Top = 240
  BorderStyle = bsToolWindow
  Caption = 'Device Diagnostics Monitor'
  ClientHeight = 551
  ClientWidth = 444
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  PixelsPerInch = 96
  TextHeight = 13
  object GrpFilters: TGroupBox
    Left = 8
    Top = 8
    Width = 425
    Height = 125
    Caption = ' Messages to Display '
    TabOrder = 0
    object ChkCPU: TCheckBox
      Left = 12
      Top = 20
      Width = 97
      Height = 17
      Caption = 'CPU'
      TabOrder = 0
      OnClick = ChkTypeModified
    end
    object ChkPIC: TCheckBox
      Tag = 1
      Left = 115
      Top = 20
      Width = 97
      Height = 17
      Caption = 'PIC/EEPROM'
      TabOrder = 1
      OnClick = ChkTypeModified
    end
    object ChkTimer: TCheckBox
      Tag = 2
      Left = 218
      Top = 20
      Width = 97
      Height = 17
      Caption = 'Timer'
      TabOrder = 2
      OnClick = ChkTypeModified
    end
    object ChkAudio: TCheckBox
      Tag = 3
      Left = 321
      Top = 20
      Width = 97
      Height = 17
      Caption = 'Audio'
      TabOrder = 3
      OnClick = ChkTypeModified
    end
    object ChkVideo: TCheckBox
      Tag = 6
      Left = 218
      Top = 40
      Width = 97
      Height = 17
      Caption = 'Video'
      TabOrder = 4
      OnClick = ChkTypeModified
    end
    object ChkOSCAMisc: TCheckBox
      Tag = 4
      Left = 12
      Top = 40
      Width = 97
      Height = 17
      Caption = 'OSCA Misc'
      TabOrder = 5
      OnClick = ChkTypeModified
    end
    object ChkPalette: TCheckBox
      Tag = 5
      Left = 115
      Top = 40
      Width = 97
      Height = 17
      Caption = 'Palette'
      TabOrder = 6
      OnClick = ChkTypeModified
    end
    object ChkKBMouse: TCheckBox
      Tag = 7
      Left = 321
      Top = 40
      Width = 97
      Height = 17
      Caption = 'KB/Mouse'
      TabOrder = 7
      OnClick = ChkTypeModified
    end
    object ChkMathsUnit: TCheckBox
      Tag = 8
      Left = 12
      Top = 63
      Width = 97
      Height = 17
      Caption = 'Maths Unit'
      TabOrder = 8
      OnClick = ChkTypeModified
    end
    object ChkSDMMC: TCheckBox
      Tag = 9
      Left = 115
      Top = 60
      Width = 97
      Height = 17
      Caption = 'SD/MMC'
      TabOrder = 9
      OnClick = ChkTypeModified
    end
    object ChkRS232: TCheckBox
      Tag = 10
      Left = 218
      Top = 60
      Width = 97
      Height = 17
      Caption = 'RS232'
      TabOrder = 10
      OnClick = ChkTypeModified
    end
    object ChkUnused8: TCheckBox
      Tag = 11
      Left = 321
      Top = 60
      Width = 96
      Height = 17
      Caption = 'Unused'
      TabOrder = 11
      OnClick = ChkTypeModified
    end
    object ChkLogToFile: TCheckBox
      Left = 12
      Top = 96
      Width = 397
      Height = 17
      Caption = 
        'Log ALL Messages to Log File (CAUTION! Large file produced, VERY' +
        ' SLOW)'
      TabOrder = 12
      OnClick = ChkLogModified
    end
  end
  object ListMessages: TListView
    Left = 8
    Top = 139
    Width = 425
    Height = 372
    Columns = <
      item
        Caption = 'Type'
        Width = 60
      end
      item
        Caption = 'Diagnostic Message'
        Width = 340
      end>
    ColumnClick = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Courier New'
    Font.Style = []
    GridLines = True
    ParentFont = False
    TabOrder = 1
    ViewStyle = vsReport
  end
  object BtnClear: TBitBtn
    Left = 8
    Top = 517
    Width = 75
    Height = 25
    Caption = 'Clear'
    DoubleBuffered = True
    ParentDoubleBuffered = False
    TabOrder = 2
    OnClick = BtnClearClick
  end
  object BtnCopy: TBitBtn
    Left = 89
    Top = 518
    Width = 75
    Height = 25
    Caption = 'Copy All'
    DoubleBuffered = True
    ParentDoubleBuffered = False
    TabOrder = 3
    OnClick = BtnCopyClick
  end
  object BtnExport: TBitBtn
    Left = 170
    Top = 517
    Width = 75
    Height = 25
    Caption = 'Export All...'
    DoubleBuffered = True
    ParentDoubleBuffered = False
    TabOrder = 4
    OnClick = BtnExportClick
  end
  object BtnClose: TBitBtn
    Left = 358
    Top = 517
    Width = 75
    Height = 25
    Caption = 'Close'
    DoubleBuffered = True
    ParentDoubleBuffered = False
    TabOrder = 5
    OnClick = BtnCloseClick
  end
  object SaveDialog: TSaveDialog
    DefaultExt = 'txt'
    Filter = 'Text Files|*.txt'
    Options = [ofOverwritePrompt, ofHideReadOnly, ofPathMustExist, ofEnableSizing]
    Title = 'Export Diagnostic Messages'
    Left = 288
    Top = 517
  end
end
