object FrmResamplersExample: TFrmResamplersExample Left = 270 Top = 228 Caption = 'Resamplers Example' ClientHeight = 395 ClientWidth = 475 Color = clBtnFace Constraints.MinHeight = 200 Constraints.MinWidth = 200 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] OnClose = FormClose OnCreate = FormCreate TextHeight = 13 object SidePanel: TPanel Left = 329 Top = 0 Width = 146 Height = 376 Align = alRight BevelOuter = bvNone TabOrder = 1 object PnlResampler: TPanel Left = 0 Top = 0 Width = 146 Height = 160 Align = alTop TabOrder = 0 DesignSize = ( 146 160) object LblResamplersClass: TLabel Left = 12 Top = 24 Width = 82 Height = 13 Anchors = [akTop, akRight] Caption = 'Resampler Class:' end object LblPixelAccessMode: TLabel Left = 12 Top = 67 Width = 91 Height = 13 Anchors = [akTop, akRight] Caption = 'Pixel Access Mode:' end object LblWrapMode: TLabel Left = 12 Top = 110 Width = 59 Height = 13 Anchors = [akTop, akRight] Caption = 'Wrap Mode:' end object PnlResamplerProperties: TPanel Left = 1 Top = 1 Width = 144 Height = 16 Align = alTop BevelOuter = bvNone Caption = 'Resampler Properties' Color = clBtnShadow Font.Charset = DEFAULT_CHARSET Font.Color = clWindow Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False TabOrder = 0 end object ResamplerClassNamesList: TComboBox Left = 16 Top = 40 Width = 119 Height = 21 Style = csDropDownList Anchors = [akTop, akRight] TabOrder = 1 OnChange = ResamplerClassNamesListChange end object EdgecheckBox: TComboBox Left = 16 Top = 83 Width = 119 Height = 21 Style = csDropDownList Anchors = [akTop, akRight] TabOrder = 2 OnChange = EdgecheckBoxChange Items.Strings = ( 'Unsafe' 'Safe' 'Wrap') end object WrapBox: TComboBox Left = 16 Top = 126 Width = 119 Height = 21 Style = csDropDownList Anchors = [akTop, akRight] TabOrder = 3 OnChange = EdgecheckBoxChange Items.Strings = ( 'Clamp' 'Repeat' 'Mirror') end end object PnlKernel: TPanel Left = 0 Top = 160 Width = 146 Height = 201 Align = alTop TabOrder = 1 Visible = False DesignSize = ( 146 201) object LblKernelClass: TLabel Left = 12 Top = 24 Width = 62 Height = 13 Anchors = [akTop, akRight] Caption = 'Kernel Class:' end object LblKernelMode: TLabel Left = 12 Top = 67 Width = 63 Height = 13 Anchors = [akTop, akRight] Caption = 'Kernel Mode:' end object LblTableSize: TLabel Left = 8 Top = 116 Width = 97 Height = 13 Caption = 'Table Size (32/100):' end object LblParameter: TLabel Left = 8 Top = 155 Width = 54 Height = 13 Caption = 'Parameter:' Visible = False end object PnlKernelProperties: TPanel Left = 1 Top = 1 Width = 144 Height = 16 Align = alTop BevelOuter = bvNone Caption = 'Kernel Properties' Color = clBtnShadow Font.Charset = DEFAULT_CHARSET Font.Color = clWindow Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False TabOrder = 0 end object KernelClassNamesList: TComboBox Left = 16 Top = 40 Width = 119 Height = 21 Style = csDropDownList Anchors = [akTop, akRight] TabOrder = 1 OnChange = KernelClassNamesListClick end object KernelModeList: TComboBox Left = 16 Top = 83 Width = 119 Height = 21 Style = csDropDownList Anchors = [akTop, akRight] TabOrder = 2 OnChange = KernelModeListChange Items.Strings = ( 'Default (precise, slow)' 'Table Nearest (truncated, fastest)' 'Table Linear (interpolated, fast)') end object GbrTableSize: TGaugeBar Left = 16 Top = 136 Width = 113 Height = 12 Backgnd = bgPattern HandleSize = 16 Min = 1 ShowArrows = False ShowHandleGrip = True Style = rbsMac Position = 32 OnChange = GbrTableSizeChange end object GbrParameter: TGaugeBar Left = 16 Top = 175 Width = 113 Height = 12 Backgnd = bgPattern HandleSize = 16 Min = 1 ShowArrows = False ShowHandleGrip = True Style = rbsMac Visible = False Position = 50 OnChange = GbrParameterChange OnMouseUp = GbrParameterMouseUp end end end object PageControl: TPageControl Left = 0 Top = 0 Width = 329 Height = 376 ActivePage = TabDetails Align = alClient TabOrder = 0 OnChange = ResamplerClassNamesListChange object TabDetails: TTabSheet Caption = 'Details' object DstImg: TImage32 Left = 0 Top = 0 Width = 321 Height = 348 Align = alClient Bitmap.ResamplerClassName = 'TKernelResampler' Bitmap.Resampler.KernelClassName = 'TCosineKernel' Bitmap.Resampler.KernelMode = kmTableLinear Bitmap.Resampler.TableSize = 32 BitmapAlign = baTopLeft RepaintMode = rmOptimizer Scale = 1.000000000000000000 ScaleMode = smStretch TabOrder = 0 OnResize = DstImgResize end end object TabResampling: TTabSheet Caption = 'Resampling' ImageIndex = 1 object ResamplingPaintBox: TPaintBox32 Left = 0 Top = 0 Width = 321 Height = 348 Align = alClient RepaintMode = rmOptimizer TabOrder = 0 OnResize = ResamplingPaintBoxResize end end object TabKernel: TTabSheet Caption = 'Curve' ImageIndex = 2 TabVisible = False object CurveImage: TImage32 Left = 0 Top = 0 Width = 321 Height = 348 Align = alClient Bitmap.ResamplerClassName = 'TNearestResampler' BitmapAlign = baTopLeft Scale = 1.000000000000000000 ScaleMode = smNormal TabOrder = 0 OnPaintStage = CurveImagePaintStage end end end object StatusBar: TStatusBar Left = 0 Top = 376 Width = 475 Height = 19 Panels = < item Width = 50 end> end end