object fResize: TfResize Left = 121 Top = 143 ActiveControl = UpDown1 BorderIcons = [biSystemMenu] BorderStyle = bsDialog Caption = 'Resize' ClientHeight = 334 ClientWidth = 642 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] OldCreateOrder = True Position = poMainFormCenter OnActivate = FormActivate OnCreate = FormCreate OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Label4: TLabel Left = 16 Top = 12 Width = 36 Height = 13 Caption = 'Original' end object Label5: TLabel Left = 290 Top = 10 Width = 30 Height = 13 Caption = 'Result' end object SpeedButtonLockPreview: TSpeedButton Left = 562 Top = 118 Width = 23 Height = 22 Hint = 'Lock Preview' AllowAllUp = True GroupIndex = 1 Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 0400000000000001000000000000000000001000000010000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000003 333333333F777773FF333333008888800333333377333F3773F3333077870787 7033333733337F33373F3308888707888803337F33337F33337F330777880887 7703337F33337FF3337F3308888000888803337F333777F3337F330777700077 7703337F33377733337FB3088888888888033373FFFFFFFFFF733B3000000000 0033333777777777773333BBBB3333080333333333F3337F7F33BBBB707BB308 03333333373F337F7F3333BB08033308033333337F7F337F7F333B3B08033308 033333337F73FF737F33B33B778000877333333373F777337333333B30888880 33333333373FFFF73333333B3300000333333333337777733333} NumGlyphs = 2 ParentShowHint = False ShowHint = True end object Button1: TButton Left = 562 Top = 28 Width = 69 Height = 25 Caption = 'OK' Default = True ModalResult = 1 TabOrder = 0 end object Button2: TButton Left = 562 Top = 58 Width = 69 Height = 25 Cancel = True Caption = 'Cancel' ModalResult = 2 TabOrder = 1 end object GroupBox2: TGroupBox Left = 288 Top = 232 Width = 165 Height = 67 Caption = 'Filter' TabOrder = 2 object Label3: TLabel Left = 10 Top = 19 Width = 24 Height = 13 Caption = 'Filter' end object ComboBox1: TComboBox Left = 9 Top = 33 Width = 146 Height = 21 Style = csDropDownList ItemHeight = 13 TabOrder = 0 OnChange = ComboBox1Change Items.Strings = ( 'None' 'Triangle' 'Hermite' 'Bell' 'BSpline' 'Lanczos3' 'Mitchell') end end object GroupBox3: TGroupBox Left = 14 Top = 232 Width = 265 Height = 89 Caption = 'Size' TabOrder = 3 object Label1: TLabel Left = 12 Top = 20 Width = 66 Height = 13 Caption = 'Width (pixels)' end object Label2: TLabel Left = 12 Top = 46 Width = 69 Height = 13 Caption = 'Height (pixels)' end object Edit1: TEdit Left = 94 Top = 16 Width = 63 Height = 21 TabOrder = 0 Text = '1' OnChange = Edit1Change end object Edit2: TEdit Left = 94 Top = 42 Width = 63 Height = 21 TabOrder = 1 Text = '1' OnChange = Edit2Change end object UpDown1: TUpDown Left = 157 Top = 16 Width = 15 Height = 22 Associate = Edit1 Min = 1 Max = 32767 Increment = 10 Position = 1 TabOrder = 2 OnMouseUp = UpDown1MouseUp end object UpDown2: TUpDown Left = 157 Top = 42 Width = 15 Height = 22 Associate = Edit2 Min = 1 Max = 32767 Increment = 10 Position = 1 TabOrder = 3 OnMouseUp = UpDown2MouseUp end object ResetBtn: TButton Left = 184 Top = 14 Width = 65 Height = 25 Caption = 'Reset' TabOrder = 4 OnClick = ResetBtnClick end object CheckBox1: TCheckBox Left = 10 Top = 69 Width = 145 Height = 17 Caption = 'Maintain aspect ratio' Checked = True State = cbChecked TabOrder = 5 end end object ImageEnView1: TImageEnView Left = 14 Top = 28 Width = 263 Height = 200 Background = clWhite ParentCtl3D = False ScrollBars = ssNone AutoFit = True BackgroundStyle = iebsChessboard OnZoomIn = ImageEnView1ZoomIn OnZoomOut = ImageEnView1ZoomOut ImageEnVersion = '4.0.0' EnableInteractionHints = True ParentShowHint = False ShowHint = True TabOrder = 4 OnMouseDown = ImageEnView1MouseDown OnMouseMove = ImageEnView1MouseMove end object ImageEnView2: TImageEnView Left = 290 Top = 28 Width = 263 Height = 200 Background = clWhite ParentCtl3D = False ScrollBars = ssNone AutoFit = True BackgroundStyle = iebsChessboard OnZoomIn = ImageEnView2ZoomIn OnZoomOut = ImageEnView2ZoomOut ImageEnVersion = '4.0.0' EnableInteractionHints = True ParentShowHint = False ShowHint = True TabOrder = 5 OnMouseDown = ImageEnView2MouseDown OnMouseMove = ImageEnView2MouseMove end object PeviewButton: TButton Left = 562 Top = 88 Width = 69 Height = 25 Caption = 'Preview' TabOrder = 6 OnClick = PeviewButtonClick end object ViewRadioGroup: TRadioGroup Left = 462 Top = 233 Width = 141 Height = 53 Hint = 'View' Caption = 'View' ItemIndex = 1 Items.Strings = ( 'Zoom' 'Auto Fit') ParentShowHint = False ShowHint = True TabOrder = 7 OnClick = ViewRadioGroupClick end end