object SelfTest: TSelfTest
  Left = 206
  Top = 235
  BorderStyle = bsDialog
  Caption = 'SelfTest'
  ClientHeight = 347
  ClientWidth = 647
  Color = clBtnFace
  ParentFont = True
  OldCreateOrder = True
  Position = poScreenCenter
  PixelsPerInch = 96
  TextHeight = 13
  object OKBtn: TButton
    Left = 560
    Top = 304
    Width = 83
    Height = 33
    Caption = 'OK'
    Default = True
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ModalResult = 1
    ParentFont = False
    TabOrder = 0
  end
  object SgST: TStringGrid
    Left = 0
    Top = 0
    Width = 553
    Height = 345
    ColCount = 4
    DefaultColWidth = 35
    DefaultRowHeight = 18
    RowCount = 20
    TabOrder = 1
    ColWidths = (
      35
      183
      90
      221)
  end
  object btnCopyResult: TBitBtn
    Left = 560
    Top = 216
    Width = 81
    Height = 33
    Caption = 'Copy Result'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 2
    OnClick = btnCopyResultClick
  end
  object pmsys: TPopupMenu
    Left = 576
    Top = 24
  end
end