C!T ROM 21/CTROM21B.mdf/win95/database/32psdp/_setup.1/HTML32.EXE/0/RCDATA/TEFFECTPREV/TEFFECTPREV.txt

Text File | 1998-12-13 | 72.5 KB | 3,175 lines

object EffectPrev: TEffectPrev
  Left = 277
  Top = 192
  ActiveControl = OKBtn
  BorderStyle = bsDialog
  Caption = 'Effects Preview'
  ClientHeight = 250
  ClientWidth = 458
  Font.Color = clBlack
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = [fsBold]
  Position = poScreenCenter
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 13
  object Undo: TButton
    Left = 212
    Top = 19
    Width = 89
    Height = 33
    Hint = '4 undo levels'
    Caption = 'Undo'
    ParentShowHint = False
    ShowHint = True
    TabOrder = 3
    OnClick = UndoClick
  end
  object ButtonPanel: TPanel
    Left = 353
    Top = 0
    Width = 105
    Height = 229
    Align = alRight
    BevelOuter = bvNone
    TabOrder = 1
    object CBG: TGauge
      Left = 13
      Top = 197
      Width = 81
      Height = 19
      Kind = gkNeedle
      BorderStyle = bsNone
      ForeColor = clNavy
      BackColor = clBtnFace
      Progress = 0
    end
    object OKBtn: TBitBtn
      Left = 6
      Top = 2
      Width = 97
      Height = 27
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      TabOrder = 0
      OnClick = OKBtnClick
      Kind = bkOK
      Margin = 2
      Style = bsNew
      Spacing = -1
      IsControl = True
    end
    object CancelBtn: TBitBtn
      Left = 6
      Top = 30
      Width = 97
      Height = 27
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      TabOrder = 1
      OnClick = CancelBtnClick
      Kind = bkCancel
      Margin = 2
      Style = bsNew
      Spacing = -1
      IsControl = True
    end
    object Button1: TButton
      Left = 6
      Top = 58
      Width = 97
      Height = 27
      Hint = 'Reload the image'
      Caption = 'Reload'
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      TabOrder = 2
      OnClick = copyit
    end
    object DitherC: TCheckBox
      Left = 7
      Top = 167
      Width = 91
      Height = 17
      Caption = 'Dither Image'
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      TabOrder = 3
      Visible = False
      OnClick = DitherCClick
    end
    object Button2: TButton
      Left = 6
      Top = 93
      Width = 97
      Height = 27
      Hint = 'Generate a Check Board Image'
      Caption = 'CheckBoard'
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      TabOrder = 4
      OnClick = Button2Click
    end
    object CheckBoardtype: TCheckBox
      Left = 6
      Top = 122
      Width = 79
      Height = 17
      Hint = 'Checked is bottom squeezed'
      Caption = 'Board Type'
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      TabOrder = 5
    end
    object CheckerSize: TScrollBar
      Left = 4
      Top = 145
      Width = 99
      Height = 9
      Hint = 'Check Block Size'
      Max = 60
      Min = 3
      ParentShowHint = False
      Position = 12
      ShowHint = True
      TabOrder = 6
    end
  end
  object TabSet: TTabSet
    Left = 0
    Top = 229
    Width = 458
    Height = 21
    Align = alBottom
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    OnClick = TabSetClick
  end
  object Notebook: TNotebook
    Left = 0
    Top = 0
    Width = 353
    Height = 229
    Align = alClient
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    PageIndex = 14
    ParentFont = False
    TabOrder = 0
    OnPageChanged = NotebookPageChanged
    IsControl = True
    object TPage
      Left = 0
      Top = 0
      Caption = 'AutoContrast'
      object GroupBox28: TGroupBox
        Left = 7
        Top = 10
        Width = 333
        Height = 200
        Caption = 'Automatic Contrast'
        TabOrder = 0
        IsControl = True
        object Label45: TLabel
          Left = 9
          Top = 164
          Width = 140
          Height = 13
          Caption = 'Drag Mouse to select an area'
        end
        object AutoContrast: TBitBtn
          Left = 206
          Top = 136
          Width = 89
          Height = 33
          Caption = 'Preview'
          Enabled = False
          TabOrder = 0
          OnClick = AutoContrastClick
          Style = bsNew
        end
        object AUTOOK: TCheckBox
          Left = 209
          Top = 176
          Width = 93
          Height = 17
          Caption = 'Contrast on ok'
          TabOrder = 1
          OnClick = AUTOOKClick
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'Bleed'
      object GroupBox19: TGroupBox
        Left = 7
        Top = 10
        Width = 333
        Height = 200
        Caption = 'Bleed Image'
        TabOrder = 0
        IsControl = True
        object Label27: TLabel
          Left = 221
          Top = 80
          Width = 45
          Height = 13
          Caption = 'Value = 0'
        end
        object Bleed: TBitBtn
          Left = 206
          Top = 136
          Width = 89
          Height = 33
          Caption = 'Preview'
          TabOrder = 0
          OnClick = BleedClick
          Style = bsNew
        end
        object BleedBar: TScrollBar
          Left = 180
          Top = 105
          Width = 135
          Height = 11
          Hint = 'Value'
          Max = 255
          Min = -255
          ParentShowHint = False
          ShowHint = True
          TabOrder = 1
          OnChange = BleedBarChange
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'Border'
      object GroupBox34: TGroupBox
        Left = 7
        Top = 10
        Width = 333
        Height = 200
        Caption = 'Border'
        TabOrder = 0
        IsControl = True
        object Label43: TLabel
          Left = 272
          Top = 84
          Width = 31
          Height = 13
          Caption = 'Shape'
        end
        object Label44: TLabel
          Left = 168
          Top = 84
          Width = 25
          Height = 13
          Caption = 'Edge'
        end
        object Label66: TLabel
          Left = 219
          Top = 121
          Width = 36
          Height = 13
          Caption = 'Vectors'
          Visible = False
        end
        object Label68: TLabel
          Left = 274
          Top = 121
          Width = 42
          Height = 13
          Caption = 'Vec Size'
          Visible = False
        end
        object Label69: TLabel
          Left = 169
          Top = 121
          Width = 27
          Height = 13
          Caption = 'Angle'
          Visible = False
        end
        object ShapeEdge: TSpinEdit
          Left = 168
          Top = 99
          Width = 49
          Height = 22
          MaxValue = 60
          MinValue = 0
          ParentShowHint = False
          ShowHint = True
          TabOrder = 0
          Value = 0
          OnChange = ShapeEdgeChange
        end
        object MaskColorBtn: TButton
          Left = 242
          Top = 54
          Width = 75
          Height = 25
          Caption = 'Mask Color'
          Enabled = False
          ParentShowHint = False
          ShowHint = True
          TabOrder = 1
          OnClick = MaskColorBtnClick
        end
        object BOnOk: TCheckBox
          Left = 216
          Top = 169
          Width = 97
          Height = 17
          Caption = 'Border On Ok'
          TabOrder = 2
        end
        object FCol: TCheckBox
          Left = 165
          Top = 60
          Width = 73
          Height = 17
          Caption = 'Form Color'
          ParentShowHint = False
          ShowHint = True
          State = cbChecked
          TabOrder = 3
          OnClick = FColClick
        end
        object BVector: TSpinEdit
          Left = 220
          Top = 136
          Width = 49
          Height = 22
          Increment = 2
          MaxValue = 100
          MinValue = 0
          ParentShowHint = False
          ShowHint = True
          TabOrder = 4
          Value = 10
          Visible = False
          OnChange = BVectorChange
        end
        object BVectorPercent: TSpinEdit
          Left = 274
          Top = 136
          Width = 49
          Height = 22
          MaxValue = 100
          MinValue = 0
          ParentShowHint = False
          ShowHint = True
          TabOrder = 5
          Value = 50
          Visible = False
          OnChange = BVectorPercentChange
        end
        object BAngle: TSpinEdit
          Left = 168
          Top = 136
          Width = 49
          Height = 22
          MaxValue = 359
          MinValue = 0
          ParentShowHint = False
          ShowHint = True
          TabOrder = 6
          Value = 90
          Visible = False
          OnChange = BAngleChange
        end
        object BShapeCombo: TComboBox
          Left = 222
          Top = 98
          Width = 103
          Height = 21
          Style = csDropDownList
          ItemHeight = 13
          Items.Strings = (
            'None'
            'Rectangle'
            'Square'
            'RoundRect'
            'RoundSquare'
            'Ellipse'
            'Circle'
            'TriangleLeft'
            'TriangleRight'
            'TriangleUp'
            'TriangleDown'
            'Diamond'
            'Star'
            'PolyGon')
          ParentShowHint = False
          ShowHint = True
          TabOrder = 7
          OnChange = ShapeEdit1Change
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'Border Fade'
      object GroupBox37: TGroupBox
        Left = 7
        Top = 10
        Width = 333
        Height = 200
        Caption = 'Border Fade'
        TabOrder = 0
        IsControl = True
        object Label67: TLabel
          Left = 232
          Top = 103
          Width = 25
          Height = 13
          Caption = 'Edge'
        end
        object FadeBorderValue: TSpinEdit
          Left = 230
          Top = 127
          Width = 49
          Height = 22
          MaxValue = 1000
          MinValue = 1
          TabOrder = 0
          Value = 1
          OnChange = FadeBorderValueChange
        end
        object FadeColorCustom: TButton
          Left = 242
          Top = 63
          Width = 75
          Height = 25
          Caption = 'Color'
          Enabled = False
          TabOrder = 1
          OnClick = FadeColorCustomClick
        end
        object FadeBorderOnOk: TCheckBox
          Left = 216
          Top = 160
          Width = 97
          Height = 17
          Caption = 'Border On Ok'
          TabOrder = 2
        end
        object FadeBorder: TCheckBox
          Left = 165
          Top = 69
          Width = 73
          Height = 17
          Caption = 'Form Color'
          State = cbChecked
          TabOrder = 3
          OnClick = FadeBorderClick
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'Blur'
      object GroupBox9: TGroupBox
        Left = 7
        Top = 10
        Width = 333
        Height = 200
        Caption = 'Blur Image'
        TabOrder = 0
        IsControl = True
        object Label2: TLabel
          Left = 219
          Top = 80
          Width = 45
          Height = 13
          Caption = 'Value = 0'
        end
        object Label47: TLabel
          Left = 9
          Top = 164
          Width = 140
          Height = 13
          Caption = 'Drag Mouse to select an area'
        end
        object Blur: TBitBtn
          Left = 206
          Top = 144
          Width = 89
          Height = 33
          Caption = 'Preview'
          TabOrder = 0
          OnClick = BlurClick
          Style = bsNew
        end
        object BlurBar: TScrollBar
          Left = 180
          Top = 100
          Width = 135
          Height = 11
          Hint = 'Value'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 1
          OnChange = BlurBarChange
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'Bright/Dark'
      IsControl = True
      object GroupBox2: TGroupBox
        Left = 7
        Top = 10
        Width = 333
        Height = 200
        Caption = 'Bright / Dark'
        TabOrder = 0
        IsControl = True
        object Label7: TLabel
          Left = 219
          Top = 80
          Width = 45
          Height = 13
          Caption = 'Value = 0'
        end
        object Bright: TBitBtn
          Left = 206
          Top = 136
          Width = 89
          Height = 33
          Caption = 'Preview'
          TabOrder = 0
          OnClick = BrightClick
          Style = bsNew
        end
        object BDIEdit: TScrollBar
          Left = 180
          Top = 108
          Width = 135
          Height = 11
          Hint = 'Value'
          Max = 255
          Min = -255
          ParentShowHint = False
          ShowHint = True
          TabOrder = 1
          OnChange = BDIEditChange
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'Color'
      object GroupBox7: TGroupBox
        Left = 7
        Top = 10
        Width = 333
        Height = 200
        Caption = 'Color Reduction'
        TabOrder = 0
        IsControl = True
        object Label5: TLabel
          Left = 180
          Top = 184
          Width = 80
          Height = 13
          Caption = 'Number of colors'
        end
        object Reduce: TBitBtn
          Left = 206
          Top = 127
          Width = 89
          Height = 33
          Caption = 'Preview'
          TabOrder = 0
          OnClick = ReduceClick
          Style = bsNew
        end
        object R1: TRadioButton
          Left = 208
          Top = 60
          Width = 91
          Height = 17
          Hint = 'Dither Method'
          Caption = 'Bayer'
          Checked = True
          ParentShowHint = False
          ShowHint = True
          TabOrder = 1
          TabStop = True
        end
        object R2: TRadioButton
          Left = 208
          Top = 91
          Width = 91
          Height = 17
          Hint = 'Dither Method'
          Caption = 'Burkes'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 2
        end
        object R3: TRadioButton
          Left = 208
          Top = 76
          Width = 91
          Height = 17
          Hint = 'Dither Method'
          Caption = 'Floyed'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 3
        end
        object R4: TRadioButton
          Left = 208
          Top = 107
          Width = 109
          Height = 17
          Hint = 'Dither Method'
          Caption = 'GrayScale'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 4
          OnClick = R4Click
        end
        object Numcolors: TScrollBar
          Left = 181
          Top = 168
          Width = 135
          Height = 11
          Hint = 'Number of colors'
          Max = 255
          ParentShowHint = False
          ShowHint = True
          TabOrder = 5
          OnChange = NumcolorsChange
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'Curl Page'
      object GroupBox21: TGroupBox
        Left = 7
        Top = 10
        Width = 333
        Height = 200
        Caption = 'Curl Page Effect'
        TabOrder = 0
        IsControl = True
        object Label48: TLabel
          Left = 9
          Top = 164
          Width = 140
          Height = 13
          Caption = 'Drag Mouse to select an area'
        end
        object Curl: TBitBtn
          Left = 161
          Top = 135
          Width = 53
          Height = 43
          Caption = 'Preview'
          Enabled = False
          ParentShowHint = False
          ShowHint = True
          TabOrder = 0
          OnClick = CurlClick
          Style = bsNew
        end
        object GroupBox22: TGroupBox
          Left = 260
          Top = 130
          Width = 62
          Height = 48
          Caption = 'Location '
          TabOrder = 1
          object C_RT: TRadioButton
            Left = 36
            Top = 13
            Width = 20
            Height = 17
            Hint = 'Right Top'
            ParentShowHint = False
            ShowHint = True
            TabOrder = 0
          end
          object C_LT: TRadioButton
            Left = 8
            Top = 13
            Width = 17
            Height = 17
            Hint = 'Left Top'
            Checked = True
            ParentShowHint = False
            ShowHint = True
            TabOrder = 1
            TabStop = True
          end
          object C_LB: TRadioButton
            Left = 8
            Top = 29
            Width = 18
            Height = 17
            Hint = 'Left Bottom'
            ParentShowHint = False
            ShowHint = True
            TabOrder = 2
          end
          object C_RB: TRadioButton
            Left = 36
            Top = 29
            Width = 17
            Height = 17
            Hint = 'Right Bottom'
            ParentShowHint = False
            ShowHint = True
            TabOrder = 3
          end
        end
        object GroupBox23: TGroupBox
          Left = 214
          Top = 130
          Width = 46
          Height = 48
          Caption = 'Orient.'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 2
          object C_OH: TRadioButton
            Left = 15
            Top = 13
            Width = 17
            Height = 17
            Hint = 'Horizonal Curl'
            Checked = True
            ParentShowHint = False
            ShowHint = True
            TabOrder = 0
            TabStop = True
          end
          object C_OV: TRadioButton
            Left = 15
            Top = 29
            Width = 18
            Height = 17
            Hint = 'Vertical Curl'
            ParentShowHint = False
            ShowHint = True
            TabOrder = 1
          end
        end
        object CurlBC: TBitBtn
          Left = 242
          Top = 100
          Width = 79
          Height = 31
          Caption = 'F-Color'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 3
          OnClick = CurlBCClick
          Style = bsNew
        end
        object CurlFC: TBitBtn
          Left = 161
          Top = 100
          Width = 79
          Height = 31
          Caption = 'B-Color'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 4
          OnClick = CurlFCClick
          Style = bsNew
        end
        object GroupBox24: TGroupBox
          Left = 161
          Top = 66
          Width = 77
          Height = 31
          Caption = 'Shading'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 5
          object B_CUBC: TRadioButton
            Left = 51
            Top = 12
            Width = 17
            Height = 17
            Hint = 'Use Backgroun color'
            ParentShowHint = False
            ShowHint = True
            TabOrder = 0
          end
          object B_CUFC: TRadioButton
            Left = 9
            Top = 12
            Width = 18
            Height = 17
            Hint = 'Use foreground color'
            Checked = True
            ParentShowHint = False
            ShowHint = True
            TabOrder = 1
            TabStop = True
          end
        end
        object FCC: TGroupBox
          Left = 243
          Top = 66
          Width = 77
          Height = 31
          Caption = 'Background'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 6
          object B_CFC: TRadioButton
            Left = 49
            Top = 12
            Width = 17
            Height = 17
            Hint = 'Use Backgroun color'
            ParentShowHint = False
            ShowHint = True
            TabOrder = 0
          end
          object B_CBC: TRadioButton
            Left = 12
            Top = 12
            Width = 18
            Height = 17
            Hint = 'Use foreground color'
            Checked = True
            ParentShowHint = False
            ShowHint = True
            TabOrder = 1
            TabStop = True
          end
        end
        object C_Trans: TCheckBox
          Left = 160
          Top = 48
          Width = 78
          Height = 17
          Hint = 'Keep Image'
          Caption = 'Keep Image'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 7
        end
        object CShade: TCheckBox
          Left = 239
          Top = 48
          Width = 49
          Height = 17
          Hint = 'Shade Under Curl'
          Caption = 'Shade'
          ParentShowHint = False
          ShowHint = True
          State = cbChecked
          TabOrder = 8
        end
        object Value: TSpinEdit
          Left = 288
          Top = 46
          Width = 31
          Height = 22
          Hint = 'Shading transparancy'
          MaxValue = 5
          MinValue = 1
          ParentShowHint = False
          ShowHint = True
          TabOrder = 9
          Value = 4
        end
      end
      object CONOK: TCheckBox
        Left = 167
        Top = 192
        Width = 89
        Height = 15
        Caption = 'Curl On OK'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 1
        OnClick = CONOKClick
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'Edge Detection'
      object GroupBox32: TGroupBox
        Left = 7
        Top = 10
        Width = 333
        Height = 200
        Caption = 'Edge Detection'
        TabOrder = 0
        IsControl = True
        object Label132: TLabel
          Left = 219
          Top = 80
          Width = 45
          Height = 13
          Caption = 'Value = 1'
        end
        object Label49: TLabel
          Left = 9
          Top = 164
          Width = 140
          Height = 13
          Caption = 'Drag Mouse to select an area'
        end
        object Edgebtn: TBitBtn
          Left = 206
          Top = 136
          Width = 89
          Height = 33
          Caption = 'Preview'
          TabOrder = 0
          OnClick = EdgebtnClick
          Style = bsNew
        end
        object EdgeBar: TScrollBar
          Left = 180
          Top = 108
          Width = 135
          Height = 11
          Hint = 'Value'
          Min = 1
          ParentShowHint = False
          Position = 1
          ShowHint = True
          TabOrder = 1
          OnChange = EdgeBarChange
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'Engrave'
      object GroupBox10: TGroupBox
        Left = 7
        Top = 10
        Width = 333
        Height = 200
        Caption = 'Engrave Image'
        TabOrder = 0
        IsControl = True
        object Label9: TLabel
          Left = 219
          Top = 80
          Width = 45
          Height = 13
          Caption = 'Value = 0'
        end
        object Label50: TLabel
          Left = 9
          Top = 164
          Width = 140
          Height = 13
          Caption = 'Drag Mouse to select an area'
        end
        object Engrave: TBitBtn
          Left = 206
          Top = 144
          Width = 89
          Height = 33
          Caption = 'Preview'
          TabOrder = 0
          OnClick = EngraveClick
          Style = bsNew
        end
        object EngBar: TScrollBar
          Left = 180
          Top = 108
          Width = 135
          Height = 11
          Hint = 'Value'
          Max = 10
          ParentShowHint = False
          ShowHint = True
          TabOrder = 1
          OnChange = EngBarChange
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'Enhance'
      object GroupBox15: TGroupBox
        Left = 7
        Top = 10
        Width = 333
        Height = 200
        Caption = 'Enhance Image'
        TabOrder = 0
        IsControl = True
        object Label18: TLabel
          Left = 189
          Top = 47
          Width = 59
          Height = 13
          Caption = 'Gamma Red'
        end
        object Label20: TLabel
          Left = 251
          Top = 47
          Width = 68
          Height = 13
          Caption = 'Gamma Green'
        end
        object Label21: TLabel
          Left = 189
          Top = 82
          Width = 60
          Height = 13
          Caption = 'Gamma Blue'
        end
        object Label22: TLabel
          Left = 256
          Top = 83
          Width = 27
          Height = 13
          Caption = 'Brigth'
        end
        object Label23: TLabel
          Left = 193
          Top = 127
          Width = 39
          Height = 13
          Hint = 'gauss or uniform'
          Caption = 'Contrast'
        end
        object Label51: TLabel
          Left = 9
          Top = 164
          Width = 140
          Height = 13
          Caption = 'Drag Mouse to select an area'
        end
        object Enhance: TBitBtn
          Left = 193
          Top = 148
          Width = 89
          Height = 29
          Caption = 'Preview'
          Enabled = False
          ParentShowHint = False
          ShowHint = True
          TabOrder = 0
          OnClick = EnhanceClick
          Style = bsNew
        end
        object EnhRed: TSpinEdit
          Left = 192
          Top = 60
          Width = 57
          Height = 22
          MaxValue = 255
          MinValue = 0
          ParentShowHint = False
          ShowHint = True
          TabOrder = 1
          Value = 10
        end
        object EnhGreen: TSpinEdit
          Left = 256
          Top = 60
          Width = 57
          Height = 22
          MaxValue = 255
          MinValue = 0
          ParentShowHint = False
          ShowHint = True
          TabOrder = 2
          Value = 10
        end
        object EnhBlue: TSpinEdit
          Left = 192
          Top = 96
          Width = 57
          Height = 22
          MaxValue = 255
          MinValue = 0
          ParentShowHint = False
          ShowHint = True
          TabOrder = 3
          Value = 10
        end
        object EnhanceOk: TCheckBox
          Left = 192
          Top = 180
          Width = 131
          Height = 17
          Hint = 'Enhance on Ok'
          Caption = 'Enhance on Ok'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 4
          OnClick = EnhanceOkClick
        end
        object EnhBright: TSpinEdit
          Left = 256
          Top = 96
          Width = 57
          Height = 22
          Hint = 'Color or Gray '
          MaxValue = 255
          MinValue = -255
          ParentShowHint = False
          ShowHint = True
          TabOrder = 5
          Value = 0
        end
        object EnhContrast: TSpinEdit
          Left = 256
          Top = 122
          Width = 57
          Height = 22
          MaxValue = 255
          MinValue = -255
          ParentShowHint = False
          ShowHint = True
          TabOrder = 6
          Value = 0
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'Gray Area'
      object GroupBox17: TGroupBox
        Left = 7
        Top = 10
        Width = 333
        Height = 200
        Caption = 'Gray Area'
        TabOrder = 0
        IsControl = True
        object Label52: TLabel
          Left = 9
          Top = 164
          Width = 140
          Height = 13
          Caption = 'Drag Mouse to select an area'
        end
        object Gray: TBitBtn
          Left = 206
          Top = 120
          Width = 89
          Height = 33
          Caption = 'Preview'
          Enabled = False
          TabOrder = 0
          OnClick = GrayClick
          Style = bsNew
        end
        object GrayOk: TCheckBox
          Left = 211
          Top = 165
          Width = 82
          Height = 17
          Hint = 'Motion on Ok'
          Caption = 'Gray on OK'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 1
          OnClick = GrayOkClick
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'Gamma'
      IsControl = True
      object GroupBox3: TGroupBox
        Left = 7
        Top = 10
        Width = 333
        Height = 200
        Caption = 'Gamma Correction'
        TabOrder = 0
        IsControl = True
        object Label8: TLabel
          Left = 219
          Top = 88
          Width = 51
          Height = 13
          Caption = 'Value = 10'
        end
        object Gamma: TBitBtn
          Left = 206
          Top = 144
          Width = 89
          Height = 33
          Caption = 'Preview'
          TabOrder = 0
          OnClick = GammaClick
          Style = bsNew
        end
        object GammaEdit: TScrollBar
          Left = 180
          Top = 108
          Width = 135
          Height = 11
          Hint = 'Value'
          Max = 50
          Min = 10
          ParentShowHint = False
          Position = 10
          ShowHint = True
          TabOrder = 1
          OnChange = GammaEditChange
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'HalfTone'
      object GroupBox128: TGroupBox
        Left = 7
        Top = 10
        Width = 333
        Height = 200
        Caption = 'HalfTone'
        TabOrder = 0
        IsControl = True
        object Label40: TLabel
          Left = 273
          Top = 51
          Width = 40
          Height = 13
          Caption = 'cell_size'
        end
        object Label41: TLabel
          Left = 195
          Top = 51
          Width = 26
          Height = 13
          Caption = 'angle'
        end
        object Label42: TLabel
          Left = 276
          Top = 169
          Width = 52
          Height = 13
          Caption = 'Gray Scale'
        end
        object HaftToneBtn: TBitBtn
          Left = 194
          Top = 151
          Width = 80
          Height = 29
          Caption = 'Preview'
          Enabled = False
          ParentShowHint = False
          ShowHint = True
          TabOrder = 0
          OnClick = HaftToneBtnClick
          Style = bsNew
        end
        object HalftoneCheck: TCheckBox
          Left = 192
          Top = 182
          Width = 92
          Height = 17
          Caption = 'Halftone on OK'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 1
          OnClick = HalftoneCheckClick
        end
        object HTCellEdit: TSpinEdit
          Left = 272
          Top = 64
          Width = 57
          Height = 22
          Hint = 'How many pixels per cell'
          MaxValue = 200
          MinValue = 0
          ParentShowHint = False
          ShowHint = True
          TabOrder = 2
          Value = 4
        end
        object HTAngleEdit: TSpinEdit
          Left = 192
          Top = 64
          Width = 57
          Height = 22
          MaxLength = 180
          MaxValue = 0
          MinValue = 0
          ParentShowHint = False
          ShowHint = True
          TabOrder = 3
          Value = 0
        end
        object GroupBox33: TGroupBox
          Left = 192
          Top = 89
          Width = 136
          Height = 61
          Hint = 'Shape to use for halftoning'
          Caption = 'Shape'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 4
          object Rcircle: TRadioButton
            Left = 72
            Top = 13
            Width = 58
            Height = 17
            Caption = 'Circle'
            TabOrder = 0
          end
          object Rellipse: TRadioButton
            Left = 72
            Top = 28
            Width = 58
            Height = 16
            Caption = 'Ellipse'
            TabOrder = 1
          end
          object Rsqaure: TRadioButton
            Left = 72
            Top = 40
            Width = 58
            Height = 17
            Caption = 'Sqaure'
            TabOrder = 2
          end
          object Rdiamond: TRadioButton
            Left = 8
            Top = 13
            Width = 66
            Height = 17
            Caption = 'Diamond'
            Checked = True
            TabOrder = 3
            TabStop = True
          end
          object Rline: TRadioButton
            Left = 8
            Top = 28
            Width = 66
            Height = 16
            Caption = 'Line'
            TabOrder = 4
          end
          object Rcross: TRadioButton
            Left = 8
            Top = 42
            Width = 66
            Height = 17
            Caption = 'Cross'
            TabOrder = 5
          end
        end
      end
      object GrayScaleCheck: TCheckBox
        Left = 300
        Top = 163
        Width = 16
        Height = 17
        Hint = 'Convert to grayscale first'
        Caption = 'Gray Scale'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 1
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'Hue and Saturation'
      object GroupBox39: TGroupBox
        Left = 7
        Top = 10
        Width = 333
        Height = 207
        Caption = 'Hue and Saturation'
        TabOrder = 0
        IsControl = True
        object Label70: TLabel
          Left = 238
          Top = 80
          Width = 38
          Height = 13
          Caption = 'Hue = 0'
        end
        object Label71: TLabel
          Left = 9
          Top = 164
          Width = 140
          Height = 13
          Caption = 'Drag Mouse to select an area'
        end
        object Label72: TLabel
          Left = 227
          Top = 111
          Width = 66
          Height = 13
          Caption = 'Saturation = 0'
        end
        object HandsP: TBitBtn
          Left = 230
          Top = 144
          Width = 89
          Height = 33
          Caption = 'Preview'
          TabOrder = 0
          OnClick = HandsPClick
          Style = bsNew
        end
        object tHue: TScrollBar
          Left = 216
          Top = 95
          Width = 113
          Height = 11
          Hint = 'Value'
          Max = 360
          ParentShowHint = False
          Position = 180
          ShowHint = True
          TabOrder = 1
          OnChange = tHueChange
        end
        object tSat: TScrollBar
          Left = 216
          Top = 126
          Width = 113
          Height = 11
          Hint = 'Value'
          Max = 200
          ParentShowHint = False
          Position = 100
          ShowHint = True
          TabOrder = 2
          OnChange = tSatChange
        end
        object HandS_On_Ok: TCheckBox
          Left = 237
          Top = 180
          Width = 92
          Height = 17
          Caption = 'Apply on Ok'
          TabOrder = 3
          OnClick = HandS_On_OkClick
        end
        object a3col: TRadioButton
          Left = 158
          Top = 73
          Width = 64
          Height = 17
          Caption = 'Master'
          Checked = True
          TabOrder = 4
          TabStop = True
          OnClick = a3colClick
        end
        object rRed: TRadioButton
          Left = 158
          Top = 93
          Width = 47
          Height = 17
          Caption = 'Red'
          TabOrder = 5
          OnClick = a3colClick
        end
        object rGreen: TRadioButton
          Left = 158
          Top = 111
          Width = 54
          Height = 17
          Caption = 'Green'
          TabOrder = 6
          OnClick = a3colClick
        end
        object rBlue: TRadioButton
          Left = 158
          Top = 130
          Width = 47
          Height = 17
          Caption = 'Blue'
          TabOrder = 7
          OnClick = a3colClick
        end
        object rYEL: TRadioButton
          Left = 158
          Top = 148
          Width = 54
          Height = 17
          Caption = 'Yellow'
          TabOrder = 8
          OnClick = a3colClick
        end
        object rMag: TRadioButton
          Left = 158
          Top = 166
          Width = 66
          Height = 17
          Caption = 'Magenta'
          TabOrder = 9
          OnClick = a3colClick
        end
        object rCyn: TRadioButton
          Left = 158
          Top = 185
          Width = 47
          Height = 17
          Caption = 'Cyan'
          TabOrder = 10
          OnClick = a3colClick
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'Invert'
      object GroupBox6: TGroupBox
        Left = 7
        Top = 10
        Width = 333
        Height = 200
        Caption = 'Invert Image'
        TabOrder = 0
        IsControl = True
        object InvertI: TCheckBox
          Left = 200
          Top = 128
          Width = 97
          Height = 17
          Caption = 'Invert Image'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 0
          OnClick = InvertClick
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'Jiggle'
      object GroupBox29: TGroupBox
        Left = 7
        Top = 10
        Width = 333
        Height = 200
        Caption = 'Jiggle Image'
        TabOrder = 0
        IsControl = True
        object Label35: TLabel
          Left = 190
          Top = 46
          Width = 27
          Height = 13
          Caption = 'Value'
        end
        object Label36: TLabel
          Left = 254
          Top = 46
          Width = 21
          Height = 13
          Caption = 'Amp'
        end
        object Label39: TLabel
          Left = 229
          Top = 96
          Width = 31
          Height = 13
          Caption = 'Shape'
        end
        object Label53: TLabel
          Left = 9
          Top = 164
          Width = 140
          Height = 13
          Caption = 'Drag Mouse to select an area'
        end
        object JValue: TSpinEdit
          Left = 192
          Top = 61
          Width = 57
          Height = 22
          MaxValue = 100
          MinValue = 1
          ParentShowHint = False
          ShowHint = True
          TabOrder = 0
          Value = 1
        end
        object JAmp: TSpinEdit
          Left = 256
          Top = 61
          Width = 57
          Height = 22
          MaxValue = 360
          MinValue = 1
          ParentShowHint = False
          ShowHint = True
          TabOrder = 1
          Value = 10
        end
        object Jiggle: TBitBtn
          Left = 206
          Top = 145
          Width = 89
          Height = 33
          Caption = 'Preview'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 2
          OnClick = JiggleClick
          Style = bsNew
        end
        object JShape: TSpinEdit
          Left = 223
          Top = 112
          Width = 57
          Height = 22
          MaxValue = 1
          MinValue = 0
          ParentShowHint = False
          ShowHint = True
          TabOrder = 3
          Value = 1
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'Mirror'
      IsControl = True
      object GroupBox5: TGroupBox
        Left = 7
        Top = 10
        Width = 333
        Height = 200
        Caption = 'Mirror Image'
        TabOrder = 0
        IsControl = True
        object Mirror: TBitBtn
          Left = 206
          Top = 128
          Width = 89
          Height = 33
          Caption = 'Preview'
          TabOrder = 0
          OnClick = MirrorClick
          Style = bsNew
        end
        object HBox: TCheckBox
          Left = 210
          Top = 95
          Width = 97
          Height = 17
          Caption = 'Horizontal'
          TabOrder = 1
        end
        object VBox: TCheckBox
          Left = 210
          Top = 73
          Width = 97
          Height = 17
          Caption = 'Vertical'
          TabOrder = 2
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'Mosaic'
      object GroupBox26: TGroupBox
        Left = 7
        Top = 10
        Width = 333
        Height = 200
        Caption = 'Mosaic Effect'
        TabOrder = 0
        IsControl = True
        object Label31: TLabel
          Left = 244
          Top = 62
          Width = 20
          Height = 13
          Caption = 'Size'
        end
        object labell: TLabel
          Left = 287
          Top = 62
          Width = 31
          Height = 13
          Caption = 'Height'
        end
        object labels: TLabel
          Left = 244
          Top = 97
          Width = 31
          Height = 13
          Caption = 'Space'
        end
        object Labels45: TLabel
          Left = 288
          Top = 97
          Width = 23
          Height = 13
          Caption = 'Light'
        end
        object Labels53: TLabel
          Left = 222
          Top = 142
          Width = 29
          Height = 13
          Caption = 'Rand.'
          ParentShowHint = False
          ShowHint = True
        end
        object Label54: TLabel
          Left = 9
          Top = 164
          Width = 140
          Height = 13
          Caption = 'Drag Mouse to select an area'
        end
        object Mosaic: TBitBtn
          Left = 165
          Top = 135
          Width = 54
          Height = 43
          Caption = 'Preview'
          Enabled = False
          TabOrder = 0
          OnClick = MosaicClick
          Style = bsNew
        end
        object MosBColor: TBitBtn
          Left = 258
          Top = 143
          Width = 69
          Height = 22
          Caption = 'B-Color'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 2
          OnClick = MosBColorClick
          Style = bsNew
        end
        object GroupBox30: TGroupBox
          Left = 164
          Top = 48
          Width = 77
          Height = 31
          Caption = 'Polygons'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 3
          object btnType2: TRadioButton
            Left = 49
            Top = 12
            Width = 17
            Height = 17
            Checked = True
            ParentShowHint = False
            ShowHint = True
            TabOrder = 0
            TabStop = True
            OnClick = btnType2Click
          end
          object btnType: TRadioButton
            Left = 12
            Top = 12
            Width = 18
            Height = 17
            ParentShowHint = False
            ShowHint = True
            TabOrder = 1
            OnClick = btnTypeClick
          end
        end
        object MosAntiA: TCheckBox
          Left = 244
          Top = 47
          Width = 82
          Height = 17
          Hint = 'Anti-Aliasing'
          Caption = 'Anti-Aliasing'
          ParentShowHint = False
          ShowHint = True
          State = cbChecked
          TabOrder = 4
        end
        object MosSize: TSpinEdit
          Left = 243
          Top = 75
          Width = 43
          Height = 22
          Hint = 'Size of the mosiac'
          MaxLength = 100
          MaxValue = 20000
          MinValue = 1
          ParentShowHint = False
          ShowHint = True
          TabOrder = 5
          Value = 150
        end
        object MosHeight: TSpinEdit
          Left = 290
          Top = 75
          Width = 39
          Height = 22
          Hint = 'Height of the mosiac'
          MaxValue = 20000
          MinValue = 1
          ParentShowHint = False
          ShowHint = True
          TabOrder = 6
          Value = 40
        end
        object MosLight: TSpinEdit
          Left = 289
          Top = 110
          Width = 40
          Height = 22
          Hint = 'Light degree'
          MaxValue = 360
          MinValue = -360
          ParentShowHint = False
          ShowHint = True
          TabOrder = 7
          Value = 30
        end
        object MosSpace: TSpinEdit
          Left = 244
          Top = 110
          Width = 42
          Height = 22
          Hint = 'Space between mosaics'
          MaxValue = 1000
          MinValue = 1
          ParentShowHint = False
          ShowHint = True
          TabOrder = 8
          Value = 10
        end
        object MosRand: TSpinEdit
          Left = 221
          Top = 156
          Width = 33
          Height = 22
          Hint = 'Random'
          MaxValue = 5
          MinValue = 0
          ParentShowHint = False
          ShowHint = True
          TabOrder = 9
          Value = 1
        end
        object GroupBox27: TGroupBox
          Left = 164
          Top = 99
          Width = 77
          Height = 31
          Caption = 'Smooth'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 10
          object MosSur2: TRadioButton
            Left = 49
            Top = 12
            Width = 17
            Height = 17
            ParentShowHint = False
            ShowHint = True
            TabOrder = 0
            OnClick = MosSur2Click
          end
          object MosSur1: TRadioButton
            Left = 12
            Top = 12
            Width = 18
            Height = 17
            Checked = True
            ParentShowHint = False
            ShowHint = True
            TabOrder = 1
            TabStop = True
            OnClick = MosSur1Click
          end
        end
        object MosFColor: TBitBtn
          Left = 258
          Top = 170
          Width = 69
          Height = 23
          Caption = 'F-Color'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 1
          OnClick = MosFColorClick
          Style = bsNew
        end
      end
      object MosOk: TCheckBox
        Left = 171
        Top = 192
        Width = 89
        Height = 15
        Caption = 'Mosaic On OK'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 1
        OnClick = MosOkClick
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'Motion'
      object GroupBox16: TGroupBox
        Left = 7
        Top = 10
        Width = 333
        Height = 200
        Caption = 'Motion Image'
        TabOrder = 0
        IsControl = True
        object Label24: TLabel
          Left = 190
          Top = 47
          Width = 27
          Height = 13
          Caption = 'Value'
        end
        object Label25: TLabel
          Left = 254
          Top = 48
          Width = 27
          Height = 13
          Caption = 'Angle'
        end
        object Label55: TLabel
          Left = 9
          Top = 164
          Width = 140
          Height = 13
          Caption = 'Drag Mouse to select an area'
        end
        object Motion: TBitBtn
          Left = 193
          Top = 148
          Width = 89
          Height = 29
          Caption = 'Preview'
          Enabled = False
          ParentShowHint = False
          ShowHint = True
          TabOrder = 0
          OnClick = MotionClick
          Style = bsNew
        end
        object MotEdit: TSpinEdit
          Left = 192
          Top = 60
          Width = 57
          Height = 22
          MaxValue = 5000
          MinValue = 5
          ParentShowHint = False
          ShowHint = True
          TabOrder = 1
          Value = 10
        end
        object MotAngleEdit: TSpinEdit
          Left = 256
          Top = 60
          Width = 57
          Height = 22
          MaxValue = 360
          MinValue = 0
          ParentShowHint = False
          ShowHint = True
          TabOrder = 2
          Value = 10
          Visible = False
        end
        object MotionZoom: TRadioButton
          Left = 192
          Top = 88
          Width = 113
          Height = 17
          Caption = 'Motion Zoom'
          Checked = True
          ParentShowHint = False
          ShowHint = True
          TabOrder = 3
          TabStop = True
          OnClick = Mtr
        end
        object MotionRotate: TRadioButton
          Left = 192
          Top = 107
          Width = 113
          Height = 17
          Caption = 'Motion Rotate'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 4
          OnClick = Mtr
        end
        object MotionLine: TRadioButton
          Left = 192
          Top = 128
          Width = 113
          Height = 17
          Caption = 'Motion Line'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 5
          OnClick = Mtr
        end
        object MotionOk: TCheckBox
          Left = 192
          Top = 180
          Width = 133
          Height = 17
          Hint = 'Motion on Ok'
          Caption = 'Motion on Ok'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 6
          OnClick = MotionOkClick
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'Noisy'
      object GroupBox13: TGroupBox
        Left = 7
        Top = 10
        Width = 333
        Height = 200
        Caption = 'Noisy Image'
        TabOrder = 0
        IsControl = True
        object Label13: TLabel
          Left = 192
          Top = 47
          Width = 20
          Height = 13
          Caption = 'Red'
        end
        object Label14: TLabel
          Left = 252
          Top = 47
          Width = 29
          Height = 13
          Caption = 'Green'
        end
        object Label33: TLabel
          Left = 192
          Top = 82
          Width = 21
          Height = 13
          Caption = 'Blue'
        end
        object Label15: TLabel
          Left = 256
          Top = 82
          Width = 22
          Height = 13
          Caption = 'Gray'
        end
        object Label16: TLabel
          Left = 193
          Top = 127
          Width = 36
          Height = 13
          Hint = 'gauss or uniform'
          Caption = 'Method'
        end
        object Label56: TLabel
          Left = 9
          Top = 164
          Width = 140
          Height = 13
          Caption = 'Drag Mouse to select an area'
        end
        object Noisy: TBitBtn
          Left = 193
          Top = 148
          Width = 89
          Height = 29
          Caption = 'Preview'
          Enabled = False
          ParentShowHint = False
          ShowHint = True
          TabOrder = 0
          OnClick = NoisyClick
          Style = bsNew
        end
        object sRed: TSpinEdit
          Left = 192
          Top = 60
          Width = 57
          Height = 22
          MaxValue = 255
          MinValue = 0
          ParentShowHint = False
          ShowHint = True
          TabOrder = 1
          Value = 20
        end
        object sGreen: TSpinEdit
          Left = 256
          Top = 60
          Width = 57
          Height = 22
          MaxValue = 255
          MinValue = 0
          ParentShowHint = False
          ShowHint = True
          TabOrder = 2
          Value = 20
        end
        object sBlue: TSpinEdit
          Left = 192
          Top = 96
          Width = 57
          Height = 22
          MaxValue = 255
          MinValue = 0
          ParentShowHint = False
          ShowHint = True
          TabOrder = 3
          Value = 20
        end
        object NoisyOk: TCheckBox
          Left = 192
          Top = 179
          Width = 129
          Height = 17
          Hint = 'Noisy on Ok'
          Caption = 'Noisy on Ok'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 4
          OnClick = NoisyOkClick
        end
        object sGray: TSpinEdit
          Left = 256
          Top = 96
          Width = 57
          Height = 22
          Hint = 'Color or Gray '
          MaxValue = 1
          MinValue = 0
          ParentShowHint = False
          ShowHint = True
          TabOrder = 5
          Value = 0
        end
        object NoisyValue: TSpinEdit
          Left = 257
          Top = 122
          Width = 57
          Height = 22
          MaxValue = 1
          MinValue = 0
          ParentShowHint = False
          ShowHint = True
          TabOrder = 6
          Value = 0
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'Oil Paint'
      object GroupBox8: TGroupBox
        Left = 7
        Top = 10
        Width = 333
        Height = 200
        Caption = 'Oil Paint Image'
        TabOrder = 0
        IsControl = True
        object Label1: TLabel
          Left = 219
          Top = 88
          Width = 45
          Height = 13
          Caption = 'Value = 0'
        end
        object Label57: TLabel
          Left = 9
          Top = 164
          Width = 140
          Height = 13
          Caption = 'Drag Mouse to select an area'
        end
        object OilPaint: TBitBtn
          Left = 206
          Top = 136
          Width = 89
          Height = 33
          Caption = 'Preview'
          TabOrder = 0
          OnClick = OilPaintClick
          Style = bsNew
        end
        object OPbar: TScrollBar
          Left = 180
          Top = 108
          Width = 135
          Height = 11
          Hint = 'Value'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 1
          OnChange = OPbarChange
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'Pinch Hole'
      object GroupBox14: TGroupBox
        Left = 7
        Top = 10
        Width = 333
        Height = 200
        Caption = 'Pinch Hole in Image'
        TabOrder = 0
        IsControl = True
        object Label17: TLabel
          Left = 219
          Top = 88
          Width = 45
          Height = 13
          Caption = 'Value = 0'
        end
        object Label19: TLabel
          Left = 172
          Top = 165
          Width = 3
          Height = 13
        end
        object Label58: TLabel
          Left = 9
          Top = 164
          Width = 140
          Height = 13
          Caption = 'Drag Mouse to select an area'
        end
        object BitBtn1: TBitBtn
          Left = 206
          Top = 136
          Width = 89
          Height = 33
          Caption = 'Preview'
          TabOrder = 0
          OnClick = BitBtn1Click
          Style = bsNew
        end
        object PinchBar: TScrollBar
          Left = 180
          Top = 108
          Width = 135
          Height = 11
          Hint = 'Value'
          Max = 0
          Min = -20
          ParentShowHint = False
          ShowHint = True
          TabOrder = 1
          OnChange = PinchBarChange
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'Pixel Fix'
      object GroupBox25: TGroupBox
        Left = 7
        Top = 10
        Width = 333
        Height = 200
        Caption = 'Fill in missing pixels (Despeckle)'
        TabOrder = 0
        IsControl = True
        object Label30: TLabel
          Left = 219
          Top = 88
          Width = 45
          Height = 13
          Caption = 'Value = 0'
        end
        object Label59: TLabel
          Left = 9
          Top = 164
          Width = 140
          Height = 13
          Caption = 'Drag Mouse to select an area'
        end
        object PxelFix: TBitBtn
          Left = 206
          Top = 136
          Width = 89
          Height = 33
          Caption = 'Preview'
          TabOrder = 0
          OnClick = PxelFixClick
          Style = bsNew
        end
        object PFix: TScrollBar
          Left = 180
          Top = 108
          Width = 135
          Height = 11
          Hint = 'Number of neighbour pixels to examine'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 1
          OnChange = PFixChange
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'Pyramid Extrude'
      object GroupBox38: TGroupBox
        Left = 7
        Top = 10
        Width = 333
        Height = 200
        Caption = 'Pyramid Extrude'
        TabOrder = 0
        IsControl = True
        object PyramidSize: TLabel
          Left = 216
          Top = 71
          Width = 20
          Height = 13
          Caption = 'Size'
        end
        object ExtrudeSize: TSpinEdit
          Left = 216
          Top = 86
          Width = 49
          Height = 22
          MaxValue = 30
          MinValue = 10
          ParentShowHint = False
          ShowHint = True
          TabOrder = 0
          Value = 10
        end
        object PyramidOnOk: TCheckBox
          Left = 216
          Top = 160
          Width = 97
          Height = 17
          Caption = 'Pyramid On Ok'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 1
          OnClick = PyramidOnOkClick
        end
        object Levels: TCheckBox
          Left = 272
          Top = 87
          Width = 52
          Height = 17
          Caption = 'Levels'
          ParentShowHint = False
          ShowHint = True
          State = cbChecked
          TabOrder = 2
          Visible = False
        end
        object PreviewPyramid: TBitBtn
          Left = 218
          Top = 118
          Width = 89
          Height = 33
          Caption = 'Preview'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 3
          OnClick = PreviewPyramidClick
          Style = bsNew
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'Polar'
      object GroupBox20: TGroupBox
        Left = 7
        Top = 10
        Width = 333
        Height = 200
        Caption = 'Polar Image'
        TabOrder = 0
        IsControl = True
        object Label28: TLabel
          Left = 189
          Top = 60
          Width = 21
          Height = 13
          Caption = 'Vale'
        end
        object Label29: TLabel
          Left = 259
          Top = 60
          Width = 27
          Height = 13
          Caption = 'Angle'
        end
        object Label60: TLabel
          Left = 9
          Top = 164
          Width = 140
          Height = 13
          Caption = 'Drag Mouse to select an area'
        end
        object PolarBt: TBitBtn
          Left = 206
          Top = 128
          Width = 89
          Height = 33
          Caption = 'Preview'
          Enabled = False
          ParentShowHint = False
          ShowHint = True
          TabOrder = 0
          OnClick = PolarBtClick
          Style = bsNew
        end
        object PolBack: TCheckBox
          Left = 247
          Top = 100
          Width = 71
          Height = 17
          Caption = 'Backwards'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 1
        end
        object PolInv: TCheckBox
          Left = 189
          Top = 100
          Width = 57
          Height = 17
          Caption = 'Inverse'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 2
        end
        object PolValue: TSpinEdit
          Left = 189
          Top = 75
          Width = 57
          Height = 22
          MaxValue = 0
          MinValue = 0
          ParentShowHint = False
          ShowHint = True
          TabOrder = 3
          Value = 100
        end
        object PolAngle: TSpinEdit
          Left = 259
          Top = 75
          Width = 57
          Height = 22
          MaxValue = 0
          MinValue = 0
          ParentShowHint = False
          ShowHint = True
          TabOrder = 4
          Value = 0
        end
        object PolOk: TCheckBox
          Left = 209
          Top = 166
          Width = 104
          Height = 17
          Hint = 'Polar on Ok'
          Caption = 'Polar on Ok'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 5
          OnClick = PolOkClick
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'Rotate'
      object Label6: TLabel
        Left = 230
        Top = 192
        Width = 45
        Height = 13
        Caption = 'Angle = 0'
      end
      object GroupBox4: TGroupBox
        Left = 7
        Top = 10
        Width = 333
        Height = 200
        Caption = 'Rotate Image'
        TabOrder = 0
        IsControl = True
        object Label61: TLabel
          Left = 9
          Top = 164
          Width = 140
          Height = 13
          Caption = 'Drag Mouse to select an area'
        end
        object Rotate: TBitBtn
          Left = 206
          Top = 119
          Width = 89
          Height = 33
          Caption = 'Preview'
          TabOrder = 0
          OnClick = RotateClick
          Style = bsNew
        end
        object BackColor: TBitBtn
          Left = 207
          Top = 76
          Width = 89
          Height = 33
          Caption = 'Back Color'
          TabOrder = 1
          OnClick = BackColorClick
          Style = bsNew
        end
      end
      object RotEdit: TScrollBar
        Left = 190
        Top = 175
        Width = 135
        Height = 11
        Hint = 'Angle'
        Max = 360
        Min = -360
        ParentShowHint = False
        ShowHint = True
        TabOrder = 1
        OnChange = RotEditChange
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'Sharp'
      object GroupBox18: TGroupBox
        Left = 7
        Top = 10
        Width = 333
        Height = 200
        Caption = 'SharpImage'
        TabOrder = 0
        IsControl = True
        object Label26: TLabel
          Left = 219
          Top = 88
          Width = 45
          Height = 13
          Caption = 'Value = 0'
        end
        object Label62: TLabel
          Left = 9
          Top = 164
          Width = 140
          Height = 13
          Caption = 'Drag Mouse to select an area'
        end
        object Sharp: TBitBtn
          Left = 206
          Top = 136
          Width = 89
          Height = 33
          Caption = 'Preview'
          TabOrder = 0
          OnClick = SharpClick
          Style = bsNew
        end
        object SharpBar: TScrollBar
          Left = 180
          Top = 108
          Width = 135
          Height = 11
          Hint = 'Value'
          Max = 9
          Min = -9
          ParentShowHint = False
          ShowHint = True
          TabOrder = 1
          OnChange = SharpBarChange
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'Spray'
      object GroupBox31: TGroupBox
        Left = 7
        Top = 10
        Width = 333
        Height = 200
        Caption = 'Spray Image'
        TabOrder = 0
        IsControl = True
        object Label37: TLabel
          Left = 190
          Top = 71
          Width = 27
          Height = 13
          Caption = 'Value'
        end
        object Label38: TLabel
          Left = 254
          Top = 72
          Width = 40
          Height = 13
          Caption = 'Random'
        end
        object Label63: TLabel
          Left = 9
          Top = 164
          Width = 140
          Height = 13
          Caption = 'Drag Mouse to select an area'
        end
        object SprayVal: TSpinEdit
          Left = 192
          Top = 84
          Width = 57
          Height = 22
          MaxValue = 1000
          MinValue = 0
          ParentShowHint = False
          ShowHint = True
          TabOrder = 0
          Value = 0
        end
        object SprayRand: TSpinEdit
          Left = 256
          Top = 84
          Width = 57
          Height = 22
          MaxValue = 360
          MinValue = 1
          TabOrder = 1
          Value = 1
        end
        object Spray: TBitBtn
          Left = 206
          Top = 136
          Width = 89
          Height = 33
          Caption = 'Preview'
          TabOrder = 2
          OnClick = SprayClick
          Style = bsNew
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'Tile Maker'
      object BitBtn2: TBitBtn
        Left = 206
        Top = 120
        Width = 89
        Height = 33
        Caption = 'Preview'
        Enabled = False
        TabOrder = 0
        OnClick = GrayClick
        Style = bsNew
      end
      object CheckBox1: TCheckBox
        Left = 211
        Top = 157
        Width = 82
        Height = 17
        Hint = 'Motion on Ok'
        Caption = 'Gray on OK'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 1
        OnClick = GrayOkClick
      end
      object GroupBox35: TGroupBox
        Left = 7
        Top = 10
        Width = 333
        Height = 200
        Caption = 'Create an Image Suitable for Tiling'
        TabOrder = 2
        IsControl = True
        object TileBTN: TBitBtn
          Left = 206
          Top = 120
          Width = 89
          Height = 33
          Caption = 'Preview'
          Enabled = False
          TabOrder = 0
          OnClick = TileBTNClick
          Style = bsNew
        end
        object TileOnOk: TCheckBox
          Left = 211
          Top = 161
          Width = 85
          Height = 15
          Caption = 'Tile on ok'
          TabOrder = 1
          OnClick = TileOnOkClick
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'Threshold'
      object GroupBox36: TGroupBox
        Left = 7
        Top = 10
        Width = 333
        Height = 200
        Caption = 'Threshold Image'
        TabOrder = 0
        IsControl = True
        object Label32: TLabel
          Left = 190
          Top = 47
          Width = 27
          Height = 13
          Caption = 'Value'
        end
        object Label34: TLabel
          Left = 254
          Top = 48
          Width = 59
          Height = 13
          Caption = 'Anti Alialsing'
        end
        object Label46: TLabel
          Left = 9
          Top = 164
          Width = 140
          Height = 13
          Caption = 'Drag Mouse to select an area'
        end
        object ThresEdit: TSpinEdit
          Left = 192
          Top = 60
          Width = 57
          Height = 22
          MaxValue = 255
          MinValue = 0
          ParentShowHint = False
          ShowHint = True
          TabOrder = 0
          Value = 120
        end
        object ThresPrev: TBitBtn
          Left = 206
          Top = 120
          Width = 89
          Height = 33
          Caption = 'Preview'
          Enabled = False
          TabOrder = 1
          OnClick = ThresPrevClick
          Style = bsNew
        end
        object ThresAnti: TCheckBox
          Left = 276
          Top = 63
          Width = 19
          Height = 17
          State = cbChecked
          TabOrder = 2
        end
        object ThresOnOk: TCheckBox
          Left = 203
          Top = 159
          Width = 97
          Height = 17
          Caption = 'Threshold on OK'
          TabOrder = 3
          OnClick = ThresOnOkClick
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'Transitions'
      object GroupBox1: TGroupBox
        Left = 7
        Top = 10
        Width = 333
        Height = 200
        Caption = 'Transition Effects'
        TabOrder = 0
        IsControl = True
        object Label3: TLabel
          Left = 228
          Top = 148
          Width = 27
          Height = 13
          Caption = 'Delay'
        end
        object Label4: TLabel
          Left = 268
          Top = 149
          Width = 49
          Height = 13
          Caption = 'Thickness'
        end
        object FXN: TRadioButton
          Left = 227
          Top = 55
          Width = 85
          Height = 17
          Caption = 'None'
          Checked = True
          TabOrder = 0
          TabStop = True
          OnClick = FXTest
        end
        object FXH: TRadioButton
          Left = 227
          Top = 70
          Width = 85
          Height = 17
          Caption = 'Horizontal'
          TabOrder = 1
          OnClick = FXTest
        end
        object FXV: TRadioButton
          Left = 227
          Top = 85
          Width = 85
          Height = 17
          Caption = 'Vertical'
          TabOrder = 2
          OnClick = FXTest
        end
        object FXD: TRadioButton
          Left = 227
          Top = 100
          Width = 85
          Height = 17
          Caption = 'Diagonal'
          TabOrder = 3
          OnClick = FXTest
        end
        object FXS: TRadioButton
          Left = 227
          Top = 115
          Width = 85
          Height = 17
          Caption = 'Squares'
          TabOrder = 4
          OnClick = FXTest
        end
        object FXR: TRadioButton
          Left = 227
          Top = 130
          Width = 85
          Height = 17
          Caption = 'Rectangle'
          TabOrder = 5
          OnClick = FXTest
        end
        object FXDelay: TSpinEdit
          Left = 229
          Top = 165
          Width = 41
          Height = 22
          MaxValue = 100
          MinValue = 1
          TabOrder = 6
          Value = 15
        end
        object FXRowCol: TSpinEdit
          Left = 272
          Top = 165
          Width = 41
          Height = 22
          Increment = 2
          MaxValue = 20
          MinValue = 1
          TabOrder = 7
          Value = 4
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'Whirl Pool'
      object GroupBox11: TGroupBox
        Left = 7
        Top = 10
        Width = 333
        Height = 200
        Caption = 'Whirl Pool Image'
        TabOrder = 0
        IsControl = True
        object Label10: TLabel
          Left = 219
          Top = 88
          Width = 45
          Height = 13
          Caption = 'Value = 0'
        end
        object Label64: TLabel
          Left = 9
          Top = 164
          Width = 140
          Height = 13
          Caption = 'Drag Mouse to select an area'
        end
        object Whir: TBitBtn
          Left = 206
          Top = 144
          Width = 89
          Height = 33
          Caption = 'Preview'
          TabOrder = 0
          OnClick = WhirClick
          Style = bsNew
        end
        object WhirlBar: TScrollBar
          Left = 180
          Top = 108
          Width = 135
          Height = 11
          Hint = 'Value'
          Max = 1000
          ParentShowHint = False
          ShowHint = True
          TabOrder = 1
          OnChange = WhirlBarChange
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'Wave Image'
      object GroupBox12: TGroupBox
        Left = 7
        Top = 10
        Width = 333
        Height = 200
        Caption = 'Wave The Image'
        TabOrder = 0
        IsControl = True
        object Label111: TLabel
          Left = 192
          Top = 74
          Width = 30
          Height = 13
          Caption = 'Phase'
        end
        object Label11: TLabel
          Left = 252
          Top = 74
          Width = 61
          Height = 13
          Caption = 'Wave length'
        end
        object Label12: TLabel
          Left = 192
          Top = 109
          Width = 46
          Height = 13
          Caption = 'Amplitude'
        end
        object Label65: TLabel
          Left = 9
          Top = 164
          Width = 140
          Height = 13
          Caption = 'Drag Mouse to select an area'
        end
        object Wave: TBitBtn
          Left = 193
          Top = 148
          Width = 89
          Height = 29
          Caption = 'Preview'
          Enabled = False
          TabOrder = 0
          OnClick = WaveClick
          Style = bsNew
        end
        object Phase: TSpinEdit
          Left = 192
          Top = 87
          Width = 57
          Height = 22
          Hint = 'How many phases'
          MaxValue = 360
          MinValue = 0
          ParentShowHint = False
          ShowHint = True
          TabOrder = 1
          Value = 0
        end
        object WaveL: TSpinEdit
          Left = 256
          Top = 87
          Width = 57
          Height = 22
          MaxValue = 200
          MinValue = 0
          TabOrder = 2
          Value = 20
        end
        object Amp: TSpinEdit
          Left = 192
          Top = 123
          Width = 57
          Height = 22
          Hint = 'Value of the amplitute'
          MaxValue = 200
          MinValue = 0
          ParentShowHint = False
          ShowHint = True
          TabOrder = 3
          Value = 50
        end
        object Refl: TCheckBox
          Left = 252
          Top = 115
          Width = 66
          Height = 17
          Hint = 'Reflective waves or just distorting'
          Caption = 'Reflection'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 4
        end
        object Smear: TCheckBox
          Left = 252
          Top = 130
          Width = 56
          Height = 17
          Hint = 'Smear the edges out'
          Caption = 'Smear'
          ParentShowHint = False
          ShowHint = True
          State = cbChecked
          TabOrder = 5
        end
        object OnOk: TCheckBox
          Left = 192
          Top = 179
          Width = 113
          Height = 17
          Hint = 'Wave on Ok'
          Caption = 'Wave on Ok'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 6
          OnClick = OnOkClick
        end
      end
    end
  end
  object Timer1: TTimer
    OnTimer = Timer1Timer
    Left = 290
    Top = 65535
  end
  object CD1: TColorDialog
    Ctl3D = True
    Color = clBtnFace
    Left = 317
    Top = 65535
  end
end