BSOne.SFC/EM.Lib/ImageEn_SRC/Demos/ImageEditing/CropTool/uMain.dfm

object Form1: TForm1
  Left = 197
  Top = 160
  ActiveControl = ImageEnView1
  Caption = 'Crop Tool - www.ImageEn.com'
  ClientHeight = 657
  ClientWidth = 936
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = True
  Position = poScreenCenter
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 751
    Top = 0
    Width = 185
    Height = 657
    Align = alRight
    BevelOuter = bvNone
    TabOrder = 1
    object lblCropInfo: TLabel
      Left = 14
      Top = 83
      Width = 156
      Height = 65
      AutoSize = False
      Caption = 
        'Click image and drag to select. Resize by dragging the grips. Ro' +
        'tate by dragging outside the grips'
      WordWrap = True
    end
    object lblApplyCrop: TLabel
      Left = 99
      Top = 193
      Width = 71
      Height = 13
      Alignment = taRightJustify
      Caption = 'Or click "Enter"'
    end
    object lblCancelCrop: TLabel
      Left = 109
      Top = 247
      Width = 61
      Height = 13
      Alignment = taRightJustify
      Caption = 'Or click "Esc"'
    end
    object btnCropImage: TSpeedButton
      Left = 14
      Top = 51
      Width = 156
      Height = 25
      AllowAllUp = True
      GroupIndex = 1
      Caption = 'Enable Cropping'
      OnClick = btnCropImageClick
    end
    object GroupBox1: TGroupBox
      Left = 14
      Top = 488
      Width = 156
      Height = 159
      Anchors = [akLeft, akBottom]
      Caption = ' Options '
      TabOrder = 6
      object Label3: TLabel
        Left = 12
        Top = 130
        Width = 45
        Height = 13
        Caption = 'Grip Size:'
      end
      object Label1: TLabel
        Left = 12
        Top = 21
        Width = 29
        Height = 13
        Caption = 'Allow:'
      end
      object chkDrawGuides: TCheckBox
        Left = 12
        Top = 103
        Width = 97
        Height = 17
        Caption = 'Guide Lines'
        Checked = True
        State = cbChecked
        TabOrder = 1
        OnClick = chkDrawGuidesClick
      end
      object trkGripSize: TTrackBar
        Left = 59
        Top = 126
        Width = 70
        Height = 27
        Max = 20
        Min = 2
        Frequency = 16
        Position = 8
        TabOrder = 2
        TickMarks = tmBoth
        TickStyle = tsNone
        OnChange = trkGripSizeChange
      end
      object chkPerspective: TCheckBox
        Left = 12
        Top = 80
        Width = 141
        Height = 17
        Hint = 
          'Drag the corner grips to adjust the cropping rectangle. This wil' +
          'l fix perspective distortion'
        Caption = 'Perspective Distortion'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 0
        OnClick = chkPerspectiveClick
      end
      object chkMoving: TCheckBox
        Left = 51
        Top = 38
        Width = 97
        Height = 17
        Caption = 'Moving'
        Checked = True
        State = cbChecked
        TabOrder = 3
        OnClick = chkMovingClick
      end
      object chkResize: TCheckBox
        Left = 51
        Top = 19
        Width = 97
        Height = 17
        Caption = 'Resizing'
        Checked = True
        State = cbChecked
        TabOrder = 4
        OnClick = chkResizeClick
      end
      object chkRotate: TCheckBox
        Left = 51
        Top = 57
        Width = 97
        Height = 17
        Caption = 'Rotating'
        Checked = True
        State = cbChecked
        TabOrder = 5
        OnClick = chkRotateClick
      end
    end
    object btnOpen: TButton
      Left = 14
      Top = 8
      Width = 156
      Height = 25
      Caption = 'Open Image...'
      TabOrder = 0
      OnClick = btnOpenClick
    end
    object btnApplyCrop: TButton
      Left = 14
      Top = 165
      Width = 156
      Height = 25
      Caption = 'Apply Crop'
      TabOrder = 1
      OnClick = btnApplyCropClick
    end
    object btnCancelCrop: TButton
      Left = 14
      Top = 220
      Width = 156
      Height = 25
      Caption = 'Cancel'
      TabOrder = 2
      OnClick = btnCancelCropClick
    end
    object btnSave: TButton
      Left = 14
      Top = 349
      Width = 156
      Height = 25
      Anchors = [akLeft, akBottom]
      Caption = 'Save Image...'
      Enabled = False
      TabOrder = 4
      OnClick = btnSaveClick
    end
    object btnUndo: TButton
      Left = 14
      Top = 306
      Width = 156
      Height = 25
      Anchors = [akLeft, akBottom]
      Caption = 'Undo'
      Enabled = False
      TabOrder = 3
      OnClick = btnUndoClick
    end
    object grpSelection: TGroupBox
      Left = 14
      Top = 389
      Width = 156
      Height = 93
      Anchors = [akLeft, akBottom]
      Caption = ' Selection '
      TabOrder = 5
      object rdbNoLocking: TRadioButton
        Left = 12
        Top = 20
        Width = 97
        Height = 17
        Caption = 'No locking'
        Checked = True
        TabOrder = 0
        TabStop = True
        OnClick = LockControlClick
      end
      object rdbLockSize: TRadioButton
        Left = 12
        Top = 66
        Width = 141
        Height = 17
        Caption = 'Lock width to half image'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 2
        OnClick = LockControlClick
      end
      object rdbLockAR: TRadioButton
        Left = 12
        Top = 43
        Width = 113
        Height = 17
        Caption = 'Lock Ratio to 4:3'
        TabOrder = 1
        OnClick = LockControlClick
      end
    end
  end
  object ImageEnView1: TImageEnView
    Left = 0
    Top = 0
    Width = 751
    Height = 657
    Background = clBtnFace
    Ctl3D = False
    ParentCtl3D = False
    LegacyBitmap = True
    OnImageChange = ImageEnView1ImageChange
    EnableInteractionHints = True
    Align = alClient
    TabOrder = 0
  end
end