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