home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1996 December / PCWKCD1296.iso / sharewar / neosoft / win / qm41 / install / qmwin.exe / 0 / RCDATA / TMOUSEFORM / TMOUSEFORM.txt
Encoding:
Text File  |  1996-10-11  |  1.7 KB  |  86 lines

  1. object MouseForm: TMouseForm
  2.   Left = 3
  3.   Top = 294
  4.   BorderStyle = bsNone
  5.   Caption = 'MouseForm'
  6.   ClientHeight = 45
  7.   ClientWidth = 104
  8.   Font.Color = clBlack
  9.   Font.Height = -12
  10.   Font.Name = 'Arial'
  11.   Font.Style = []
  12.   FormStyle = fsStayOnTop
  13.   Scaled = False
  14.   OnActivate = FormActivate
  15.   OnCreate = FormCreate
  16.   OnDestroy = FormDestroy
  17.   PixelsPerInch = 96
  18.   TextHeight = 15
  19.   object MousePos: TPanel
  20.     Left = 0
  21.     Top = 0
  22.     Width = 104
  23.     Height = 21
  24.     Align = alTop
  25.     Caption = 'Mouse Position'
  26.     Color = clActiveCaption
  27.     Font.Color = clCaptionText
  28.     Font.Height = -12
  29.     Font.Name = 'Arial'
  30.     Font.Style = [fsBold]
  31.     ParentFont = False
  32.     TabOrder = 0
  33.     OnMouseDown = MousePosMouseDown
  34.     OnMouseMove = MousePosMouseMove
  35.     OnMouseUp = MousePosMouseUp
  36.   end
  37.   object Panel1: TPanel
  38.     Left = 0
  39.     Top = 21
  40.     Width = 104
  41.     Height = 24
  42.     Align = alClient
  43.     Font.Color = clBtnText
  44.     Font.Height = -12
  45.     Font.Name = 'Arial'
  46.     Font.Style = []
  47.     ParentFont = False
  48.     TabOrder = 1
  49.     object Label1: TLabel
  50.       Left = 46
  51.       Top = 4
  52.       Width = 12
  53.       Height = 15
  54.       Alignment = taCenter
  55.       Caption = 'x'
  56.     end
  57.     object XPos: TPanel
  58.       Left = 1
  59.       Top = 1
  60.       Width = 40
  61.       Height = 22
  62.       Align = alLeft
  63.       Alignment = taRightJustify
  64.       BevelOuter = bvNone
  65.       Caption = '0'
  66.       Font.Color = clBtnText
  67.       Font.Height = -12
  68.       Font.Name = 'Arial'
  69.       Font.Style = []
  70.       ParentFont = False
  71.       TabOrder = 0
  72.     end
  73.     object YPos: TPanel
  74.       Left = 63
  75.       Top = 1
  76.       Width = 40
  77.       Height = 22
  78.       Align = alRight
  79.       Alignment = taLeftJustify
  80.       BevelOuter = bvNone
  81.       Caption = '0'
  82.       TabOrder = 1
  83.     end
  84.   end
  85. end
  86.