object FormMousePos: TFormMousePos
  Left = 194
  Height = 117
  Top = 121
  Width = 115
  BorderIcons = [biSystemMenu]
  BorderStyle = bsToolWindow
  BorderWidth = 4
  Caption = 'MousePos'
  ClientHeight = 117
  ClientWidth = 115
  Color = clBtnFace
  Font.Color = clWindowText
  Font.Height = -16
  Font.Name = 'PT Mono'
  FormStyle = fsSystemStayOnTop
  Icon.Data = {
[encoded data, 15870 characters]
    0FFF
  }
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  LCLVersion = '2.2.6.0'
  object PanelMousePos: TPanel
    Cursor = crHelp
    Left = 4
    Height = 109
    Top = 4
    Width = 107
    Align = alClient
    BorderWidth = 4
    ClientHeight = 109
    ClientWidth = 107
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'Courier New'
    ParentFont = False
    TabOrder = 0
    OnClick = PanelMousePosClick
    object LabelMousePosX: TLabel
      Left = 8
      Height = 18
      Hint = 'Mouse X position on screen.'
      Top = 6
      Width = 80
      Caption = 'X: xxxxx'
      ParentColor = False
      ParentShowHint = False
      ShowHint = True
    end
    object LabelMousePosY: TLabel
      Left = 8
      Height = 18
      Hint = 'Mouse Y position on screen.'
      Top = 22
      Width = 80
      Caption = 'Y: yyyyy'
      ParentColor = False
      ParentShowHint = False
      ShowHint = True
    end
    object LabelMousePosW: TLabel
      Left = 8
      Height = 18
      Hint = 'Mouse selection width.'
      Top = 38
      Width = 80
      Caption = 'W: wwwww'
      ParentColor = False
      ParentShowHint = False
      ShowHint = True
    end
    object LabelMousePosH: TLabel
      Left = 8
      Height = 18
      Hint = 'Mouse selection height.'
      Top = 54
      Width = 80
      Caption = 'H: hhhhh'
      ParentColor = False
      ParentShowHint = False
      ShowHint = True
    end
  end
  object TimerMousePos: TTimer
    Interval = 50
    OnTimer = TimerMousePosTimer
    Left = 32
  end
end
