hotspoteditor.dfm

TMS Component Pack V5.0包含了超过 280 个为 Delphi 以及 C++Builder 设计的 TMS 生产控件

object frmHSIEditor: TfrmHSIEditor
  Left = 362
  Top = 191
  Caption = 'HotspotImage editor'
  ClientHeight = 482
  ClientWidth = 769
  Color = clBtnFace
  Constraints.MinHeight = 458
  Constraints.MinWidth = 540
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  KeyPreview = True
  OldCreateOrder = False
  ShowHint = True
  OnCreate = FormCreate
  OnKeyDown = FormKeyDown
  OnResize = FormResize
  PixelsPerInch = 96
  TextHeight = 13
  object Shape1: TShape
    Left = 352
    Top = 224
    Width = 65
    Height = 65
  end
  object pnImage: TPanel
    Left = 0
    Top = 31
    Width = 769
    Height = 412
    Align = alClient
    BevelOuter = bvNone
    BorderStyle = bsSingle
    TabOrder = 1
    object Splitter: TSplitter
      Left = 290
      Top = 0
      Width = 4
      Height = 408
      AutoSnap = False
      Color = 13160664
      MinSize = 233
      ParentColor = False
      ResizeStyle = rsLine
    end
    object pnContainer: TPanel
      Left = 294
      Top = 0
      Width = 471
      Height = 408
      Align = alClient
      BevelOuter = bvNone
      TabOrder = 0
      object pnProperties: TPanel
        Left = 0
        Top = 0
        Width = 471
        Height = 408
        Align = alClient
        BevelInner = bvLowered
        Enabled = False
        TabOrder = 0
        DesignSize = (
          471
          408)
        object lblHint: TLabel
          Left = 9
          Top = 107
          Width = 22
          Height = 13
          Caption = 'Hint:'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object lblName: TLabel
          Left = 9
          Top = 30
          Width = 31
          Height = 13
          Caption = '&Name:'
          FocusControl = edtName
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object lblID: TLabel
          Left = 9
          Top = 57
          Width = 14
          Height = 13
          Caption = '&ID:'
          FocusControl = edtID
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object lbAngle: TLabel
          Left = 157
          Top = 56
          Width = 30
          Height = 13
          Caption = '&Angle:'
          FocusControl = spAngle
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object Label8: TLabel
          Left = 9
          Top = 83
          Width = 41
          Height = 13
          Caption = 'Offset X:'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object Label9: TLabel
          Left = 157
          Top = 83
          Width = 41
          Height = 13
          Caption = 'Offset Y:'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object pnTitle: TPanel
          Left = 2
          Top = 2
          Width = 467
          Height = 18
          Align = alTop
          BevelOuter = bvNone
          Caption = 'Hotspot Properties'
          Color = clInactiveCaption
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 0
        end
        object txtHint: TMemo
          Left = 57
          Top = 108
          Width = 384
          Height = 53
          Anchors = [akLeft, akTop, akRight]
          ScrollBars = ssVertical
          TabOrder = 5
        end
        object edtName: TEdit
          Left = 57
          Top = 24
          Width = 121
          Height = 21
          Hint = 'Enter the Name of the HotSpot'
          MaxLength = 50
          TabOrder = 1
          OnMouseUp = edtNameMouseUp
        end
        object edtID: TEdit
          Left = 57
          Top = 52
          Width = 30
          Height = 21
          Hint = 'Enter the ID of the HotSpot'
          MaxLength = 10
          TabOrder = 2
          OnKeyPress = edtIDKeyPress
          OnMouseUp = edtIDMouseUp
        end
        object spAngle: TSpinEdit
          Left = 206
          Top = 52
          Width = 47
          Height = 22
          Hint = 'Enter the Angle of the HotSpot'
          MaxLength = 3
          MaxValue = 180
          MinValue = -180
          TabOrder = 3
          Value = 0
          OnChange = spAngleChange
        end
        object ckClip: TCheckBox
          Left = 262
          Top = 24
          Width = 57
          Height = 17
          Hint = 
            'Check if you want the shape of the hotspot to clip the hover&cli' +
            'ck images'
          Caption = '&Clipped'
          Checked = True
          State = cbChecked
          TabOrder = 4
          OnClick = ckClipClick
        end
        object PageControl1: TPageControl
          Left = 7
          Top = 165
          Width = 441
          Height = 243
          ActivePage = ts_Click
          Anchors = [akLeft, akTop, akRight, akBottom]
          TabOrder = 6
          object ts_Click: TTabSheet
            Caption = 'Click'
            DesignSize = (
              433
              215)
            object lblClick: TLabel
              Left = 8
              Top = 10
              Width = 86
              Height = 13
              Caption = 'Clicked picture'
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clWindowText
              Font.Height = -11
              Font.Name = 'MS Sans Serif'
              Font.Style = [fsBold]
              ParentFont = False
            end
            object lbl_ClickImgIndex: TLabel
              Left = 9
              Top = 181
              Width = 58
              Height = 13
              Anchors = [akBottom]
              Caption = 'ImageIndex:'
            end
            object Label1: TLabel
              Left = 254
              Top = 181
              Width = 52
              Height = 13
              Anchors = [akBottom]
              Caption = 'Click color:'
            end
            object Shape_ClickColor: TShape
              Left = 344
              Top = 177
              Width = 41
              Height = 20
              Anchors = [akBottom]
            end
            object btLoadClick: TButton
              Left = 376
              Top = 6
              Width = 57
              Height = 21
              Anchors = [akTop, akRight]
              Caption = 'Load...'
              TabOrder = 0
              OnClick = btLoadClickClick
            end
            object pnClickImage: TPanel
              Left = 1
              Top = 32
              Width = 430
              Height = 130
              Anchors = [akLeft, akTop, akRight, akBottom]
              BevelOuter = bvLowered
              TabOrder = 1
              object imgClick: TImage
                Left = 1
                Top = 1
                Width = 428
                Height = 128
                Align = alClient
                Center = True
                PopupMenu = pmClickImage
              end
            end
            object Pn_ClickColor: TPanel
              Left = 321
              Top = 177
              Width = 20
              Height = 20
              Anchors = [akBottom]
              Ctl3D = True
              ParentCtl3D = False
              TabOrder = 2
              OnClick = Pn_ClickColorClick
            end
            object cmb_ClickImgIndex: TComboBox
              Left = 95
              Top = 177
              Width = 121
              Height = 19
              Style = csOwnerDrawFixed
              Anchors = [akBottom]
              ItemHeight = 13
              TabOrder = 3
              OnChange = cmb_ClickImgIndexChange
              OnDrawItem = cmb_BlinkImgIndexDrawItem
            end
          end
          object ts_Hover: TTabSheet
            Caption = 'Hover'
            ImageIndex = 1
            DesignSize = (
              433
              215)
            object lbHover: TLabel
              Left = 8
              Top = 10
              Width = 78
              Height = 13
              Caption = 'Hover picture'
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clWindowText
              Font.Height = -11
              Font.Name = 'MS Sans Serif'
              Font.Style = [fsBold]
              ParentFont = False
            end
            object Label2: TLabel
              Left = 9
              Top = 181
              Width = 58
              Height = 13
              Anchors = [akBottom]