home *** CD-ROM | disk | FTP | other *** search
- object MouseForm: TMouseForm
- Left = 3
- Top = 294
- BorderStyle = bsNone
- Caption = 'MouseForm'
- ClientHeight = 45
- ClientWidth = 104
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = 'Arial'
- Font.Style = []
- FormStyle = fsStayOnTop
- Scaled = False
- OnActivate = FormActivate
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- PixelsPerInch = 96
- TextHeight = 15
- object MousePos: TPanel
- Left = 0
- Top = 0
- Width = 104
- Height = 21
- Align = alTop
- Caption = 'Mouse Position'
- Color = clActiveCaption
- Font.Color = clCaptionText
- Font.Height = -12
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 0
- OnMouseDown = MousePosMouseDown
- OnMouseMove = MousePosMouseMove
- OnMouseUp = MousePosMouseUp
- end
- object Panel1: TPanel
- Left = 0
- Top = 21
- Width = 104
- Height = 24
- Align = alClient
- Font.Color = clBtnText
- Font.Height = -12
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- TabOrder = 1
- object Label1: TLabel
- Left = 46
- Top = 4
- Width = 12
- Height = 15
- Alignment = taCenter
- Caption = 'x'
- end
- object XPos: TPanel
- Left = 1
- Top = 1
- Width = 40
- Height = 22
- Align = alLeft
- Alignment = taRightJustify
- BevelOuter = bvNone
- Caption = '0'
- Font.Color = clBtnText
- Font.Height = -12
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- end
- object YPos: TPanel
- Left = 63
- Top = 1
- Width = 40
- Height = 22
- Align = alRight
- Alignment = taLeftJustify
- BevelOuter = bvNone
- Caption = '0'
- TabOrder = 1
- end
- end
- end
-