iwhotspoteditor.dfm

TMS IntraWEb增强控件TMSIntraWeb_v2.3.2.1_D2007.rar

object frmHSIEditor: TfrmHSIEditor
  Left = 570
  Top = 470
  Width = 739
  Height = 510
  Caption = 'IntraWeb HotSpotImage editor'
  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
  Position = poDesktopCenter
  ShowHint = True
  OnCreate = FormCreate
  OnKeyDown = FormKeyDown
  OnResize = FormResize
  PixelsPerInch = 96
  TextHeight = 13
  object pnImage: TPanel
    Left = 0
    Top = 33
    Width = 731
    Height = 404
    Align = alClient
    BevelOuter = bvNone
    BorderStyle = bsSingle
    TabOrder = 1
    object shapeSep: TShape
      Left = 0
      Top = 398
      Width = 727
      Height = 2
      Align = alBottom
    end
    object Splitter: TSplitter
      Left = 290
      Top = 0
      Width = 4
      Height = 398
      AutoSnap = False
      Color = 13160664
      MinSize = 233
      ParentColor = False
      ResizeStyle = rsLine
    end
    object pnContainer: TPanel
      Left = 294
      Top = 0
      Width = 433
      Height = 398
      Align = alClient
      BevelOuter = bvNone
      TabOrder = 0
      object pnProperties: TPanel
        Left = 0
        Top = 0
        Width = 433
        Height = 398
        Align = alClient
        BevelInner = bvLowered
        Enabled = False
        TabOrder = 0
        DesignSize = (
          433
          398)
        object lblHint: TLabel
          Left = 7
          Top = 105
          Width = 22
          Height = 13
          Anchors = [akLeft, akBottom]
          Caption = 'Hint:'
        end
        object lblName: TLabel
          Left = 8
          Top = 30
          Width = 37
          Height = 13
          Caption = '&Name:'
          FocusControl = edtName
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object lblID: TLabel
          Left = 8
          Top = 59
          Width = 18
          Height = 13
          Caption = '&ID:'
          FocusControl = edtID
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object lbAngle: TLabel
          Left = 147
          Top = 59
          Width = 37
          Height = 13
          Anchors = [akTop]
          Caption = '&Angle:'
          FocusControl = spAngle
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
          Visible = False
        end
        object pnTitle: TPanel
          Left = 2
          Top = 2
          Width = 429
          Height = 18
          Align = alTop
          BevelOuter = bvNone
          Caption = 'HotSpot Properties'
          Color = clInactiveCaption
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clCaptionText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 0
        end
        object txtHint: TMemo
          Left = 33
          Top = 106
          Width = 393
          Height = 43
          Anchors = [akLeft, akRight, akBottom]
          ScrollBars = ssVertical
          TabOrder = 7
        end
        object pnHover: TPanel
          Left = 314
          Top = 274
          Width = 429
          Height = 120
          Anchors = [akLeft, akTop, akRight]
          TabOrder = 6
          Visible = False
          DesignSize = (
            429
            120)
          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 pnHoverImage: TPanel
            Left = 6
            Top = 33
            Width = 417
            Height = 81
            Anchors = [akLeft, akTop, akRight, akBottom]
            BevelOuter = bvLowered
            TabOrder = 0
            object imgHover: TImage
              Left = 1
              Top = 1
              Width = 415
              Height = 79
              Align = alClient
              Center = True
              PopupMenu = pmHoverImage
            end
          end
          object btLoadHover: TButton
            Left = 365
            Top = 7
            Width = 57
            Height = 21
            Anchors = [akTop, akRight]
            Caption = 'Load...'
            TabOrder = 1
            OnClick = btLoadHoverClick
          end
        end
        object pnClick: TPanel
          Left = 314
          Top = 154
          Width = 429
          Height = 120
          Anchors = [akLeft, akTop, akRight]
          TabOrder = 5
          Visible = False
          DesignSize = (
            429
            120)
          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 pnClickImage: TPanel
            Left = 6
            Top = 32
            Width = 417
            Height = 76
            Anchors = [akLeft, akTop, akRight, akBottom]
            BevelOuter = bvLowered
            TabOrder = 1
            object imgClick: TImage
              Left = 1
              Top = 1
              Width = 415
              Height = 74
              Align = alClient
              Center = True
              PopupMenu = pmClickImage
            end
          end
          object btLoadClick: TButton
            Left = 365
            Top = 6
            Width = 57
            Height = 21
            Anchors = [akTop, akRight]
            Caption = 'Load...'
            TabOrder = 0
            OnClick = btLoadClickClick
          end
        end
        object edtName: TEdit
          Left = 48
          Top = 24
          Width = 121
          Height = 21
          Hint = 'Enter the Name of the HotSpot'
          MaxLength = 50
          TabOrder = 1
          OnMouseUp = edtNameMouseUp
        end
        object edtID: TEdit
          Left = 33
          Top = 56
          Width = 30
          Height = 21
          Hint = 'Enter the ID of the HotSpot'
          MaxLength = 10
          TabOrder = 2
          OnKeyPress = edtIDKeyPress
          OnMouseUp = edtIDMouseUp
        end
        object spAngle: TSpinEdit
          Left = 227
          Top = 56
          Width = 47
          Height = 22
          Hint = 'Enter the Angle of the HotSpot'
          Anchors = [akTop]
          MaxLength = 3
          MaxValue = 180
          MinValue = -180
          TabOrder = 3
          Value = 0
          Visible = False
          OnChange = spAngleChange
        end
        object ckClip: TCheckBox
          Left = 372
          Top = 58
          Width = 57
          Height = 17
          Hint = 
            'Check if you want the shape of the hotspot to clip the hover&cli' +
            'ck images'
          Anchors = [akTop, akRight]
          Caption = '&Clipped'
          Checked = True
          State = cbChecked
          TabOrder = 4
          Visible = False
          OnClick = ckClipClick
        end
        object PageControl1: TPageControl
          Left = 2
          Top = 152
          Width = 429
          Height = 244
          ActivePage = TabSheet1
          Align = alBottom
          TabOrder = 8
          object TabSheet1: TTabSheet
            Caption = 'MouseDown'
            object Memo1: TMemo
              Left = 0
              Top = 0
              Width = 421
              Height = 216
              Align = alClient
              TabOrder = 0
            end
          end
          object TabSheet2: TTabSheet
            Caption = 'MouseOver'