object Form1: TForm1
  Left = 200
  Top = 109
  Caption = 'TImageEnMView Drag & Drop'
  ClientHeight = 578
  ClientWidth = 470
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = True
  Position = poScreenCenter
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 8
    Top = 8
    Width = 403
    Height = 13
    Caption = 
      'This demo shows how to transfer images between two TImageEnMView' +
      ' components'
  end
  object Label2: TLabel
    Left = 190
    Top = 280
    Width = 71
    Height = 13
    Alignment = taCenter
    Anchors = [akTop]
    Caption = 'Drag here ->>'
  end
  object ImageEnMView1: TImageEnMView
    Left = 8
    Top = 64
    Width = 150
    Height = 500
    StoreType = ietNormal
    ThumbWidth = 130
    ThumbHeight = 110
    HorizBorder = 4
    VertBorder = 4
    TextMargin = 0
    GridWidth = 1
    SelectionWidth = 3
    SelectionColor = clRed
    Style = iemsFlat
    ThumbnailsBackground = clBtnFace
    ThumbnailsBackgroundSelected = clBtnFace
    EnableMultiSelect = True
    MultiSelectionOptions = []
    ThumbnailsBorderWidth = 1
    ThumbnailsBorderColor = clYellow
    DefaultBottomText = iedtNone
    Anchors = [akLeft, akTop, akBottom]
    TabOrder = 0
    OnEndDrag = ImageEnMView1EndDrag
    OnMouseMove = ImageEnMView1MouseMove
  end
  object Button1: TButton
    Left = 8
    Top = 28
    Width = 75
    Height = 25
    Caption = 'Open...'
    TabOrder = 1
    OnClick = Button1Click
  end
  object ImageEnMView2: TImageEnMView
    Left = 304
    Top = 64
    Width = 150
    Height = 500
    StoreType = ietNormal
    ThumbWidth = 130
    ThumbHeight = 110
    HorizBorder = 4
    VertBorder = 4
    TextMargin = 0
    GridWidth = 1
    SelectionWidth = 3
    SelectionColor = clRed
    Style = iemsFlat
    ThumbnailsBackground = clBtnFace
    ThumbnailsBackgroundSelected = clBtnFace
    EnableMultiSelect = True
    MultiSelectionOptions = [iemoSelectOnMouseUp]
    ThumbnailsBorderWidth = 1
    ThumbnailsBorderColor = clYellow
    DefaultBottomText = iedtNone
    Anchors = [akTop, akRight, akBottom]
    TabOrder = 2
    OnDragDrop = ImageEnMView2DragDrop
    OnDragOver = ImageEnMView2DragOver
  end
end