home *** CD-ROM | disk | FTP | other *** search
- object HitEditor: THitEditor
- Left = 404
- Top = 170
- Width = 663
- Height = 366
- ActiveControl = Memo1
- Caption = 'Hit-Area Editor'
- Font.Charset = ANSI_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ShowHint = True
- OnCreate = FormCreate
- OnShow = FormShow
- PixelsPerInch = 120
- TextHeight = 16
- object Image1: TImage
- Left = 0
- Top = 65
- Width = 655
- Height = 227
- Align = alClient
- OnMouseDown = Image1MouseDown
- end
- object Label1: TLabel
- Left = 0
- Top = 33
- Width = 655
- Height = 32
- Align = alTop
- Alignment = taCenter
- Caption =
- 'Instructions: (1) Choose the editing mode: DragMatch or HitTest,' +
- ' (2) define an area by clicking points, (3) click Copy to copy t' +
- 'he coordinates to the clipboard, (4) Close the dialog and (5) pa' +
- 'ste the coordinates in ScriptEditor.'
- WordWrap = True
- end
- object Panel1: TPanel
- Left = 0
- Top = 292
- Width = 655
- Height = 36
- Align = alBottom
- BevelInner = bvLowered
- TabOrder = 1
- object ColorPanel: TPanel
- Left = 474
- Top = 4
- Width = 37
- Height = 30
- Hint = 'Color of the hit area border xored with the image'
- BevelInner = bvRaised
- TabOrder = 6
- end
- object Color: TButton
- Left = 510
- Top = 4
- Width = 63
- Height = 30
- Hint = 'Change the color of the hit area polygon'
- Caption = 'C&olor'
- TabOrder = 7
- OnClick = ColorClick
- end
- object Clone: TButton
- Left = 60
- Top = 4
- Width = 60
- Height = 30
- Hint = 'Convert coordinates into a hit area'
- Caption = 'C&lone'
- TabOrder = 1
- OnClick = CloneClick
- end
- object Copy: TButton
- Left = 120
- Top = 4
- Width = 60
- Height = 30
- Hint = 'Copy the hit area coordinates to the clipboard'
- Caption = 'Co&py'
- TabOrder = 2
- OnClick = CopyClick
- end
- object Paste: TButton
- Left = 0
- Top = 4
- Width = 60
- Height = 30
- Hint =
- 'Paste the coordinates from the clipboard (e.g. as taken from an ' +
- 'edited script command)'
- Caption = '&Paste'
- TabOrder = 0
- OnClick = PasteClick
- end
- object Clear: TButton
- Left = 180
- Top = 4
- Width = 60
- Height = 30
- Hint = 'Clear the hit area'
- Caption = 'Clea&r'
- TabOrder = 3
- OnClick = ClearClick
- end
- object Close_: TButton
- Left = 240
- Top = 4
- Width = 60
- Height = 30
- Hint = 'Close the hit area editor'
- Cancel = True
- Caption = '&Close'
- ModalResult = 2
- TabOrder = 4
- OnClick = Close_Click
- end
- object ComboBox1: TComboBox
- Left = 306
- Top = 7
- Width = 162
- Height = 24
- Hint = 'Choose the script command for which hit area is being defined'
- ItemHeight = 16
- Items.Strings = (
- 'HitTest'
- 'DragMatch')
- TabOrder = 5
- Text = 'HitTest'
- OnChange = ComboBox1Change
- end
- object Help: TButton
- Left = 573
- Top = 4
- Width = 75
- Height = 30
- Caption = '&Help'
- TabOrder = 8
- Visible = False
- end
- end
- object Memo1: TMemo
- Left = 0
- Top = 0
- Width = 655
- Height = 33
- Align = alTop
- Lines.Strings = (
- '')
- TabOrder = 0
- end
- object ColorDialog1: TColorDialog
- Ctl3D = True
- Left = 8
- Top = 192
- end
- end
-