object Form1: TForm1 Left = 200 Top = 116 Caption = 'Lossless Crop Demo - www.ImageEn.com' ClientHeight = 520 ClientWidth = 715 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 = 11 Top = 39 Width = 77 Height = 13 Caption = 'Select rectangle' end object Label2: TLabel Left = 8 Top = 7 Width = 524 Height = 14 Caption = 'Crop and save a JPEG without any loss of quality (lossless rotat' + 'ion is also supported)' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Tahoma' Font.Style = [fsBold] ParentFont = False end object ImageEnView1: TImageEnView Left = 11 Top = 59 Width = 601 Height = 448 Background = clBtnFace MouseInteract = [miSelect] Anchors = [akLeft, akTop, akRight, akBottom] EnableInteractionHints = True TabOrder = 0 end object Button1: TButton Left = 627 Top = 59 Width = 75 Height = 25 Anchors = [akTop, akRight] Caption = 'Open...' TabOrder = 1 OnClick = Button1Click end object Button2: TButton Left = 627 Top = 91 Width = 75 Height = 25 Anchors = [akTop, akRight] Caption = 'Save...' TabOrder = 2 OnClick = Button2Click end end