object JpegPreviewF: TJpegPreviewF Left = 193 Top = 124 Width = 477 Height = 375 BorderStyle = bsSizeToolWin Caption = 'JPEG Preview' Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] FormStyle = fsStayOnTop OldCreateOrder = False OnCreate = FormCreate OnDestroy = FormDestroy PixelsPerInch = 120 TextHeight = 16 object Panel1: TPanel Left = 352 Top = 0 Width = 117 Height = 343 Align = alRight BevelOuter = bvNone TabOrder = 0 object jpegSave: TSpeedButton Left = 8 Top = 128 Width = 73 Height = 22 Caption = 'Save' Flat = True Font.Charset = DEFAULT_CHARSET Font.Color = clRed Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False OnClick = jpegSaveClick end object jpegsize: TLabel Left = 8 Top = 104 Width = 33 Height = 16 Caption = 'Size=' end object lblquality: TLabel Left = 64 Top = 64 Width = 41 Height = 16 Caption = 'Quality' end object jpgGray: TCheckBox Left = 8 Top = 40 Width = 81 Height = 17 Caption = 'Grayscale' TabOrder = 0 OnClick = jpgGrayClick end object quality: TScrollBar Left = 88 Top = 88 Width = 20 Height = 233 Kind = sbVertical Min = 1 PageSize = 0 Position = 10 TabOrder = 1 OnChange = qualityChange end end object ScrollBox1: TScrollBox Left = 0 Top = 0 Width = 352 Height = 343 Align = alClient TabOrder = 1 object jpg: TImage Left = 0 Top = 0 Width = 256 Height = 256 AutoSize = True end end object SaveDialog1: TSaveDialog DefaultExt = 'jpg' Filter = 'JPEG Files|*.jpg;*.jpeg' Left = 306 Top = 146 end end