object EffectManager: TEffectManager Left = 213 Top = 182 Width = 459 Height = 273 BorderIcons = [] BorderStyle = bsSizeToolWin Caption = 'imagoWEB Effects Manager' Font.Charset = DEFAULT_CHARSET 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 CBG: TGauge Left = 0 Top = 218 Width = 451 Height = 7 Align = alBottom ShowText = False ForeColor = clRed Progress = 0 end object ButtonPanel: TPanel Left = 344 Top = 0 Width = 107 Height = 218 Align = alRight BevelInner = bvLowered BorderStyle = bsSingle Color = clTeal TabOrder = 1 object OKBtn: TBitBtn Left = 11 Top = 12 Width = 78 Height = 27 TabOrder = 0 OnClick = OKBtnClick Kind = bkOK Margin = 2 Style = bsNew Spacing = -1 IsControl = True end object CancelBtn: TBitBtn Left = 11 Top = 43 Width = 78 Height = 27 TabOrder = 1 OnClick = CancelBtnClick Kind = bkCancel Margin = 2 Style = bsNew Spacing = -1 IsControl = True end object DitherC: TCheckBox Left = 3 Top = 195 Width = 91 Height = 17 Caption = 'Dither Image' Font.Charset = DEFAULT_CHARSET Font.Color = clYellow Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 2 Visible = False OnClick = DitherCClick end object Undo: TBitBtn Left = 11 Top = 104 Width = 78 Height = 27 Caption = 'Undo' TabOrder = 3 OnClick = UndoClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 0400000000000001000000000000000000001000000010000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 3333333333FFFFF3333333333999993333333333F77777FFF333333999999999 3333333777333777FF3333993333339993333377FF3333377FF3399993333339 993337777FF3333377F3393999333333993337F777FF333337FF993399933333 399377F3777FF333377F993339993333399377F33777FF33377F993333999333 399377F333777FF3377F993333399933399377F3333777FF377F993333339993 399377FF3333777FF7733993333339993933373FF3333777F7F3399933333399 99333773FF3333777733339993333339933333773FFFFFF77333333999999999 3333333777333777333333333999993333333333377777333333} Margin = 5 NumGlyphs = 2 Spacing = 5 end object Button1: TBitBtn Left = 11 Top = 73 Width = 78 Height = 27 Caption = 'Reload' TabOrder = 4 OnClick = Button1Click Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 0400000000000001000000000000000000001000000010000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333 333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000 0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF 07333337F33333337F333330FFFFFFFF07333337F33333337F333330FFFFFFFF 07333FF7F33333337FFFBBB0FFFFFFFF0BB37777F3333333777F3BB0FFFFFFFF 0BBB3777F3333FFF77773330FFFF000003333337F333777773333330FFFF0FF0 33333337F3337F37F3333330FFFF0F0B33333337F3337F77FF333330FFFF003B B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333 3BB33773333773333773B333333B3333333B7333333733333337} Margin = 5 NumGlyphs = 2 end end object TabSet: TTabSet Left = 0 Top = 225 Width = 451 Height = 21 Align = alBottom BackgroundColor = clInfoBk Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] SelectedColor = clAqua OnClick = TabSetClick end object Notebook: TNotebook Left = 0 Top = 0 Width = 344 Height = 218 Align = alClient Color = clNavy Font.Charset = DEFAULT_CHARSET Font.Color = clYellow Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentColor = False ParentFont = False TabOrder = 0 OnPageChanged = NotebookPageChanged IsControl = True object TPage Left = 0 Top = 0 Caption = 'AutoContrast' object GroupBox28: TGroupBox Left = 7 Top = 10 Width = 323 Height = 181 Caption = 'Automatic Contrast' TabOrder = 0 IsControl = True object AutoContrast: TBitBtn Left = 206 Top = 120 Width = 89 Height = 33 Caption = 'Preview' Enabled = False TabOrder = 0 OnClick = AutoContrastClick Style = bsNew end object AUTOOK: TCheckBox Left = 209 Top = 160 Width = 96 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 = 323 Height = 181 Caption = 'Bleed Image' Color = clNavy Font.Charset = DEFAULT_CHARSET Font.Color = clYellow Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentColor = False ParentFont = False TabOrder = 0 IsControl = True object Label27: TLabel Left = 219 Top = 72 Width = 45 Height = 13 Caption = 'Value = 0' end object Bleed: TBitBtn Left = 206 Top = 120 Width = 89 Height = 33 Caption = 'Preview' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 OnClick = BleedClick Style = bsNew end object BleedBar: TScrollBar Left = 180 Top = 92 Width = 135 Height = 17 Hint = 'Value' Max = 255 Min = -255 ParentShowHint = False ShowHint = True TabOrder = 1 OnChange = BleedBarChange end end end object TPage Left = 0 Top = 0 Caption = 'Blur' object GroupBox9: TGroupBox Left = 7 Top = 10 Width = 323 Height = 181 Caption = 'Blur Image' TabOrder = 0 IsControl = True object Label2: TLabel Left = 219 Top = 72 Width = 45 Height = 13 Caption = 'Value = 0' end object Blur: TBitBtn Left = 206 Top = 120 Width = 89 Height = 33 Caption = 'Preview' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 OnClick = BlurClick Style = bsNew end object BlurBar: TScrollBar Left = 180 Top = 92 Width = 135 Height = 17 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 = 323 Height = 181 Caption = 'Bright / Dark' TabOrder = 0 IsControl = True object Label7: TLabel Left = 219 Top = 72 Width = 45 Height = 13 Caption = 'Value = 0' end object Bright: TBitBtn Left = 206 Top = 120 Width = 89 Height = 33 Caption = 'Preview' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 OnClick = BrightClick Style = bsNew end object BDIEdit: TScrollBar Left = 180 Top = 92 Width = 135 Height = 17 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 Label5: TLabel Left = 202 Top = 192 Width = 80 Height = 13 Caption = 'Number of colors' end object GroupBox7: TGroupBox Left = 7 Top = 10 Width = 323 Height = 181 Caption = 'Color Reduction' TabOrder = 0 IsControl = True object Reduce: TBitBtn Left = 206 Top = 119 Width = 89 Height = 33 Caption = 'Preview' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False 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 = 88 Width = 91 Height = 17 Hint = 'Dither Method' Caption = 'Burkes' ParentShowHint = False ShowHint = True TabOrder = 2 end object R3: TRadioButton Left = 208 Top = 74 Width = 91 Height = 17 Hint = 'Dither Method' Caption = 'Floyed' ParentShowHint = False ShowHint = True TabOrder = 3 end object R4: TRadioButton Left = 208 Top = 102 Width = 109 Height = 17 Hint = 'Dither Method' Caption = 'GrayScale' ParentShowHint = False ShowHint = True TabOrder = 4 OnClick = R4Click end object Numcolors: TScrollBar Left = 181 Top = 156 Width = 135 Height = 17 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 = 323 Height = 181 Caption = 'Curl Page Effect' TabOrder = 0 IsControl = True object Curl: TBitBtn Left = 161 Top = 135 Width = 53 Height = 43 Caption = 'Preview' Enabled = False Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False 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.' 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' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 3 OnClick = CurlBCClick Style = bsNew end object CurlFC: TBitBtn Left = 161 Top = 100 Width = 79 Height = 31 Caption = 'B-Color' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 4 OnClick = CurlFCClick Style = bsNew end object GroupBox24: TGroupBox Left = 161 Top = 66 Width = 77 Height = 31 Caption = 'Shading' 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' 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 = 161 Top = 48 Width = 80 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' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MaxValue = 5 MinValue = 1 ParentFont = False 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' TabOrder = 1 OnClick = CONOKClick end end object TPage Left = 0 Top = 0 Caption = 'Edge Detection' object GroupBox32: TGroupBox Left = 7 Top = 10 Width = 323 Height = 181 Caption = 'Edge Detection' TabOrder = 0 IsControl = True object Label32: TLabel Left = 219 Top = 72 Width = 45 Height = 13 Caption = 'Value = 1' end object Edgebtn: TBitBtn Left = 206 Top = 120 Width = 89 Height = 33 Caption = 'Preview' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 OnClick = EdgebtnClick Style = bsNew end object EdgeBar: TScrollBar Left = 180 Top = 92 Width = 135 Height = 17 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 = 323 Height = 181 Caption = 'Engrave Image' TabOrder = 0 IsControl = True object Label9: TLabel Left = 219 Top = 72 Width = 45 Height = 13 Caption = 'Value = 0' end object Engrave: TBitBtn Left = 206 Top = 120 Width = 89 Height = 33 Caption = 'Preview' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 OnClick = EngraveClick Style = bsNew end object EngBar: TScrollBar Left = 180 Top = 92 Width = 135 Height = 17 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 = 323 Height = 181 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 Enhance: TBitBtn Left = 193 Top = 148 Width = 89 Height = 29 Caption = 'Preview' Enabled = False Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 OnClick = EnhanceClick Style = bsNew end object EnhRed: TSpinEdit Left = 192 Top = 60 Width = 57 Height = 22 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MaxValue = 255 MinValue = 0 ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 1 Value = 10 end object EnhGreen: TSpinEdit Left = 256 Top = 60 Width = 57 Height = 22 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MaxValue = 255 MinValue = 0 ParentFont = False TabOrder = 2 Value = 10 end object EnhBlue: TSpinEdit Left = 192 Top = 96 Width = 57 Height = 22 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MaxValue = 255 MinValue = 0 ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 3 Value = 10 end object EnhanceOk: TCheckBox Left = 288 Top = 156 Width = 26 Height = 17 Hint = '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 ' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MaxValue = 255 MinValue = -255 ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 5 Value = 0 end object EnhContrast: TSpinEdit Left = 256 Top = 122 Width = 57 Height = 22 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MaxValue = 255 MinValue = -255 ParentFont = False 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 = 323 Height = 181 Caption = 'Gray Area' TabOrder = 0 IsControl = True object Gray: TBitBtn Left = 206 Top = 120 Width = 89 Height = 33 Caption = 'Preview' Enabled = False Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 OnClick = GrayClick Style = bsNew end object GrayOk: 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 end end object TPage Left = 0 Top = 0 Caption = 'Gamma' IsControl = True object GroupBox3: TGroupBox Left = 7 Top = 10 Width = 323 Height = 181 Caption = 'Gamma Correction' TabOrder = 0 IsControl = True object Label8: TLabel Left = 219 Top = 72 Width = 51 Height = 13 Caption = 'Value = 10' end object Gamma: TBitBtn Left = 206 Top = 120 Width = 89 Height = 33 Caption = 'Preview' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 OnClick = GammaClick Style = bsNew end object GammaEdit: TScrollBar Left = 180 Top = 92 Width = 135 Height = 17 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 = 'Invert' object GroupBox6: TGroupBox Left = 7 Top = 10 Width = 323 Height = 181 Caption = 'Invert Image' TabOrder = 0 IsControl = True object InvertI: TCheckBox Left = 200 Top = 128 Width = 97 Height = 17 Caption = 'Invert Image' TabOrder = 0 OnClick = InvertClick end end end object TPage Left = 0 Top = 0 Caption = 'Jiggle' object GroupBox29: TGroupBox Left = 7 Top = 10 Width = 323 Height = 181 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 = 83 Width = 31 Height = 13 Caption = 'Shape' end object JValue: TSpinEdit Left = 192 Top = 60 Width = 57 Height = 22 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MaxValue = 100 MinValue = 1 ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 0 Value = 1 end object JAmp: TSpinEdit Left = 256 Top = 60 Width = 57 Height = 22 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MaxValue = 360 MinValue = 1 ParentFont = False TabOrder = 1 Value = 10 end object Jiggle: TBitBtn Left = 206 Top = 120 Width = 89 Height = 33 Caption = 'Preview' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 2 OnClick = JiggleClick Style = bsNew end object JShape: TSpinEdit Left = 223 Top = 95 Width = 57 Height = 22 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MaxValue = 1 MinValue = 0 ParentFont = False 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 = 323 Height = 181 Caption = 'Mirror Image' TabOrder = 0 IsControl = True object Mirror: TBitBtn Left = 206 Top = 120 Width = 89 Height = 33 Caption = 'Preview' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False 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 = 326 Height = 181 Caption = 'Mosaic Effect' TabOrder = 0 IsControl = True object Label31: TLabel Left = 242 Top = 62 Width = 20 Height = 13 Caption = 'Size' end object labell: TLabel Left = 281 Top = 62 Width = 31 Height = 13 Caption = 'Height' end object labels: TLabel Left = 241 Top = 97 Width = 31 Height = 13 Caption = 'Space' end object Labels45: TLabel Left = 282 Top = 97 Width = 23 Height = 13 Caption = 'Light' end object Labels53: TLabel Left = 220 Top = 142 Width = 29 Height = 13 Caption = 'Rand.' ParentShowHint = False ShowHint = True end object Mosaic: TBitBtn Left = 165 Top = 135 Width = 54 Height = 43 Caption = 'Preview' Enabled = False Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 OnClick = MosaicClick Style = bsNew end object MosFColor: TBitBtn Left = 252 Top = 156 Width = 69 Height = 23 Caption = 'F-Color' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 1 OnClick = MosFColorClick Style = bsNew end object MosBColor: TBitBtn Left = 252 Top = 133 Width = 69 Height = 22 Caption = 'B-Color' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 2 OnClick = MosBColorClick Style = bsNew end object GroupBox30: TGroupBox Left = 164 Top = 48 Width = 77 Height = 31 Caption = 'Polygons' 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 = 77 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' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MaxLength = 100 MaxValue = 20000 MinValue = 1 ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 5 Value = 150 end object MosHeight: TSpinEdit Left = 285 Top = 75 Width = 39 Height = 22 Hint = 'Height of the mosiac' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MaxValue = 20000 MinValue = 1 ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 6 Value = 40 end object MosLight: TSpinEdit Left = 285 Top = 110 Width = 40 Height = 22 Hint = 'Light degree' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MaxValue = 360 MinValue = -360 ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 7 Value = 30 end object MosSpace: TSpinEdit Left = 244 Top = 110 Width = 42 Height = 22 Hint = 'Space between mosaics' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MaxValue = 1000 MinValue = 1 ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 8 Value = 10 end object MosRand: TSpinEdit Left = 219 Top = 156 Width = 32 Height = 22 Hint = 'Random' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MaxValue = 5 MinValue = 0 ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 9 Value = 1 end object GroupBox27: TGroupBox Left = 164 Top = 96 Width = 77 Height = 31 Caption = 'Smooth' 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 end object MosOk: TCheckBox Left = 171 Top = 192 Width = 89 Height = 15 Caption = 'Mosaic On OK' TabOrder = 1 OnClick = MosOkClick end end object TPage Left = 0 Top = 0 Caption = 'Motion' object GroupBox16: TGroupBox Left = 7 Top = 10 Width = 323 Height = 181 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 Motion: TBitBtn Left = 193 Top = 148 Width = 89 Height = 29 Caption = 'Preview' Enabled = False Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 OnClick = MotionClick Style = bsNew end object MotEdit: TSpinEdit Left = 192 Top = 60 Width = 57 Height = 22 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MaxValue = 5000 MinValue = 5 ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 1 Value = 10 end object MotAngleEdit: TSpinEdit Left = 256 Top = 60 Width = 57 Height = 22 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MaxValue = 360 MinValue = 0 ParentFont = False TabOrder = 2 Value = 10 Visible = False end object MotionZoom: TRadioButton Left = 192 Top = 88 Width = 113 Height = 17 Caption = 'Motion Zoom' Checked = True TabOrder = 3 TabStop = True OnClick = Mtr end object MotionRotate: TRadioButton Left = 192 Top = 107 Width = 113 Height = 17 Caption = 'Motion Rotate' TabOrder = 4 OnClick = Mtr end object MotionLine: TRadioButton Left = 192 Top = 128 Width = 113 Height = 17 Caption = 'Motion Line' TabOrder = 5 OnClick = Mtr end object MotionOk: TCheckBox Left = 288 Top = 156 Width = 26 Height = 17 Hint = '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 = 323 Height = 181 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 Noisy: TBitBtn Left = 193 Top = 148 Width = 89 Height = 29 Caption = 'Preview' Enabled = False Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 OnClick = NoisyClick Style = bsNew end object sRed: TSpinEdit Left = 192 Top = 60 Width = 57 Height = 22 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MaxValue = 255 MinValue = 0 ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 1 Value = 20 end object sGreen: TSpinEdit Left = 256 Top = 60 Width = 57 Height = 22 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MaxValue = 255 MinValue = 0 ParentFont = False TabOrder = 2 Value = 20 end object sBlue: TSpinEdit Left = 192 Top = 96 Width = 57 Height = 22 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MaxValue = 255 MinValue = 0 ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 3 Value = 20 end object NoisyOk: TCheckBox Left = 288 Top = 155 Width = 26 Height = 17 Hint = '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 ' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MaxValue = 1 MinValue = 0 ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 5 Value = 0 end object NoisyValue: TSpinEdit Left = 257 Top = 122 Width = 57 Height = 22 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MaxValue = 1 MinValue = 0 ParentFont = False 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 = 323 Height = 181 Caption = 'Oil Paint Image' TabOrder = 0 IsControl = True object Label1: TLabel Left = 219 Top = 72 Width = 45 Height = 13 Caption = 'Value = 0' end object OilPaint: TBitBtn Left = 206 Top = 120 Width = 89 Height = 33 Caption = 'Preview' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 OnClick = OilPaintClick Style = bsNew end object OPbar: TScrollBar Left = 180 Top = 92 Width = 135 Height = 17 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 = 323 Height = 181 Caption = 'Pinch Hole in Image' TabOrder = 0 IsControl = True object Label17: TLabel Left = 219 Top = 72 Width = 45 Height = 13 Caption = 'Value = 0' end object Label19: TLabel Left = 172 Top = 165 Width = 3 Height = 13 end object BitBtn1: TBitBtn Left = 206 Top = 120 Width = 89 Height = 33 Caption = 'Preview' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 OnClick = BitBtn1Click Style = bsNew end object PinchBar: TScrollBar Left = 180 Top = 92 Width = 135 Height = 17 Hint = 'Value' Max = 3 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 = 323 Height = 181 Caption = 'Fill in missing pixels' TabOrder = 0 IsControl = True object Label30: TLabel Left = 219 Top = 72 Width = 45 Height = 13 Caption = 'Value = 0' end object PxelFix: TBitBtn Left = 206 Top = 120 Width = 89 Height = 33 Caption = 'Preview' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 OnClick = PxelFixClick Style = bsNew end object PFix: TScrollBar Left = 180 Top = 92 Width = 135 Height = 17 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 = 'Polar' object GroupBox20: TGroupBox Left = 7 Top = 10 Width = 323 Height = 181 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 PolarBt: TBitBtn Left = 206 Top = 120 Width = 89 Height = 33 Caption = 'Preview' Enabled = False Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 OnClick = PolarBtClick Style = bsNew end object PolBack: TCheckBox Left = 247 Top = 100 Width = 71 Height = 17 Caption = 'Backwards' TabOrder = 1 end object PolInv: TCheckBox Left = 189 Top = 100 Width = 57 Height = 17 Caption = 'Inverse' TabOrder = 2 end object PolValue: TSpinEdit Left = 189 Top = 75 Width = 57 Height = 22 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MaxValue = 0 MinValue = 0 ParentFont = False TabOrder = 3 Value = 100 end object PolAngle: TSpinEdit Left = 259 Top = 75 Width = 57 Height = 22 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MaxValue = 0 MinValue = 0 ParentFont = False TabOrder = 4 Value = 0 end object PolOk: TCheckBox Left = 241 Top = 158 Width = 16 Height = 17 Hint = '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 = 323 Height = 181 Caption = 'Rotate Image' TabOrder = 0 IsControl = True object Rotate: TBitBtn Left = 206 Top = 119 Width = 89 Height = 33 Caption = 'Preview' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 OnClick = RotateClick Style = bsNew end object BackColor: TBitBtn Left = 207 Top = 76 Width = 89 Height = 33 Caption = 'Back Color' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 1 OnClick = BackColorClick Style = bsNew end end object RotEdit: TScrollBar Left = 190 Top = 167 Width = 135 Height = 17 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 = 323 Height = 181 Caption = 'SharpImage' TabOrder = 0 IsControl = True object Label26: TLabel Left = 219 Top = 72 Width = 45 Height = 13 Caption = 'Value = 0' end object Sharp: TBitBtn Left = 206 Top = 120 Width = 89 Height = 33 Caption = 'Preview' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 OnClick = SharpClick Style = bsNew end object SharpBar: TScrollBar Left = 180 Top = 92 Width = 135 Height = 17 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 = 323 Height = 181 Caption = 'Spray Image' TabOrder = 0 IsControl = True object Label37: TLabel Left = 190 Top = 47 Width = 27 Height = 13 Caption = 'Value' end object Label38: TLabel Left = 254 Top = 48 Width = 40 Height = 13 Caption = 'Random' end object SprayVal: TSpinEdit Left = 192 Top = 60 Width = 57 Height = 22 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MaxValue = 1000 MinValue = 0 ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 0 Value = 0 end object SprayRand: TSpinEdit Left = 256 Top = 60 Width = 57 Height = 22 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MaxValue = 360 MinValue = 1 ParentFont = False TabOrder = 1 Value = 1 end object Spray: TBitBtn Left = 206 Top = 120 Width = 89 Height = 33 Caption = 'Preview' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 2 OnClick = SprayClick Style = bsNew end end end object TPage Left = 0 Top = 0 Caption = 'Whirl Pool' object GroupBox11: TGroupBox Left = 7 Top = 10 Width = 323 Height = 181 Caption = 'Whirl Pool Image' TabOrder = 0 IsControl = True object Label10: TLabel Left = 219 Top = 72 Width = 45 Height = 13 Caption = 'Value = 0' end object Whir: TBitBtn Left = 206 Top = 120 Width = 89 Height = 33 Caption = 'Preview' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 OnClick = WhirClick Style = bsNew end object WhirlBar: TScrollBar Left = 180 Top = 92 Width = 135 Height = 17 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 = 323 Height = 181 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 Wave: TBitBtn Left = 193 Top = 148 Width = 89 Height = 29 Caption = 'Preview' Enabled = False Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 OnClick = WaveClick Style = bsNew end object Phase: TSpinEdit Left = 192 Top = 87 Width = 57 Height = 22 Hint = 'How many phases' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MaxValue = 360 MinValue = 0 ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 1 Value = 0 end object WaveL: TSpinEdit Left = 256 Top = 87 Width = 57 Height = 22 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MaxValue = 200 MinValue = 0 ParentFont = False TabOrder = 2 Value = 20 end object Amp: TSpinEdit Left = 192 Top = 123 Width = 57 Height = 22 Hint = 'Value of the amplitute' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MaxValue = 200 MinValue = 0 ParentFont = False 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 = 288 Top = 155 Width = 26 Height = 17 Hint = '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