home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Print Perfect Platinum - Disc 1
/
PPP_D1.iso
/
Ilfilt32.dll
/
RCDATA
/
TEFFECTFORM
/
TEFFECTFORM.txt
Wrap
Text File
|
1998-03-12
|
115KB
|
4,233 lines
object EffectForm: TEffectForm
Left = 182
Top = 158
Width = 609
Height = 326
BorderStyle = bsSizeToolWin
Caption = 'Filters and Effects'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Menu = MainMenu1
OnClose = FormClose
OnCreate = FormCreate
OnDestroy = FormDestroy
OnResize = FormResize
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Panel1: TPanel
Left = 0
Top = 0
Width = 601
Height = 279
Align = alClient
TabOrder = 0
object Panel2: TPanel
Left = 1
Top = 1
Width = 599
Height = 27
Align = alTop
BevelOuter = bvNone
TabOrder = 0
object HSRubberband: TSpeedButton
Left = 2
Top = 1
Width = 103
Height = 25
Hint = 'Hide/Show Rubberband'
AllowAllUp = True
GroupIndex = 1
Caption = 'Hide Selection'
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000010000000000000000000
BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777077777777
0777777077777777077777707777777707770000000000000000777077777777
0777777077777777077777707777777707777770777777770777777077777777
0777777077777777077777707777777707770000000000000000777077777777
0777777077777777077777707777777707777770777777770777}
ParentShowHint = False
ShowHint = True
OnClick = HSRubberbandClick
end
object ResetRubberbandBtn: TSpeedButton
Left = 104
Top = 1
Width = 106
Height = 25
Hint = 'Reset RubberBand to full image'
Caption = 'Reset Selection'
Glyph.Data = {
90020000424D9002000000000000760000002800000040000000100000000100
0400000000000002000000000000000000000000000000000000000000000000
BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00331111133333
333333FFFFF33333333333222223332222233333333333444443333199933333
333333388883333333333332AAA333AAA2333333333333CCC433333199933333
1133333888833333FF333332AAA333AAA2333334433333CCC433339919933333
99133388F883333388F333AA2AA333AA2A2333CC433333CC4C43339133933333
3913338F33833333388F33A233A333A33A2333C4333333C33CC4391333333333
339138F333333333338F3A233333333333A23C433333333333C4391333333333
339138F333333333338F3A233333333333A23C433333333333C4391333333333
339138F333333333338F3A233333333333A23C433333333333C4391333333333
339138F333333333338F3A233333333333A23C433333333333C4391333333333
339138F333333333338F3A233333333333A23C433333333333C4339133333333
3991338F33333333388F33A2333333333AA233C4333333333CC4339913333333
99133388F333333388F333AA23333333AA2333CC43333333CC43333991333339
913333388F3333388F33333AA233333AA233333CC433333CC433333399111119
1333333388FFFFF8F3333333AA22222A23333333CC44444C4333333333999993
33333333338888833333333333AAAAA33333333333CCCCC33333333333333333
3333333333333333333333333333333333333333333333333333000000000000
0000000000000000000000000000000000000000}
NumGlyphs = 4
ParentShowHint = False
ShowHint = True
OnClick = ResetRubberbandBtnClick
end
object ReloadimageBtn: TSpeedButton
Left = 209
Top = 1
Width = 66
Height = 25
Hint = 'Reload image'
Caption = 'Reload'
Enabled = False
Glyph.Data = {
06010000424D06010000000000007600000028000000140000000C0000000100
0400000000009000000000000000000000000000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00CCCCCCCCCCCC
CCCCCCCC0000CCCCCC70000007CCCCCC0000CCCCC7788887707CCCCC0000CCCC
C0F88777770CCCCC0000CCCCC7700000077CCCCC0000CCCCC7788887707CCCCC
0000CCCCC0F88777770CCCCC0000CCCCC7700000077CCCCC0000CCCCC7788888
807CCCCC0000CCCCC0F88888880CCCCC0000CCCCC78FFFFF877CCCCC0000CCCC
CC77000077CCCCCC0000}
ParentShowHint = False
ShowHint = True
OnClick = ReloadimageBtnClick
end
object PreviewBtn: TSpeedButton
Left = 274
Top = 1
Width = 68
Height = 25
Hint = 'Preview this effect before applying it'
Caption = 'Preview'
Glyph.Data = {
68010000424D6801000000000000760000002800000012000000120000000100
040000000000D800000000000000000000000000000000000000000000000000
BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDD88880
DDDDDD000000DDDDDD8000008DDDDD000000DDDDDD00FF770DDDDD000000DDDD
DD8000000DDDDD000000DDDDDD00FF770DDDDD000000DDDDDD8000000DDDDD00
0000DDDDDD0F878F0DDDDD000000DDDDDD8B878BF0DDDD000000DDDDD0FF878F
F8DDDD000000DDDD8BFB878BFB8DDD000000DDD8BFF87778FFB8DD000000DDD8
FBF87778FBF8DD000000DDD8BF0800080FB8DD000000DDD8FBF8FBF8FBF8DD00
0000DDDD8FFFFFFFFF8DDD000000DDDDD8FBFBFBF8DDDD000000DDDDDD88BFB8
8DDDDD000000DDDDDDDD888DDDDDDD0000000000000000000000000000000000
000000000000000000000000}
ParentShowHint = False
ShowHint = True
OnClick = DoEffect
end
object ApplyBtn: TSpeedButton
Left = 341
Top = 1
Width = 59
Height = 25
Hint = 'Apply this effect to the master image'
Caption = 'Apply'
Glyph.Data = {
4E010000424D4E01000000000000760000002800000012000000120000000100
040000000000D800000000000000000000001000000010000000000000000000
BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
DDDDDD000000DDDDDDDDDDDDDDDDDD000000DDDDDDDDDDDDDDDDDD000000DDD0
0000000000000D000000DDD08888888888880D000000DDD0F770007777780D00
0000DDD0F777077777780D000000DDD08B78087777780D000000DBD08B007000
00780D000000D8B88B78B77777780D000000DD8B8B8BFFFFFFF80D000000DBB8
BBB0000000000D000000DD88BBBDDDDDDDDDDD000000DD8B8B8BDDDDDDDDDD00
0000D8BD8BDDDDDDDDDDDD000000DBDD8BDD8BDDDDDDDD000000DDDD8BDDDDDD
DDDDDD000000DDDDDDDDDDDDDDDDDD000000}
ParentShowHint = False
ShowHint = True
OnClick = DoEffect
end
object StopProcessBtn: TSpeedButton
Left = 399
Top = 1
Width = 59
Height = 25
Hint = 'Stop Processing the image'
Caption = 'Stop'
Enabled = False
Glyph.Data = {
80010000424D8001000000000000760000002800000014000000140000000100
040000000000F000000000000000000000000000000000000000000000000000
BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
7777777700007777711111111177777700007777199999999917777700007771
9999999999917777000077199999999999991777000071999999999999999177
000019999999999999999917000019FFF99F99FFF9F9991700001999F99F99F9
F9F99917000019FFF99F99F9F9FFF917000019F9999F99F9F9F9F917000019FF
F9FFF9FFF9FFF917000019999999999999999917000019999999999999999917
0000719999999999999991770000771999999999999917770000777199999999
9991777700007777199999999917777700007777711111111177777700007777
7777777777777777000000000000000000000000000000000000000000000000
00000000}
ParentShowHint = False
ShowHint = True
OnClick = StopProcessBtnClick
end
object exBtn: TSpeedButton
Left = 457
Top = 1
Width = 111
Height = 25
Hint = 'Close and apply all to main image'
AllowAllUp = True
GroupIndex = 10
Caption = 'Close and Save'
Glyph.Data = {
06020000424D0602000000000000760000002800000028000000140000000100
0400000000009001000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333333333333333333333333333333333333333333333
33333333388888888883333333333FFFFFFFFFF3333333330000000000833333
33338888888888F3333333330FFFFFFFF083333333338F33333F38F333333333
0FFFF00FF083333333338F33388FF8F3333333330FFF0000F083333333338F33
8888F8F3333333330FF80000F083333333338F338888F8F3333333330F800000
0083333333338F38888888F3333333330F000F000083333333338F88838888F3
333333330F00FFF00083333333338F88333888F3333333330FFFFF0000833333
33338F33338888FF333333330FFFFF0F0003333333338F33338F888F33333333
0FFFFF003008333333338FFFFF88388F33333333000000033800333333338888
88833388F333333333333333330083333333333333333388FF33333333333333
3330033333333333333333388F33333333333333333303333333333333333333
8333333333333333333333333333333333333333333333333333333333333333
33333333333333333333}
NumGlyphs = 2
OnClick = exBtnClick
end
object CloseNadNotSaveBtn: TSpeedButton
Left = 567
Top = 1
Width = 31
Height = 25
Hint = 'Close and do not save'
AllowAllUp = True
GroupIndex = 10
Glyph.Data = {
42010000424D4201000000000000760000002800000011000000110000000100
040000000000CC00000000000000000000001000000010000000000000000000
BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
777770000000777777777777777770000000777777777777770F700000007777
0F777777777770000000777000F7777770F770000000777000F777770F777000
00007777000F77700F777000000077777000F700F7777000000077777700000F
7777700000007777777000F777777000000077777700000F7777700000007777
7000F70F7777700000007770000F77700F7770000000770000F7777700F77000
00007700F7777777700F70000000777777777777777770000000777777777777
777770000000}
ParentShowHint = False
ShowHint = True
OnClick = CloseNadNotSaveBtnClick
end
end
object ilStatus: TStatusBar
Left = 1
Top = 259
Width = 599
Height = 19
Panels = <
item
Text = 'Status:'
Width = 45
end
item
Width = 300
end
item
Text = 'Progress'
Width = 50
end>
SimplePanel = False
end
object IlPages: TPageControl
Left = 253
Top = 28
Width = 347
Height = 231
ActivePage = TabSheet18
Align = alRight
ParentShowHint = False
ShowHint = True
TabOrder = 2
OnChange = IlPagesChange
object TabSheet1: TTabSheet
Caption = 'AutoContrast'
object Label2: TLabel
Left = 0
Top = 176
Width = 225
Height = 13
Caption = 'Select an area and click apply or preview'
end
end
object TabSheet2: TTabSheet
Caption = 'Bleed'
object Label34: TLabel
Left = 34
Top = 75
Width = 27
Height = 13
Caption = 'Value'
end
object BleedBar: TTrackBar
Left = 80
Top = 74
Width = 150
Height = 22
Max = 255
Min = -255
Orientation = trHorizontal
Frequency = 1
Position = 0
SelEnd = 0
SelStart = 0
TabOrder = 0
TickMarks = tmBoth
TickStyle = tsNone
OnChange = BleedBarChange
end
object BleedEdit: TEdit
Left = 232
Top = 72
Width = 41
Height = 21
MaxLength = 4
TabOrder = 1
Text = '0'
OnChange = BleedEditChange
OnKeyPress = EditKeyPress
end
end
object TabSheet3: TTabSheet
Caption = 'Borders'
object Label44: TLabel
Left = 33
Top = 12
Width = 25
Height = 13
Caption = 'Edge'
end
object Label43: TLabel
Left = 26
Top = 124
Width = 31
Height = 13
Caption = 'Shape'
end
object labAngle: TLabel
Left = 31
Top = 92
Width = 27
Height = 13
Caption = 'Angle'
Visible = False
end
object labVectors: TLabel
Left = 22
Top = 40
Width = 36
Height = 13
Caption = 'Vectors'
Visible = False
end
object lavVecSize: TLabel
Left = 16
Top = 67
Width = 42
Height = 13
Caption = 'Vec Size'
Visible = False
end
object brWindowColor: TCheckBox
Left = 33
Top = 159
Width = 172
Height = 17
Caption = 'Use the color of this window or '
ParentShowHint = False
ShowHint = True
State = cbChecked
TabOrder = 9
OnClick = brWindowColorClick
end
object brShapeCombo: TComboBox
Left = 78
Top = 121
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 = 8
OnChange = brShapeComboChange
end
object brEdgeBar: TTrackBar
Left = 75
Top = 11
Width = 150
Height = 22
Max = 100
Min = 1
Orientation = trHorizontal
Frequency = 1
Position = 1
SelEnd = 0
SelStart = 0
TabOrder = 0
TickMarks = tmBoth
TickStyle = tsNone
OnChange = brEdgeBarChange
end
object brAngleBar: TTrackBar
Left = 75
Top = 90
Width = 150
Height = 22
Max = 360
Orientation = trHorizontal
Frequency = 1
Position = 90
SelEnd = 0
SelStart = 0
TabOrder = 6
TickMarks = tmBoth
TickStyle = tsNone
Visible = False
OnChange = brAngleBarChange
end
object brVectorsBar: TTrackBar
Left = 75
Top = 38
Width = 150
Height = 22
Max = 100
Min = 1
Orientation = trHorizontal
Frequency = 1
Position = 10
SelEnd = 0
SelStart = 0
TabOrder = 2
TickMarks = tmBoth
TickStyle = tsNone
Visible = False
OnChange = brVectorsBarChange
end
object brVectorSizeBar: TTrackBar
Left = 75
Top = 65
Width = 150
Height = 22
Max = 100
Orientation = trHorizontal
Frequency = 1
Position = 50
SelEnd = 0
SelStart = 0
TabOrder = 4
TickMarks = tmBoth
TickStyle = tsNone
Visible = False
OnChange = brVectorSizeBarChange
end
object brVectorSizeEdit: TEdit
Left = 235
Top = 62
Width = 41
Height = 21
MaxLength = 4
TabOrder = 5
Text = '50'
Visible = False
OnChange = brVectorSizeEditChange
OnKeyPress = EditKeyPress
end
object brVectorsEdit: TEdit
Left = 235
Top = 35
Width = 41
Height = 21
MaxLength = 4
TabOrder = 3
Text = '10'
Visible = False
OnChange = brVectorsEditChange
OnKeyPress = EditKeyPress
end
object brAngleEdit: TEdit
Left = 235
Top = 88
Width = 41
Height = 21
MaxLength = 4
TabOrder = 7
Text = '90'
Visible = False
OnChange = brAngleEditChange
OnKeyPress = EditKeyPress
end
object brEdgeEdit: TEdit
Left = 235
Top = 9
Width = 41
Height = 21
MaxLength = 4
TabOrder = 1
Text = '0'
OnChange = brEdgeEditChange
OnKeyPress = EditKeyPress
end
object brMaskColorBtn: TBitBtn
Left = 203
Top = 151
Width = 111
Height = 30
Caption = 'use mask color'
Enabled = False
ParentShowHint = False
ShowHint = True
TabOrder = 11
OnClick = brMaskColorBtnClick
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000010000000000000000000
BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
DDDDDDDDDDDDDDDDDDDDDDD00DDDDDDDDDDDDDD0000DDDDDDDDDDDDD0000DDDD
DDDDDDDD00070DDDDDDDDDDDD07770DDDDDDDDDDDD07770D0DDDD0000DD07770
0DDDD000DDDD07000DDDD000DDDDD00000DDD0D00DDD0000000DDDDD00DDDDD0
000DDDDDD0DDDDDD000DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD}
end
object Panel10: TPanel
Left = 313
Top = 151
Width = 18
Height = 30
TabOrder = 10
end
end
object TabSheet4: TTabSheet
Caption = 'Border Fade'
object Label3: TLabel
Left = 49
Top = 68
Width = 25
Height = 13
Caption = 'Edge'
end
object bfEdgeBar: TTrackBar
Left = 91
Top = 67
Width = 150
Height = 22
Max = 1000
Min = 1
Orientation = trHorizontal
Frequency = 1
Position = 1
SelEnd = 0
SelStart = 0
TabOrder = 0
TickMarks = tmBoth
TickStyle = tsNone
OnChange = bfEdgeBarChange
end
object bfEdgeEdit: TEdit
Left = 251
Top = 65
Width = 41
Height = 21
MaxLength = 4
TabOrder = 1
Text = '0'
OnChange = bfEdgeEditChange
OnKeyPress = EditKeyPress
end
object bfWindoColor: TCheckBox
Left = 28
Top = 159
Width = 172
Height = 17
Caption = 'Use the color of this window or '
ParentShowHint = False
ShowHint = True
State = cbChecked
TabOrder = 2
OnClick = bfWindoColorClick
end
object bfEdgeWColBtn: TBitBtn
Left = 199
Top = 151
Width = 115
Height = 30
Caption = 'use custom color'
Enabled = False
ParentShowHint = False
ShowHint = True
TabOrder = 3
OnClick = BackColorClick
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000010000000000000000000
BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
DDDDDDDDDDDDDDDDDDDDDDD00DDDDDDDDDDDDDD0000DDDDDDDDDDDDD0000DDDD
DDDDDDDD00070DDDDDDDDDDDD07770DDDDDDDDDDDD07770D0DDDD0000DD07770
0DDDD000DDDD07000DDDD000DDDDD00000DDD0D00DDD0000000DDDDD00DDDDD0
000DDDDDD0DDDDDD000DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD}
end
object Panel9: TPanel
Left = 313
Top = 151
Width = 18
Height = 30
TabOrder = 4
end
end
object TabSheet5: TTabSheet
Caption = 'Blur'
object Label32: TLabel
Left = 34
Top = 66
Width = 27
Height = 13
Caption = 'Value'
end
object BlurBar: TTrackBar
Left = 72
Top = 66
Width = 150
Height = 22
Max = 100
Min = 1
Orientation = trHorizontal
Frequency = 1
Position = 1
SelEnd = 0
SelStart = 0
TabOrder = 0
TickMarks = tmBoth
TickStyle = tsNone
OnChange = BlurBarChange
end
object BlurEdit: TEdit
Left = 224
Top = 64
Width = 41
Height = 21
MaxLength = 4
TabOrder = 1
Text = '1'
OnChange = BlurEditChange
OnKeyPress = EditKeyPress
end
end
object TabSheet6: TTabSheet
Caption = 'Bright'
object Label30: TLabel
Left = 34
Top = 67
Width = 27
Height = 13
Caption = 'Value'
end
object BrightBar: TTrackBar
Left = 80
Top = 66
Width = 150
Height = 22
Max = 255
Orientation = trHorizontal
Frequency = 1
Position = 0
SelEnd = 0
SelStart = 0
TabOrder = 0
TickMarks = tmBoth
TickStyle = tsNone
OnChange = BrightBarChange
end
object BrightEdit: TEdit
Left = 232
Top = 64
Width = 41
Height = 21
MaxLength = 4
TabOrder = 1
Text = '0'
OnChange = BrightEditChange
OnKeyPress = EditKeyPress
end
end
object TabSheet7: TTabSheet
Caption = 'Color'
object Label54: TLabel
Left = 68
Top = 154
Width = 169
Height = 13
Caption = 'Current displayed image has colors'
end
object Panel14: TPanel
Left = 5
Top = 6
Width = 329
Height = 87
TabOrder = 0
object Label5: TLabel
Left = 6
Top = 20
Width = 80
Height = 13
Caption = 'Number of colors'
end
object Label53: TLabel
Left = 16
Top = 48
Width = 70
Height = 26
Alignment = taRightJustify
Caption = 'Color dithering method'
WordWrap = True
end
object crColorsBar: TTrackBar
Left = 104
Top = 18
Width = 150
Height = 22
Max = 255
Min = 1
Orientation = trHorizontal
Frequency = 1
Position = 255
SelEnd = 0
SelStart = 0
TabOrder = 0
TickMarks = tmBoth
TickStyle = tsNone
OnChange = crColorsBarChange
end
object crColorsEdit: TEdit
Left = 256
Top = 16
Width = 41
Height = 21
MaxLength = 4
TabOrder = 1
Text = '255'
OnChange = crColorsEditChange
OnKeyPress = EditKeyPress
end
object R1: TRadioButton
Left = 101
Top = 46
Width = 76
Height = 17
Hint = 'Dither Method'
Caption = 'Bayer'
Checked = True
ParentShowHint = False
ShowHint = True
TabOrder = 2
TabStop = True
end
object R2: TRadioButton
Left = 178
Top = 44
Width = 76
Height = 17
Hint = 'Dither Method'
Caption = 'Burkes'
ParentShowHint = False
ShowHint = True
TabOrder = 3
end
object R3: TRadioButton
Left = 101
Top = 62
Width = 76
Height = 17
Hint = 'Dither Method'
Caption = 'Floyed'
ParentShowHint = False
ShowHint = True
TabOrder = 4
end
object R4: TRadioButton
Left = 178
Top = 60
Width = 94
Height = 17
Hint = 'Dither Method'
Caption = 'GrayScale'
ParentShowHint = False
ShowHint = True
TabOrder = 5
end
end
object Panel15: TPanel
Left = 5
Top = 93
Width = 329
Height = 44
TabOrder = 1
object MillionColors: TCheckBox
Left = 116
Top = 13
Width = 109
Height = 17
Caption = '16 Million Colors'
TabOrder = 0
OnClick = MillionColorsClick
end
end
end
object TabSheet29: TTabSheet
Caption = 'Color Palette'
object GroupBox3: TGroupBox
Left = 20
Top = 0
Width = 296
Height = 203
Caption = 'Palette Info'
TabOrder = 0
object lblRed: TLabel
Left = 8
Top = 15
Width = 6
Height = 13
Caption = '0'
ParentShowHint = False
ShowHint = True
end
object lblGreen: TLabel
Left = 8
Top = 49
Width = 6
Height = 13
Caption = '0'
ParentShowHint = False
ShowHint = True
end
object lblBlue: TLabel
Left = 8
Top = 82
Width = 6
Height = 13
Caption = '0'
ParentShowHint = False
ShowHint = True
end
object lblPalText: TLabel
Left = 8
Top = 135
Width = 3
Height = 13
ParentShowHint = False
ShowHint = True
end
object PalOpt: TSpeedButton
Left = 249
Top = 167
Width = 42
Height = 21
Caption = 'Apply'
OnClick = PalOptClick
end
object Panel17: TPanel
Left = 126
Top = 7
Width = 167
Height = 149
Enabled = False
Caption = 'Panel17'
Color = clBlack
TabOrder = 4
OnMouseDown = Panel17MouseDown
object pbPalette: TPaintBox
Left = 1
Top = 1
Width = 165
Height = 147
Hint = 'Click me to select'
Align = alClient
Color = clBlack
Enabled = False
ParentColor = False
ParentShowHint = False
ShowHint = True
OnMouseDown = pbPaletteMouseDown
OnPaint = pbPalettePaint
end
object Label64: TLabel
Left = 8
Top = 30
Width = 155
Height = 116
Alignment = taCenter
AutoSize = False
Caption =
'This image doesn'#39't have a color palette. Decrease the number of' +
' colors to 256 or less by clicking on the color tab.'
Color = clWhite
Enabled = False
Font.Color = clWhite
Font.Height = -16
Font.Name = 'Arial'
Font.Style = []
ParentColor = False
ParentFont = False
Transparent = True
Visible = False
WordWrap = True
end
end
object pnlColor: TPanel
Left = 48
Top = 113
Width = 20
Height = 17
Hint = 'Click Me to apply to palette'
Enabled = False
ParentShowHint = False
ShowHint = True
TabOrder = 0
OnClick = pnlColorClick
end
object trbRed: TTrackBar
Left = 2
Top = 26
Width = 107
Height = 19
Hint = 'Set the red component of the color'
Enabled = False
Max = 255
Orientation = trHorizontal
ParentShowHint = False
PageSize = 5
Frequency = 1
Position = 0
SelEnd = 0
SelStart = 0
ShowHint = True
TabOrder = 1
TabStop = False
TickMarks = tmBottomRight
TickStyle = tsNone
OnChange = TrackBarChange
end
object trbGreen: TTrackBar
Left = 2
Top = 60
Width = 107
Height = 19
Hint = 'Set the green component of the color'
Enabled = False
Max = 255
Orientation = trHorizontal
ParentShowHint = False
PageSize = 5
Frequency = 1
Position = 0
SelEnd = 0
SelStart = 0
ShowHint = True
TabOrder = 2
TabStop = False
TickMarks = tmBottomRight
TickStyle = tsNone
OnChange = TrackBarChange
end
object trbBlue: TTrackBar
Left = 2
Top = 94
Width = 107
Height = 19
Hint = 'Set the blue component of the color'
Enabled = False
Max = 255
Orientation = trHorizontal
ParentShowHint = False
PageSize = 5
Frequency = 1
Position = 0
SelEnd = 0
SelStart = 0
ShowHint = True
TabOrder = 3
TabStop = False
TickMarks = tmBottomRight
TickStyle = tsNone
OnChange = TrackBarChange
end
object PalCombo: TComboBox
Left = 7
Top = 167
Width = 241
Height = 21
ItemHeight = 13
Items.Strings = (
'Create GrayScale Palette and Optimize Image'
'Load Palette from File and Optimize Image'
'Load Palette from File and Apply'
'Save Palette to File')
TabOrder = 5
Text = 'Create GrayScale Palette and Optimize Image'
end
end
end
object TabSheet18: TTabSheet
Caption = 'Dark'
object Label51: TLabel
Left = 34
Top = 67
Width = 27
Height = 13
Caption = 'Value'
end
object DarkBar: TTrackBar
Left = 80
Top = 66
Width = 150
Height = 22
Max = 255
Orientation = trHorizontal
Frequency = 1
Position = 0
SelEnd = 0
SelStart = 0
TabOrder = 0
TickMarks = tmBoth
TickStyle = tsNone
OnChange = DarkBarChange
end
object DarkEdit: TEdit
Left = 232
Top = 64
Width = 41
Height = 21
MaxLength = 4
TabOrder = 1
Text = '0'
OnChange = DarkEditChange
OnKeyPress = EditKeyPress
end
end
object TabSheet28: TTabSheet
Caption = 'Despeckle'
object Label27: TLabel
Left = 34
Top = 67
Width = 27
Height = 13
Caption = 'Value'
end
object dsValueBar: TTrackBar
Left = 80
Top = 66
Width = 150
Height = 22
Max = 100
Orientation = trHorizontal
Frequency = 1
Position = 0
SelEnd = 0
SelStart = 0
TabOrder = 0
TickMarks = tmBoth
TickStyle = tsNone
OnChange = dsValueBarChange
end
object dsValueEdit: TEdit
Left = 232
Top = 64
Width = 41
Height = 21
MaxLength = 4
TabOrder = 1
Text = '0'
OnChange = dsValueEditChange
OnKeyPress = EditKeyPress
end
end
object TabSheet9: TTabSheet
Caption = 'Edge Detection'
object Label26: TLabel
Left = 34
Top = 67
Width = 27
Height = 13
Caption = 'Value'
end
object EdgeBar: TTrackBar
Left = 76
Top = 66
Width = 150
Height = 22
Max = 100
Min = 1
Orientation = trHorizontal
Frequency = 1
Position = 1
SelEnd = 0
SelStart = 0
TabOrder = 0
TickMarks = tmBoth
TickStyle = tsNone
OnChange = EdgeBarChange
end
object EdgeEdit: TEdit
Left = 228
Top = 64
Width = 41
Height = 21
MaxLength = 4
TabOrder = 1
Text = '1'
OnChange = EdgeEditChange
OnKeyPress = EditKeyPress
end
end
object TabSheet10: TTabSheet
Caption = 'Engrave'
object Label19: TLabel
Left = 34
Top = 67
Width = 27
Height = 13
Caption = 'Value'
end
object EnGraveBar: TTrackBar
Left = 80
Top = 66
Width = 150
Height = 22
Min = 1
Orientation = trHorizontal
Frequency = 1
Position = 1
SelEnd = 0
SelStart = 0
TabOrder = 0
TickMarks = tmBoth
TickStyle = tsNone
OnChange = EnGraveBarChange
end
object EnhanceEdit: TEdit
Left = 232
Top = 64
Width = 41
Height = 21
MaxLength = 4
TabOrder = 1
Text = '1'
OnChange = EnhanceEditChange
OnKeyPress = EditKeyPress
end
end
object TabSheet11: TTabSheet
Caption = 'Enhance'
object Label18: TLabel
Left = 14
Top = 22
Width = 59
Height = 13
Caption = 'Gamma Red'
end
object Label20: TLabel
Left = 5
Top = 53
Width = 68
Height = 13
Caption = 'Gamma Green'
end
object Label21: TLabel
Left = 13
Top = 84
Width = 60
Height = 13
Caption = 'Gamma Blue'
end
object Label22: TLabel
Left = 46
Top = 146
Width = 27
Height = 13
Caption = 'Brigth'
end
object Label23: TLabel
Left = 34
Top = 115
Width = 39
Height = 13
Hint = 'gauss or uniform'
Caption = 'Contrast'
end
object enGammaRedBar: TTrackBar
Left = 88
Top = 20
Width = 150
Height = 22
Max = 255
Min = 1
Orientation = trHorizontal
Frequency = 1
Position = 10
SelEnd = 0
SelStart = 0
TabOrder = 0
TickMarks = tmBoth
TickStyle = tsNone
OnChange = enGammaRedBarChange
end
object enGammaRedEdit: TEdit
Left = 248
Top = 19
Width = 41
Height = 21
MaxLength = 4
TabOrder = 1
Text = '10'
OnChange = enGammaRedEditChange
OnKeyPress = EditKeyPress
end
object enGammaGreenBar: TTrackBar
Left = 88
Top = 50
Width = 150
Height = 22
Max = 255
Min = 1
Orientation = trHorizontal
Frequency = 1
Position = 10
SelEnd = 0
SelStart = 0
TabOrder = 2
TickMarks = tmBoth
TickStyle = tsNone
OnChange = enGammaGreenBarChange
end
object enGammaGreenEdit: TEdit
Left = 248
Top = 49
Width = 41
Height = 21
MaxLength = 4
TabOrder = 3
Text = '10'
OnChange = enGammaGreenEditChange
OnKeyPress = EditKeyPress
end
object enGammaBlueBar: TTrackBar
Left = 88
Top = 81
Width = 150
Height = 22
Max = 255
Min = 1
Orientation = trHorizontal
Frequency = 1
Position = 10
SelEnd = 0
SelStart = 0
TabOrder = 4
TickMarks = tmBoth
TickStyle = tsNone
OnChange = enGammaBlueBarChange
end
object enGammaBlueEdit: TEdit
Left = 248
Top = 80
Width = 41
Height = 21
MaxLength = 4
TabOrder = 5
Text = '10'
OnChange = enGammaBlueEditChange
OnKeyPress = EditKeyPress
end
object enContrastBar: TTrackBar
Left = 88
Top = 112
Width = 150
Height = 22
Max = 255
Min = -255
Orientation = trHorizontal
Frequency = 1
Position = 0
SelEnd = 0
SelStart = 0
TabOrder = 6
TickMarks = tmBoth
TickStyle = tsNone
OnChange = enContrastBarChange
end
object enContrastEdit: TEdit
Left = 248
Top = 111
Width = 41
Height = 21
MaxLength = 4
TabOrder = 7
Text = '0'
OnChange = enContrastEditChange
OnKeyPress = EditKeyPress
end
object enBrightEdit: TEdit
Left = 248
Top = 141
Width = 41
Height = 21
MaxLength = 4
TabOrder = 9
Text = '0'
OnChange = enBrightEditChange
OnKeyPress = EditKeyPress
end
object enBrightBar: TTrackBar
Left = 88
Top = 142
Width = 150
Height = 22
Max = 255
Min = -255
Orientation = trHorizontal
Frequency = 1
Position = 0
SelEnd = 0
SelStart = 0
TabOrder = 8
TickMarks = tmBoth
TickStyle = tsNone
OnChange = enBrightBarChange
end
end
object Extrude: TTabSheet
Caption = 'Extrude'
object Label17: TLabel
Left = 34
Top = 67
Width = 27
Height = 13
Caption = 'Value'
end
object Levels: TCheckBox
Left = 136
Top = 95
Width = 52
Height = 17
Caption = 'Levels'
ParentShowHint = False
ShowHint = True
State = cbChecked
TabOrder = 0
end
object exValueBar: TTrackBar
Left = 76
Top = 66
Width = 150
Height = 22
Max = 50
Min = 1
Orientation = trHorizontal
Frequency = 1
Position = 1
SelEnd = 0
SelStart = 0
TabOrder = 1
TickMarks = tmBoth
TickStyle = tsNone
OnChange = exValueBarChange
end
object exValueEdit: TEdit
Left = 228
Top = 64
Width = 41
Height = 21
MaxLength = 4
TabOrder = 2
Text = '1'
OnChange = exValueEditChange
OnKeyPress = EditKeyPress
end
end
object TabSheet13: TTabSheet
Caption = 'Gamma'
object Label12: TLabel
Left = 34
Top = 75
Width = 27
Height = 13
Caption = 'Value'
end
object GammaBar: TTrackBar
Left = 80
Top = 74
Width = 150
Height = 22
Max = 50
Min = 10
Orientation = trHorizontal
Frequency = 1
Position = 10
SelEnd = 0
SelStart = 0
TabOrder = 0
TickMarks = tmBoth
TickStyle = tsNone
OnChange = GammaBarChange
end
object GammaEdit: TEdit
Left = 232
Top = 72
Width = 41
Height = 21
MaxLength = 4
TabOrder = 1
Text = '10'
OnChange = GammaEditChange
OnKeyPress = EditKeyPress
end
end
object TabSheet12: TTabSheet
Caption = 'Gray Area'
object Label6: TLabel
Left = 0
Top = 176
Width = 273
Height = 13
Caption = 'Select an area and click apply or preview'
end
end
object TabSheet14: TTabSheet
Caption = 'HalfTone'
object Label41: TLabel
Left = 26
Top = 43
Width = 27
Height = 13
Caption = 'Angle'
end
object Label40: TLabel
Left = 12
Top = 68
Width = 41
Height = 13
Caption = 'Cell_size'
end
object htAngleBar: TTrackBar
Left = 88
Top = 39
Width = 150
Height = 22
Max = 1800
Orientation = trHorizontal
Frequency = 1
Position = 450
SelEnd = 0
SelStart = 0
TabOrder = 0
TickMarks = tmBoth
TickStyle = tsNone
OnChange = htAngleBarChange
end
object htCellSizeBar: TTrackBar
Left = 88
Top = 69
Width = 150
Height = 22
Max = 100
Min = 1
Orientation = trHorizontal
Frequency = 1
Position = 4
SelEnd = 0
SelStart = 0
TabOrder = 2
TickMarks = tmBoth
TickStyle = tsNone
OnChange = htCellSizeBarChange
end
object htAngleEdit: TEdit
Left = 248
Top = 38
Width = 41
Height = 21
MaxLength = 8
TabOrder = 1
Text = '45.00'
OnChange = htAngleEditChange
OnKeyPress = RealEditKeyPress
end
object htCellSizeEdit: TEdit
Left = 248
Top = 68
Width = 41
Height = 21
MaxLength = 4
TabOrder = 3
Text = '4'
OnChange = htCellSizeEditChange
OnKeyPress = EditKeyPress
end
object GroupBox33: TGroupBox
Left = 65
Top = 104
Width = 209
Height = 50
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 = 139
Top = 12
Width = 58
Height = 17
Caption = 'Sqaure'
TabOrder = 2
end
object Rdiamond: TRadioButton
Left = 8
Top = 13
Width = 66
Height = 17
Caption = 'Diamond'
TabOrder = 3
end
object Rline: TRadioButton
Left = 8
Top = 28
Width = 66
Height = 16
Caption = 'Line'
TabOrder = 4
end
object Rcross: TRadioButton
Left = 140
Top = 28
Width = 66
Height = 17
Caption = 'Cross'
Checked = True
TabOrder = 5
TabStop = True
end
end
end
object TabSheet15: TTabSheet
Caption = 'Hue and Saturation'
object Label70: TLabel
Left = 42
Top = 20
Width = 20
Height = 13
Caption = 'Hue'
end
object Label72: TLabel
Left = 14
Top = 49
Width = 48
Height = 13
Caption = 'Saturation'
end
object Label73: TLabel
Left = 35
Top = 78
Width = 27
Height = 13
Caption = 'Bright'
end
object hsHueBar: TTrackBar
Left = 88
Top = 20
Width = 150
Height = 22
Max = 360
Orientation = trHorizontal
Frequency = 1
Position = 180
SelEnd = 0
SelStart = 0
TabOrder = 0
TickMarks = tmBoth
TickStyle = tsNone
OnChange = hsHueBarChange
end
object hsSatBar: TTrackBar
Left = 88
Top = 50
Width = 150
Height = 22
Max = 200
Orientation = trHorizontal
Frequency = 1
Position = 100
SelEnd = 0
SelStart = 0
TabOrder = 1
TickMarks = tmBoth
TickStyle = tsNone
OnChange = hsSatBarChange
end
object hsHueEdit: TEdit
Left = 248
Top = 19
Width = 41
Height = 21
MaxLength = 4
TabOrder = 2
Text = '180'
OnChange = hsHueEditChange
OnKeyPress = EditKeyPress
end
object hsSatEdit: TEdit
Left = 248
Top = 49
Width = 41
Height = 21
MaxLength = 4
TabOrder = 3
Text = '100'
OnChange = hsSatEditChange
OnKeyPress = EditKeyPress
end
object hsBrightBar: TTrackBar
Left = 88
Top = 78
Width = 150
Height = 22
Max = 200
Orientation = trHorizontal
Frequency = 1
Position = 100
SelEnd = 0
SelStart = 0
TabOrder = 4
TickMarks = tmBoth
TickStyle = tsNone
OnChange = hsBrightBarChange
end
object hsBrightEdit: TEdit
Left = 248
Top = 77
Width = 41
Height = 21
MaxLength = 4
TabOrder = 5
Text = '100'
OnChange = hsBrightEditChange
OnKeyPress = EditKeyPress
end
object a3col: TRadioButton
Left = 77
Top = 115
Width = 64
Height = 17
Caption = 'All Colors'
Checked = True
TabOrder = 6
TabStop = True
OnClick = hsChannels
end
object rRed: TRadioButton
Left = 157
Top = 116
Width = 47
Height = 17
Caption = 'Red'
TabOrder = 7
OnClick = hsChannels
end
object rGreen: TRadioButton
Left = 157
Top = 138
Width = 54
Height = 17
Caption = 'Green'
TabOrder = 8
OnClick = hsChannels
end
object rBlue: TRadioButton
Left = 157
Top = 160
Width = 47
Height = 17
Caption = 'Blue'
TabOrder = 9
OnClick = hsChannels
end
object rYEL: TRadioButton
Left = 216
Top = 115
Width = 54
Height = 17
Caption = 'Yellow'
TabOrder = 10
OnClick = hsChannels
end
object rMag: TRadioButton
Left = 216
Top = 137
Width = 66
Height = 17
Caption = 'Magenta'
TabOrder = 11
OnClick = hsChannels
end
object rCyn: TRadioButton
Left = 216
Top = 159
Width = 47
Height = 17
Caption = 'Cyan'
TabOrder = 12
OnClick = hsChannels
end
end
object TabSheet17: TTabSheet
Caption = 'Invert'
object Label52: TLabel
Left = 0
Top = 176
Width = 103
Height = 13
Caption = 'Click apply or preview'
end
end
object TabSheet19: TTabSheet
Caption = 'Jiggle'
object Label35: TLabel
Left = 14
Top = 45
Width = 30
Height = 13
Caption = 'Period'
end
object Label36: TLabel
Left = 23
Top = 70
Width = 21
Height = 13
Caption = 'Amp'
end
object Label39: TLabel
Left = 13
Top = 97
Width = 31
Height = 13
Caption = 'Shape'
end
object jgPeriodBar: TTrackBar
Left = 88
Top = 44
Width = 150
Height = 22
Max = 100
Min = 1
Orientation = trHorizontal
Frequency = 1
Position = 1
SelEnd = 0
SelStart = 0
TabOrder = 0
TickMarks = tmBoth
TickStyle = tsNone
OnChange = jgPeriodBarChange
end
object jgAmpBar: TTrackBar
Left = 88
Top = 73
Width = 150
Height = 22
Max = 360
Min = 1
Orientation = trHorizontal
Frequency = 1
Position = 10
SelEnd = 0
SelStart = 0
TabOrder = 2
TickMarks = tmBoth
TickStyle = tsNone
OnChange = jgAmpBarChange
end
object jgPeriodEdit: TEdit
Left = 248
Top = 43
Width = 41
Height = 21
MaxLength = 4
TabOrder = 1
Text = '1'
OnChange = jgPeriodEditChange
OnKeyPress = EditKeyPress
end
object jgAmpEdit: TEdit
Left = 248
Top = 73
Width = 41
Height = 21
MaxLength = 4
TabOrder = 3
Text = '10'
OnChange = jgAmpEditChange
OnKeyPress = EditKeyPress
end
object jgSine: TRadioButton
Left = 92
Top = 98
Width = 63
Height = 17
Caption = 'Sine'
Checked = True
TabOrder = 4
TabStop = True
end
object jgTriangle: TRadioButton
Left = 158
Top = 98
Width = 63
Height = 17
Caption = 'Triangle'
TabOrder = 5
end
end
object TabSheet20: TTabSheet
Caption = 'Mirror'
object VBox: TCheckBox
Left = 122
Top = 65
Width = 97
Height = 17
Caption = 'Vertical'
TabOrder = 0
end
object HBox: TCheckBox
Left = 122
Top = 87
Width = 97
Height = 17
Caption = 'Horizontal'
TabOrder = 1
end
end
object TabSheet21: TTabSheet
Caption = 'Mosaic'
object Label31: TLabel
Left = 21
Top = 10
Width = 20
Height = 13
Caption = 'Size'
end
object labell: TLabel
Left = 10
Top = 89
Width = 31
Height = 13
Caption = 'Height'
end
object labels: TLabel
Left = 10
Top = 35
Width = 31
Height = 13
Caption = 'Space'
end
object Labels45: TLabel
Left = 18
Top = 63
Width = 23
Height = 13
Caption = 'Light'
end
object Label1: TLabel
Left = 1
Top = 116
Width = 40
Height = 13
Caption = 'Random'
end
object msSizeBar: TTrackBar
Left = 44
Top = 7
Width = 150
Height = 22
Max = 1000
Min = 1
Orientation = trHorizontal
Frequency = 1
Position = 150
SelEnd = 0
SelStart = 0
TabOrder = 0
TickMarks = tmBoth
TickStyle = tsNone
OnChange = msSizeBarChange
end
object msSpaceBar: TTrackBar
Left = 44
Top = 35
Width = 150
Height = 22
Max = 100
Orientation = trHorizontal
Frequency = 1
Position = 10
SelEnd = 0
SelStart = 0
TabOrder = 3
TickMarks = tmBoth
TickStyle = tsNone
OnChange = msSpaceBarChange
end
object msLightBar: TTrackBar
Left = 44
Top = 62
Width = 150
Height = 22
Max = 360
Min = -360
Orientation = trHorizontal
Frequency = 1
Position = 40
SelEnd = 0
SelStart = 0
TabOrder = 5
TickMarks = tmBoth
TickStyle = tsNone
OnChange = msLightBarChange
end
object msSizeEdit: TEdit
Left = 204
Top = 5
Width = 41
Height = 21
MaxLength = 4
TabOrder = 1
Text = '150'
OnChange = msSizeEditChange
OnKeyPress = EditKeyPress
end
object msSpaceEdit: TEdit
Left = 204
Top = 32
Width = 41
Height = 21
MaxLength = 4
TabOrder = 4
Text = '10'
OnChange = msSpaceEditChange
OnKeyPress = EditKeyPress
end
object msLightEdit: TEdit
Left = 204
Top = 59
Width = 41
Height = 21
MaxLength = 4
TabOrder = 6
Text = '40'
OnChange = msLightEditChange
OnKeyPress = EditKeyPress
end
object msHeightBar: TTrackBar
Left = 44
Top = 89
Width = 150
Height = 22
Max = 1000
Min = 1
Orientation = trHorizontal
Frequency = 1
Position = 30
SelEnd = 0
SelStart = 0
TabOrder = 8
TickMarks = tmBoth
TickStyle = tsNone
OnChange = msHeightBarChange
end
object msHeightEdit: TEdit
Left = 204
Top = 86
Width = 41
Height = 21
MaxLength = 4
TabOrder = 9
Text = '30'
OnChange = msHeightEditChange
OnKeyPress = EditKeyPress
end
object PolyBox: TGroupBox
Left = 254
Top = 2
Width = 77
Height = 31
Caption = 'Polygons'
ParentShowHint = False
ShowHint = True
TabOrder = 2
object btnType2: TRadioButton
Left = 49
Top = 12
Width = 17
Height = 17
Checked = True
ParentShowHint = False
ShowHint = True
TabOrder = 0
TabStop = True
OnClick = msPolygons
end
object btnType: TRadioButton
Left = 12
Top = 12
Width = 18
Height = 17
ParentShowHint = False
ShowHint = True
TabOrder = 1
OnClick = msPolygons
end
end
object SmoothBox: TGroupBox
Left = 253
Top = 104
Width = 77
Height = 31
Caption = 'Smooth'
ParentShowHint = False
ShowHint = True
TabOrder = 12
object MosSur2: TRadioButton
Left = 49
Top = 12
Width = 17
Height = 17
ParentShowHint = False
ShowHint = True
TabOrder = 0
OnClick = msSmooth
end
object MosSur1: TRadioButton
Left = 12
Top = 12
Width = 18
Height = 17
Checked = True
ParentShowHint = False
ShowHint = True
TabOrder = 1
TabStop = True
OnClick = msSmooth
end
end
object msRandomBar: TTrackBar
Left = 44
Top = 116
Width = 150
Height = 22
Max = 5
Orientation = trHorizontal
Frequency = 1
Position = 1
SelEnd = 0
SelStart = 0
TabOrder = 10
TickMarks = tmBoth
TickStyle = tsNone
OnChange = msRandomBarChange
end
object msRandomEdit: TEdit
Left = 204
Top = 113
Width = 41
Height = 21
MaxLength = 4
TabOrder = 11
Text = '1'
OnChange = msRandomEditChange
OnKeyPress = EditKeyPress
end
object MosBColor: TBitBtn
Left = 13
Top = 149
Width = 119
Height = 30
Caption = 'Background Color'
ParentShowHint = False
ShowHint = True
TabOrder = 13
OnClick = BackColorClick
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000010000000000000000000
BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
DDDDDDDDDDDDDDDDDDDDDDD00DDDDDDDDDDDDDD0000DDDDDDDDDDDDD0000DDDD
DDDDDDDD00070DDDDDDDDDDDD07770DDDDDDDDDDDD07770D0DDDD0000DD07770
0DDDD000DDDD07000DDDD000DDDDD00000DDD0D00DDD0000000DDDDD00DDDDD0
000DDDDDD0DDDDDD000DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD}
Style = bsNew
end
object MosFColor: TBitBtn
Left = 197
Top = 150
Width = 119
Height = 30
Caption = 'Foreground Color'
ParentShowHint = False
ShowHint = True
TabOrder = 14
OnClick = ForeColorBtnClick
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000010000000000000000000
BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
DDDDDDDDDDDDDDDDDDDDDDD00DDDDDDDDDDDDDD0000DDDDDDDDDDDDD0000DDDD
DDDDDDDD00070DDDDDDDDDDDD07770DDDDDDDDDDDD07770D0DDDD0000DD07770
0DDDD000DDDD07000DDDD000DDDDD00000DDD0D00DDD0000000DDDDD00DDDDD0
000DDDDDD0DDDDDD000DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD}
Style = bsNew
end
object MosAntiA: TCheckBox
Left = 255
Top = 57
Width = 82
Height = 17
Hint = 'Anti-Aliasing'
Caption = 'Anti-Aliasing'
ParentShowHint = False
ShowHint = True
State = cbChecked
TabOrder = 7
end
object Panel7: TPanel
Left = 131
Top = 149
Width = 18
Height = 30
TabOrder = 15
end
object Panel8: TPanel
Left = 315
Top = 150
Width = 18
Height = 30
TabOrder = 16
end
end
object TabSheet22: TTabSheet
Caption = 'Motion Blur'
object Label24: TLabel
Left = 45
Top = 71
Width = 27
Height = 13
Caption = 'Value'
end
object Label25: TLabel
Left = 45
Top = 41
Width = 27
Height = 13
Caption = 'Angle'
end
object MotionZoom: TRadioButton
Left = 88
Top = 103
Width = 113
Height = 17
Caption = 'Motion Zoom'
Checked = True
ParentShowHint = False
ShowHint = True
TabOrder = 4
TabStop = True
OnClick = MotionBlurSet
end
object MotionRotate: TRadioButton
Left = 88
Top = 122
Width = 113
Height = 17
Caption = 'Motion Rotate'
ParentShowHint = False
ShowHint = True
TabOrder = 5
OnClick = MotionBlurSet
end
object MotionLine: TRadioButton
Left = 88
Top = 143
Width = 113
Height = 17
Caption = 'Motion Line'
ParentShowHint = False
ShowHint = True
TabOrder = 6
OnClick = MotionBlurSet
end
object mtAnglebar: TTrackBar
Left = 88
Top = 39
Width = 150
Height = 22
Max = 360
Min = 1
Orientation = trHorizontal
Frequency = 1
Position = 10
SelEnd = 0
SelStart = 0
TabOrder = 0
TickMarks = tmBoth
TickStyle = tsNone
OnChange = mtAnglebarChange
end
object mtValueBar: TTrackBar
Left = 88
Top = 69
Width = 150
Height = 22
Max = 500
Min = 1
Orientation = trHorizontal
Frequency = 1
Position = 10
SelEnd = 0
SelStart = 0
TabOrder = 2
TickMarks = tmBoth
TickStyle = tsNone
OnChange = mtValueBarChange
end
object mtAngleEdit: TEdit
Left = 248
Top = 38
Width = 41
Height = 21
MaxLength = 4
TabOrder = 1
Text = '10'
OnChange = mtAngleEditChange
OnKeyPress = EditKeyPress
end
object mtValueEdit: TEdit
Left = 248
Top = 68
Width = 41
Height = 21
MaxLength = 4
TabOrder = 3
Text = '10'
OnChange = mtValueEditChange
OnKeyPress = EditKeyPress
end
end
object TabSheet23: TTabSheet
Caption = 'Noisify'
object Label13: TLabel
Left = 45
Top = 23
Width = 20
Height = 13
Caption = 'Red'
end
object Label14: TLabel
Left = 36
Top = 47
Width = 29
Height = 13
Caption = 'Green'
end
object Label33: TLabel
Left = 44
Top = 82
Width = 21
Height = 13
Caption = 'Blue'
end
object Label15: TLabel
Left = 43
Top = 118
Width = 22
Height = 13
Caption = 'Gray'
end
object Label16: TLabel
Left = 29
Top = 157
Width = 36
Height = 13
Hint = 'gauss or uniform'
Caption = 'Method'
end
object nsRedBar: TTrackBar
Left = 88
Top = 20
Width = 150
Height = 22
Max = 255
Orientation = trHorizontal
Frequency = 1
Position = 20
SelEnd = 0
SelStart = 0
TabOrder = 0
TickMarks = tmBoth
TickStyle = tsNone
OnChange = nsRedBarChange
end
object nsGreenBar: TTrackBar
Left = 88
Top = 50
Width = 150
Height = 22
Max = 255
Orientation = trHorizontal
Frequency = 1
Position = 20
SelEnd = 0
SelStart = 0
TabOrder = 1
TickMarks = tmBoth
TickStyle = tsNone
OnChange = nsGreenBarChange
end
object nsBlueBar: TTrackBar
Left = 88
Top = 81
Width = 150
Height = 22
Max = 255
Orientation = trHorizontal
Frequency = 1
Position = 20
SelEnd = 0
SelStart = 0
TabOrder = 2
TickMarks = tmBoth
TickStyle = tsNone
OnChange = nsBlueBarChange
end
object nsRedEdit: TEdit
Left = 248
Top = 19
Width = 41
Height = 21
MaxLength = 4
TabOrder = 3
Text = '20'
OnChange = nsRedEditChange
OnKeyPress = EditKeyPress
end
object nsGreenEdit: TEdit
Left = 248
Top = 49
Width = 41
Height = 21
MaxLength = 4
TabOrder = 4
Text = '20'
OnChange = nsGreenEditChange
OnKeyPress = EditKeyPress
end
object nsBlueEdit: TEdit
Left = 248
Top = 80
Width = 41
Height = 21
MaxLength = 4
TabOrder = 5
Text = '20'
OnChange = nsBlueEditChange
OnKeyPress = EditKeyPress
end
object Panel3: TPanel
Left = 95
Top = 150
Width = 200
Height = 30
TabOrder = 6
object nsGaus: TRadioButton
Left = 8
Top = 8
Width = 65
Height = 17
Caption = 'Gauss'
Checked = True
TabOrder = 0
TabStop = True
end
object RadioButton2: TRadioButton
Left = 128
Top = 8
Width = 65
Height = 17
Caption = 'Uniform'
TabOrder = 1
end
end
object Panel4: TPanel
Left = 95
Top = 111
Width = 200
Height = 30
TabOrder = 7
object UseGrayValueofPixels: TCheckBox
Left = 16
Top = 7
Width = 177
Height = 17
Caption = 'Use Gray Value of Pixels'
TabOrder = 0
end
end
end
object TabSheet25: TTabSheet
Caption = 'Oil Paint'
object Label11: TLabel
Left = 34
Top = 75
Width = 27
Height = 13
Caption = 'Value'
end
object opValueBar: TTrackBar
Left = 72
Top = 74
Width = 150
Height = 22
Max = 50
Orientation = trHorizontal
Frequency = 1
Position = 1
SelEnd = 0
SelStart = 0
TabOrder = 0
TickMarks = tmBoth
TickStyle = tsNone
OnChange = opValueBarChange
end
object opValueEdit: TEdit
Left = 224
Top = 72
Width = 41
Height = 21
MaxLength = 4
TabOrder = 1
Text = '1'
OnChange = opValueEditChange
OnKeyPress = EditKeyPress
end
end
object TabSheet8: TTabSheet
Caption = 'Page Curl'
object C_Trans: TCheckBox
Left = 164
Top = 58
Width = 157
Height = 17
Hint = 'Keep Image'
Caption = 'Keep Image under the curl'
ParentShowHint = False
ShowHint = True
TabOrder = 0
end
object GroupBox24: TGroupBox
Left = 2
Top = 71
Width = 148
Height = 115
Caption = 'Shading'
ParentShowHint = False
ShowHint = True
TabOrder = 1
object Label4: TLabel
Left = 6
Top = 75
Width = 117
Height = 14
Caption = 'Shading transparancy'
end
object B_CUBC: TRadioButton
Left = 6
Top = 32
Width = 125
Height = 17
Hint = 'Use Background color'
Caption = 'Use Background color'
ParentShowHint = False
ShowHint = True
TabOrder = 0
end
object B_CUFC: TRadioButton
Left = 5
Top = 14
Width = 127
Height = 17
Hint = 'Use Foreground color'
Caption = 'Use Foreground color'
Checked = True
ParentShowHint = False
ShowHint = True
TabOrder = 1
TabStop = True
end
object pcShadingBar: TTrackBar
Left = 3
Top = 90
Width = 88
Height = 22
Max = 4
Orientation = trHorizontal
Frequency = 1
Position = 4
SelEnd = 0
SelStart = 0
TabOrder = 2
TickMarks = tmBoth
TickStyle = tsNone
OnChange = pcShadingBarChange
end
object pcShadingEdit: TEdit
Left = 97
Top = 89
Width = 41
Height = 21
MaxLength = 4
TabOrder = 3
Text = '4'
OnChange = pcShadingEditChange
OnKeyPress = EditKeyPress
end
object CShade: TCheckBox
Left = 8
Top = 54
Width = 125
Height = 16
Hint = 'Shade Under Curl'
Caption = 'Shade Under Curl'
ParentShowHint = False
ShowHint = True
State = cbChecked
TabOrder = 4
end
end
object FCC: TGroupBox
Left = 158
Top = 2
Width = 177
Height = 50
Caption = 'Background'
ParentShowHint = False
ShowHint = True
TabOrder = 2
object B_CFC: TRadioButton
Left = 7
Top = 28
Width = 125
Height = 17
Hint = 'Use Background color'
Caption = 'Use Background color'
Checked = True
ParentShowHint = False
ShowHint = True
TabOrder = 0
TabStop = True
end
object B_CBC: TRadioButton
Left = 7
Top = 12
Width = 125
Height = 17
Hint = 'Use Foreground color'
Caption = 'Use Foreground color'
ParentShowHint = False
ShowHint = True
TabOrder = 1
end
end
object GroupBox23: TGroupBox
Left = 158
Top = 80
Width = 177
Height = 43
Caption = 'Orientation'
ParentShowHint = False
ShowHint = True
TabOrder = 3
object C_OH: TRadioButton
Left = 11
Top = 17
Width = 72
Height = 17
Hint = 'Horizonal Curl'
Caption = 'Horizonal'
Checked = True
ParentShowHint = False
ShowHint = True
TabOrder = 0
TabStop = True
end
object C_OV: TRadioButton
Left = 87
Top = 17
Width = 77
Height = 17
Hint = 'Vertical Curl'
Caption = 'Vertical'
ParentShowHint = False
ShowHint = True
TabOrder = 1
end
end
object GroupBox22: TGroupBox
Left = 158
Top = 123
Width = 177
Height = 64
Caption = 'Location '
TabOrder = 4
object C_RT: TRadioButton
Left = 99
Top = 16
Width = 72
Height = 17
Hint = 'Right Top'
Alignment = taLeftJustify
Caption = 'Top Right'
ParentShowHint = False
ShowHint = True
TabOrder = 0
end
object C_LT: TRadioButton
Left = 5
Top = 16
Width = 68
Height = 17
Hint = 'Left Top'
Caption = 'Top Left'
Checked = True
ParentShowHint = False
ShowHint = True
TabOrder = 1
TabStop = True
end
object C_LB: TRadioButton
Left = 4
Top = 44
Width = 77
Height = 17
Hint = 'Left Bottom'
Caption = 'Bottom Left'
ParentShowHint = False
ShowHint = True
TabOrder = 2
end
object C_RB: TRadioButton
Left = 92
Top = 43
Width = 79
Height = 17
Hint = 'Right Bottom'
Alignment = taLeftJustify
Caption = 'Bottom Right'
ParentShowHint = False
ShowHint = True
TabOrder = 3
end
end
object BitBtn1: TBitBtn
Left = 22
Top = 10
Width = 119
Height = 24
Caption = 'Background Color'
ParentShowHint = False
ShowHint = True
TabOrder = 5
OnClick = BackColorClick
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000010000000000000000000
BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
DDDDDDDDDDDDDDDDDDDDDDD00DDDDDDDDDDDDDD0000DDDDDDDDDDDDD0000DDDD
DDDDDDDD00070DDDDDDDDDDDD07770DDDDDDDDDDDD07770D0DDDD0000DD07770
0DDDD000DDDD07000DDDD000DDDDD00000DDD0D00DDD0000000DDDDD00DDDDD0
000DDDDDD0DDDDDD000DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD}
Style = bsNew
end
object ForeColorBtn: TBitBtn
Left = 22
Top = 33
Width = 119
Height = 23
Caption = 'Foreground Color'
ParentShowHint = False
ShowHint = True
TabOrder = 6
OnClick = ForeColorBtnClick
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000010000000000000000000
BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
DDDDDDDDDDDDDDDDDDDDDDD00DDDDDDDDDDDDDD0000DDDDDDDDDDDDD0000DDDD
DDDDDDDD00070DDDDDDDDDDDD07770DDDDDDDDDDDD07770D0DDDD0000DD07770
0DDDD000DDDD07000DDDD000DDDDD00000DDD0D00DDD0000000DDDDD00DDDDD0
000DDDDDD0DDDDDD000DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD}
Style = bsNew
end
object Panel11: TPanel
Left = 4
Top = 10
Width = 18
Height = 23
TabOrder = 7
end
object Panel12: TPanel
Left = 4
Top = 33
Width = 18
Height = 23
TabOrder = 8
end
end
object TabSheet26: TTabSheet
Caption = 'Paste Image'
object PasteFromClipBtn: TSpeedButton
Left = 175
Top = 12
Width = 144
Height = 25
Hint = 'Paste an Image from the clipboard on top of the master image'
Caption = 'Paste Image from clipboard'
Enabled = False
OnClick = PasteFromClipBtnClick
end
object Label63: TLabel
Left = 185
Top = 55
Width = 113
Height = 65
Alignment = taCenter
AutoSize = False
Caption =
'Load an image from file, twain or clipboard. Drag the image to t' +
'he desired position and apply.'
WordWrap = True
end
object ScanImage: TSpeedButton
Left = 175
Top = 130
Width = 144
Height = 25
Hint = 'Scan an Image'
Caption = 'Aquire Image'
Glyph.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000001000000010000000000000000000
BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333300003333333333333333333300003333033333333333333300003333
3000333333333333000033333333033333333333000033333333303333333333
0000333333338088333333330000333333300000833333330000333333077777
08333333000033333307FFFF08333333000033333307FFFF0833333300003333
3307FFFF0888333300003330007FFFFFF00083330000330777FFFFFFFFFF0833
00003307FAAAAAAAAAFF083300003307FFFFFFFFFFFF08330000333000000000
0000833300003333333333333333333300003333333333333333333300003333
33333333333333330000}
ParentShowHint = False
ShowHint = True
OnClick = ScanImageClick
end
object ScanSelect: TSpeedButton
Left = 175
Top = 154
Width = 144
Height = 25
Hint = 'Scanner Select'
Caption = 'Select Twain Source'
Glyph.Data = {
80010000424D8001000000000000760000002800000014000000140000000100
040000000000F000000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333334
444444440000333333333334333B33340000333303333334333B333400003333
30003334BBBBBBB40000333333330334333B3334000033333333303444444444
0000333333338088333333330000333333300000833333330000333333077777
0833333300003333330799990833333300003333330799990833333300003333
3307999908883333000033300079999990008333000033077799999999990833
000033079AAAAAAAAA9908330000330799999999999908330000333000000000
0000833300003333333333333333333300003333333333333333333300003333
3333333333333333000000000000000000000000000000000000000000000000
00000000}
ParentShowHint = False
ShowHint = True
OnClick = ScanSelectClick
end
object FileListBox1: TFileListBox
Left = 1
Top = 2
Width = 145
Height = 80
Color = clBtnFace
ItemHeight = 13
Mask = '*.BMP;*.GIF;*.JPG;*.PCX;*.PNG;*.TIF;*.PCD;*.TGA'
TabOrder = 0
OnChange = FileListBox1Change
end
object DirectoryListBox1: TDirectoryListBox
Left = 2
Top = 83
Width = 145
Height = 85
Color = clBtnFace
ItemHeight = 16
TabOrder = 1
OnChange = DirectoryListBox1Change
end
object DriveComboBox1: TDriveComboBox
Left = 3
Top = 170
Width = 145
Height = 19
Color = clBtnFace
TabOrder = 2
OnChange = DriveComboBox1Change
end
object Panel16: TPanel
Left = 152
Top = 168
Width = 21
Height = 17
BevelOuter = bvNone
TabOrder = 3
Visible = False
end
end
object TabSheet27: TTabSheet
Caption = 'Pinch Hole'
object Label10: TLabel
Left = 34
Top = 75
Width = 27
Height = 13
Caption = 'Value'
end
object phValueBar: TTrackBar
Left = 72
Top = 74
Width = 150
Height = 22
Max = 0
Min = -20
Orientation = trHorizontal
Frequency = 1
Position = 0
SelEnd = 0
SelStart = 0
TabOrder = 0
TickMarks = tmBoth
TickStyle = tsNone
OnChange = phValueBarChange
end
object phValueEdit: TEdit
Left = 224
Top = 72
Width = 41
Height = 21
MaxLength = 4
TabOrder = 1
Text = '0'
OnChange = phValueEditChange
OnKeyPress = EditKeyPress
end
end
object TabSheet30: TTabSheet
Caption = 'Polar'
object Label28: TLabel
Left = 29
Top = 28
Width = 27
Height = 13
Caption = 'Value'
end
object Label29: TLabel
Left = 29
Top = 78
Width = 27
Height = 13
Caption = 'Angle'
end
object PolInv: TCheckBox
Left = 80
Top = 104
Width = 57
Height = 17
Caption = 'Inverse'
ParentShowHint = False
ShowHint = True
TabOrder = 0
end
object PolBack: TCheckBox
Left = 79
Top = 133
Width = 71
Height = 17
Caption = 'Backwards'
ParentShowHint = False
ShowHint = True
TabOrder = 1
end
object plValueBar: TTrackBar
Left = 72
Top = 26
Width = 150
Height = 22
Max = 500
Orientation = trHorizontal
Frequency = 1
Position = 1
SelEnd = 0
SelStart = 0
TabOrder = 2
TickMarks = tmBoth
TickStyle = tsNone
OnChange = plValueBarChange
end
object plValueEdit: TEdit
Left = 224
Top = 24
Width = 41
Height = 21
MaxLength = 4
TabOrder = 3
Text = '0'
OnChange = plValueEditChange
OnKeyPress = EditKeyPress
end
object plAngleBar: TTrackBar
Left = 73
Top = 74
Width = 150
Height = 22
Max = 360
Orientation = trHorizontal
Frequency = 1
Position = 1
SelEnd = 0
SelStart = 0
TabOrder = 4
TickMarks = tmBoth
TickStyle = tsNone
OnChange = plAngleBarChange
end
object plAngleEdit: TEdit
Left = 225
Top = 72
Width = 41
Height = 21
MaxLength = 4
TabOrder = 5
Text = '0'
OnChange = plAngleEditChange
OnKeyPress = EditKeyPress
end
end
object TabSheet32: TTabSheet
Caption = 'Rotate'
object Label9: TLabel
Left = 34
Top = 75
Width = 27
Height = 13
Caption = 'Angle'
end
object rtValueBar: TTrackBar
Left = 72
Top = 74
Width = 150
Height = 22
Max = 1800
Min = -1800
Orientation = trHorizontal
Frequency = 10
Position = 0
SelEnd = 0
SelStart = 0
TabOrder = 0
TickMarks = tmBoth
TickStyle = tsNone
OnChange = rtValueBarChange
end
object rtValueEdit: TEdit
Left = 224
Top = 72
Width = 53
Height = 21
MaxLength = 8
TabOrder = 1
Text = '0.00'
OnChange = rtValueEditChange
OnKeyPress = RealEditKeyPress
end
object BackColor: TBitBtn
Left = 98
Top = 115
Width = 128
Height = 30
Caption = 'Background Color'
TabOrder = 2
OnClick = BackColorClick
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000010000000000000000000
BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
DDDDDDDDDDDDDDDDDDDDDDD00DDDDDDDDDDDDDD0000DDDDDDDDDDDDD0000DDDD
DDDDDDDD00070DDDDDDDDDDDD07770DDDDDDDDDDDD07770D0DDDD0000DD07770
0DDDD000DDDD07000DDDD000DDDDD00000DDD0D00DDD0000000DDDDD00DDDDD0
000DDDDDD0DDDDDD000DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD}
Style = bsNew
end
object Panel13: TPanel
Left = 80
Top = 115
Width = 18
Height = 30
TabOrder = 3
end
end
object TabSheet34: TTabSheet
Caption = 'Sharp'
object Label8: TLabel
Left = 34
Top = 75
Width = 27
Height = 13
Caption = 'Value'
end
object shValueBar: TTrackBar
Left = 72
Top = 74
Width = 150
Height = 22
Max = 9
Orientation = trHorizontal
Frequency = 1
Position = 0
SelEnd = 0
SelStart = 0
TabOrder = 0
TickMarks = tmBoth
TickStyle = tsNone
OnChange = shValueBarChange
end
object shValueEdit: TEdit
Left = 224
Top = 72
Width = 41
Height = 21
MaxLength = 4
TabOrder = 1
Text = '0'
OnChange = shValueEditChange
OnKeyPress = EditKeyPress
end
end
object TabSheet16: TTabSheet
Caption = 'Soft'
object Label7: TLabel
Left = 34
Top = 75
Width = 27
Height = 13
Caption = 'Value'
end
object soValueBar: TTrackBar
Left = 72
Top = 74
Width = 150
Height = 22
Max = 9
Orientation = trHorizontal
Frequency = 1
Position = 0
SelEnd = 0
SelStart = 0
TabOrder = 0
TickMarks = tmBoth
TickStyle = tsNone
OnChange = soValueBarChange
end
object soValueEdit: TEdit
Left = 224
Top = 72
Width = 41
Height = 21
MaxLength = 4
TabOrder = 1
Text = '0'
OnChange = soValueEditChange
OnKeyPress = EditKeyPress
end
end
object TabSheet36: TTabSheet
Caption = 'Spray'
object Label38: TLabel
Left = 23
Top = 80
Width = 40
Height = 13
Caption = 'Random'
end
object Label37: TLabel
Left = 34
Top = 52
Width = 27
Height = 13
Caption = 'Value'
end
object sprValueBar: TTrackBar
Left = 81
Top = 51
Width = 150
Height = 22
Max = 100
Orientation = trHorizontal
Frequency = 1
Position = 0
SelEnd = 0
SelStart = 0
TabOrder = 0
TickMarks = tmBoth
TickStyle = tsNone
OnChange = sprValueBarChange
end
object sprValueEdit: TEdit
Left = 233
Top = 49
Width = 41
Height = 21
MaxLength = 4
TabOrder = 1
Text = '0'
OnChange = sprValueEditChange
OnKeyPress = EditKeyPress
end
object sprRandomBar: TTrackBar
Left = 81
Top = 79
Width = 150
Height = 22
Max = 360
Min = 1
Orientation = trHorizontal
Frequency = 1
Position = 1
SelEnd = 0
SelStart = 0
TabOrder = 2
TickMarks = tmBoth
TickStyle = tsNone
OnChange = sprRandomBarChange
end
object sprRandomEdit: TEdit
Left = 233
Top = 77
Width = 41
Height = 21
MaxLength = 4
TabOrder = 3
Text = '1'
OnChange = sprRandomEditChange
OnKeyPress = EditKeyPress
end
end
object TabSheet37: TTabSheet
Caption = 'Tile Maker'
object Label42: TLabel
Left = 0
Top = 176
Width = 115
Height = 13
Caption = 'Click apply or preview'
end
end
object TabSheet39: TTabSheet
Caption = 'Threshold'
object Label45: TLabel
Left = 34
Top = 75
Width = 27
Height = 13
Caption = 'Value'
end
object ThresAnti: TCheckBox
Left = 108
Top = 111
Width = 109
Height = 17
Caption = 'Anti Alialsing'
State = cbChecked
TabOrder = 0
end
object thValueBar: TTrackBar
Left = 72
Top = 74
Width = 150
Height = 22
Max = 255
Orientation = trHorizontal
Frequency = 1
Position = 120
SelEnd = 0
SelStart = 0
TabOrder = 1
TickMarks = tmBoth
TickStyle = tsNone
OnChange = thValueBarChange
end
object thValueEdit: TEdit
Left = 224
Top = 72
Width = 41
Height = 21
MaxLength = 4
TabOrder = 2
Text = '120'
OnChange = thValueEditChange
OnKeyPress = EditKeyPress
end
end
object TabSheet40: TTabSheet
Caption = 'Transitions'
object Label46: TLabel
Left = 44
Top = 46
Width = 27
Height = 13
Caption = 'Delay'
end
object Label47: TLabel
Left = 23
Top = 71
Width = 49
Height = 13
Caption = 'Thickness'
end
object FXN: TRadioButton
Left = 83
Top = 104
Width = 85
Height = 17
Caption = 'None'
Checked = True
TabOrder = 0
TabStop = True
OnClick = FXMethod
end
object FXH: TRadioButton
Left = 83
Top = 124
Width = 85
Height = 17
Caption = 'Horizontal'
TabOrder = 1
OnClick = FXMethod
end
object FXV: TRadioButton
Left = 83
Top = 144
Width = 85
Height = 17
Caption = 'Vertical'
TabOrder = 2
OnClick = FXMethod
end
object FXD: TRadioButton
Left = 179
Top = 103
Width = 85
Height = 17
Caption = 'Diagonal'
TabOrder = 3
OnClick = FXMethod
end
object FXS: TRadioButton
Left = 179
Top = 123
Width = 85
Height = 17
Caption = 'Squares'
TabOrder = 4
OnClick = FXMethod
end
object FXR: TRadioButton
Left = 179
Top = 143
Width = 85
Height = 17
Caption = 'Rectangle'
TabOrder = 5
OnClick = FXMethod
end
object trDelayBar: TTrackBar
Left = 81
Top = 42
Width = 150
Height = 22
Max = 100
Min = 1
Orientation = trHorizontal
Frequency = 1
Position = 15
SelEnd = 0
SelStart = 0
TabOrder = 6
TickMarks = tmBoth
TickStyle = tsNone
OnChange = trDelayBarChange
end
object trThickbar: TTrackBar
Left = 81
Top = 70
Width = 150
Height = 22
Max = 20
Min = 1
Orientation = trHorizontal
Frequency = 1
Position = 4
SelEnd = 0
SelStart = 0
TabOrder = 7
TickMarks = tmBoth
TickStyle = tsNone
OnChange = trThickbarChange
end
object trDelayEdit: TEdit
Left = 233
Top = 40
Width = 41
Height = 21
MaxLength = 4
TabOrder = 8
Text = '15'
OnChange = trDelayEditChange
OnKeyPress = EditKeyPress
end
object trThickEdit: TEdit
Left = 233
Top = 68
Width = 41
Height = 21
MaxLength = 4
TabOrder = 9
Text = '4'
OnChange = trThickEditChange
OnKeyPress = EditKeyPress
end
end
object TabSheet24: TTabSheet
Caption = 'Warp'
object Label55: TLabel
Left = 86
Top = 16
Width = 45
Height = 13
Caption = 'ScaleFac'
end
object Label56: TLabel
Left = 65
Top = 40
Width = 66
Height = 13
Caption = 'Vector Rotate'
end
object Label57: TLabel
Left = 104
Top = 70
Width = 27
Height = 13
Caption = 'Steps'
end
object Label58: TLabel
Left = 3
Top = 99
Width = 130
Height = 13
Caption = 'Displacement scaling factor'
end
object RgbToHueBox: TCheckBox
Left = 63
Top = 122
Width = 97
Height = 17
Alignment = taLeftJustify
Caption = 'RGB To Hue'
State = cbChecked
TabOrder = 0
end
object RGBToSaturationBox: TCheckBox
Left = 35
Top = 143
Width = 125
Height = 17
Alignment = taLeftJustify
Caption = 'RGB To Saturation'
State = cbChecked
TabOrder = 1
end
object ConvoleTgle: TCheckBox
Left = 44
Top = 165
Width = 116
Height = 17
Alignment = taLeftJustify
Caption = 'Convole Toggles '
State = cbChecked
TabOrder = 2
end
object wrpScaleBar: TTrackBar
Left = 139
Top = 13
Width = 150
Height = 22
Max = 200
Min = 1
Orientation = trHorizontal
Frequency = 1
Position = 20
SelEnd = 0
SelStart = 0
TabOrder = 3
TickMarks = tmBoth
TickStyle = tsNone
OnChange = wrpScaleBarChange
end
object wrpScaleEdit: TEdit
Left = 292
Top = 11
Width = 41
Height = 21
MaxLength = 4
TabOrder = 4
Text = '20'
OnChange = wrpScaleEditChange
OnKeyPress = EditKeyPress
end
object wrpVecRotateBar: TTrackBar
Left = 139
Top = 39
Width = 150
Height = 22
Max = 360
Orientation = trHorizontal
Frequency = 1
Position = 90
SelEnd = 0
SelStart = 0
TabOrder = 5
TickMarks = tmBoth
TickStyle = tsNone
OnChange = wrpVecRotateBarChange
end
object wrpVecRotateEdit: TEdit
Left = 292
Top = 37
Width = 41
Height = 21
MaxLength = 4
TabOrder = 6
Text = '90'
OnChange = wrpVecRotateEditChange
OnKeyPress = EditKeyPress
end
object wrpStepsBar: TTrackBar
Left = 139
Top = 69
Width = 150
Height = 22
Max = 200
Min = 1
Orientation = trHorizontal
Frequency = 1
Position = 4
SelEnd = 0
SelStart = 0
TabOrder = 7
TickMarks = tmBoth
TickStyle = tsNone
OnChange = wrpStepsBarChange
end
object wrpStepsEdit: TEdit
Left = 292
Top = 67
Width = 41
Height = 21
MaxLength = 4
TabOrder = 8
Text = '4'
OnChange = wrpStepsEditChange
OnKeyPress = EditKeyPress
end
object wrpDisplacementBar: TTrackBar
Left = 139
Top = 97
Width = 150
Height = 22
Max = 200
Min = 1
Orientation = trHorizontal
Frequency = 1
Position = 10
SelEnd = 0
SelStart = 0
TabOrder = 9
TickMarks = tmBoth
TickStyle = tsNone
OnChange = wrpDisplacementBarChange
end
object wrpDisplacementEdit: TEdit
Left = 292
Top = 95
Width = 41
Height = 21
MaxLength = 4
TabOrder = 10
Text = '10'
OnChange = wrpDisplacementEditChange
OnKeyPress = EditKeyPress
end
end
object TabSheet42: TTabSheet
Caption = 'Wave'
object Label111: TLabel
Left = 48
Top = 67
Width = 30
Height = 13
Caption = 'Phase'
end
object Label49: TLabel
Left = 17
Top = 38
Width = 61
Height = 13
Caption = 'Wave length'
end
object Label50: TLabel
Left = 32
Top = 96
Width = 46
Height = 13
Caption = 'Amplitude'
end
object Refl: TCheckBox
Left = 36
Top = 134
Width = 157
Height = 17
Hint = 'Reflective waves or just distorting'
Caption = 'Add Reflection to Waves'
ParentShowHint = False
ShowHint = True
TabOrder = 0
end
object Smear: TCheckBox
Left = 204
Top = 133
Width = 101
Height = 17
Hint = 'Smear the edges out'
Caption = 'Smear Waves'
ParentShowHint = False
ShowHint = True
State = cbChecked
TabOrder = 1
end
object wvLengthBar: TTrackBar
Left = 81
Top = 36
Width = 150
Height = 22
Max = 200
Orientation = trHorizontal
Frequency = 1
Position = 20
SelEnd = 0
SelStart = 0
TabOrder = 2
TickMarks = tmBoth
TickStyle = tsNone
OnChange = wvLengthBarChange
end
object wvPhaseBar: TTrackBar
Left = 81
Top = 64
Width = 150
Height = 22
Max = 3600
Min = 1
Orientation = trHorizontal
Frequency = 1
Position = 1
SelEnd = 0
SelStart = 0
TabOrder = 3
TickMarks = tmBoth
TickStyle = tsNone
OnChange = wvPhaseBarChange
end
object wvLengthEdit: TEdit
Left = 233
Top = 34
Width = 41
Height = 21
MaxLength = 4
TabOrder = 4
Text = '20'
OnChange = wvLengthEditChange
OnKeyPress = EditKeyPress
end
object wvPhaseEdit: TEdit
Left = 233
Top = 62
Width = 41
Height = 21
MaxLength = 4
TabOrder = 5
Text = '0'
OnChange = wvPhaseEditChange
OnKeyPress = RealEditKeyPress
end
object wvAmplBar: TTrackBar
Left = 81
Top = 94
Width = 150
Height = 22
Max = 2000
Orientation = trHorizontal
Frequency = 1
Position = 50
SelEnd = 0
SelStart = 0
TabOrder = 6
TickMarks = tmBoth
TickStyle = tsNone
OnChange = wvAmplBarChange
end
object wvAmplEdit: TEdit
Left = 233
Top = 92
Width = 41
Height = 21
MaxLength = 4
TabOrder = 7
Text = '50'
OnChange = wvAmplEditChange
OnKeyPress = RealEditKeyPress
end
end
object TabSheet41: TTabSheet
Caption = 'WhirlPool'
object Label48: TLabel
Left = 34
Top = 75
Width = 27
Height = 13
Caption = 'Value'
end
object wpValueBar: TTrackBar
Left = 72
Top = 74
Width = 150
Height = 22
Max = 3000
Orientation = trHorizontal
Frequency = 1
Position = 0
SelEnd = 0
SelStart = 0
TabOrder = 0
TickMarks = tmBoth
TickStyle = tsNone
OnChange = wpValueBarChange
end
object wpValueEdit: TEdit
Left = 224
Top = 72
Width = 41
Height = 21
MaxLength = 4
TabOrder = 1
Text = '0'
OnChange = wpValueEditChange
OnKeyPress = EditKeyPress
end
end
end
object ilProgress: TProgressBar
Left = 413
Top = 264
Width = 175
Height = 15
Hint = 'Current status of the image handling'
Min = 0
Max = 100
ParentShowHint = False
ShowHint = True
TabOrder = 3
end
object Panel5: TPanel
Left = 1
Top = 28
Width = 247
Height = 231
Align = alLeft
BevelOuter = bvNone
TabOrder = 4
object Panel6: TPanel
Left = 0
Top = 210
Width = 247
Height = 21
Align = alBottom
BevelOuter = bvLowered
TabOrder = 0
object Label59: TLabel
Left = 3
Top = 5
Width = 8
Height = 12
Caption = 'L:'
Font.Color = clBlack
Font.Height = -9
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object Label60: TLabel
Left = 60
Top = 5
Width = 8
Height = 12
Caption = 'T:'
Font.Color = clBlack
Font.Height = -9
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object Label61: TLabel
Left = 118
Top = 5
Width = 10
Height = 12
Caption = 'R:'
Font.Color = clBlack
Font.Height = -9
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object Label62: TLabel
Left = 175
Top = 5
Width = 9
Height = 12
Caption = 'B:'
Font.Color = clBlack
Font.Height = -9
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object RLeftEdit: TEdit
Left = 14
Top = 4
Width = 43
Height = 13
TabStop = False
AutoSelect = False
AutoSize = False
BorderStyle = bsNone
Color = clBtnFace
Ctl3D = False
ParentCtl3D = False
ReadOnly = True
TabOrder = 0
Text = '0'
OnKeyPress = EditKeyPress
end
object RTopEdit: TEdit
Left = 71
Top = 4
Width = 43
Height = 13
TabStop = False
AutoSelect = False
AutoSize = False
BorderStyle = bsNone
Color = clBtnFace
Ctl3D = False
ParentCtl3D = False
ReadOnly = True
TabOrder = 1
Text = '0'
OnKeyPress = EditKeyPress
end
object RRightEdit: TEdit
Left = 129
Top = 4
Width = 43
Height = 13
TabStop = False
AutoSelect = False
AutoSize = False
BorderStyle = bsNone
Color = clBtnFace
Ctl3D = False
ParentCtl3D = False
ReadOnly = True
TabOrder = 2
Text = '100'
OnKeyPress = EditKeyPress
end
object RBottomEdit: TEdit
Left = 186
Top = 4
Width = 43
Height = 13
TabStop = False
AutoSelect = False
AutoSize = False
BorderStyle = bsNone
Color = clBtnFace
Ctl3D = False
ParentCtl3D = False
ReadOnly = True
TabOrder = 3
Text = '100'
OnKeyPress = EditKeyPress
end
end
end
end
object MainMenu1: TMainMenu
Left = 16
Top = 40
object File1: TMenuItem
Caption = '&File'
ShortCut = 0
object Apply1: TMenuItem
Caption = 'Apply'
Hint = 'Apply this effect to the master image'
ShortCut = 0
OnClick = DoEffect
end
object Preview1: TMenuItem
Caption = 'Preview'
Hint = 'Apply this effect to the preview image'
ShortCut = 0
OnClick = DoEffect
end
object N1: TMenuItem
Caption = '-'
ShortCut = 0
end
object Resetalltodefault1: TMenuItem
Caption = 'Reset to default'
Hint = 'Reload all default settings'
ShortCut = 0
OnClick = Resetalltodefault1Click
end
object Savesettingsonexit1: TMenuItem
Caption = 'Save settings on exit'
Checked = True
GroupIndex = 1
Hint = 'Save settings on exit'
ShortCut = 0
OnClick = Savesettingsonexit1Click
end
object N2: TMenuItem
Caption = '-'
GroupIndex = 1
ShortCut = 0
end
object Exit1: TMenuItem
Caption = 'Exit'
GroupIndex = 1
Hint = 'Close this window'
ShortCut = 0
OnClick = exBtnClick
end
object N3: TMenuItem
Caption = '-'
GroupIndex = 1
ShortCut = 0
end
end
object DistortionFilters1: TMenuItem
Caption = '&Image'
ShortCut = 0
object Mirror1: TMenuItem
Caption = 'Mirror'
Hint = 'Mirror the image'
ShortCut = 0
OnClick = MenuItemToTab
end
object PasteImage1: TMenuItem
Caption = 'Paste Image'
ShortCut = 0
OnClick = MenuItemToTab
end
object Invert1: TMenuItem
Caption = 'Invert'
Hint = 'Invert the image'
ShortCut = 0
OnClick = MenuItemToTab
end
object Rotate1: TMenuItem
Caption = 'Rotate'
Hint = 'Rotate the image by degree'
ShortCut = 0
OnClick = MenuItemToTab
end
object Borders1: TMenuItem
Caption = 'Borders'
Hint = 'Place borders arround the image'
ShortCut = 0
OnClick = MenuItemToTab
end
object Fade1: TMenuItem
Caption = 'Border Fade'
Hint = 'Fade the image towards the border'
ShortCut = 0
OnClick = MenuItemToTab
end
object EdgeDetection1: TMenuItem
Caption = 'Edge Detection'
Hint = 'Find the edges in an image'
ShortCut = 0
OnClick = MenuItemToTab
end
object GrayArea1: TMenuItem
Caption = 'Gray Area'
Hint = 'Select an area and convert this to grayscale'
ShortCut = 0
OnClick = MenuItemToTab
end
object MakeTile1: TMenuItem
Caption = 'Tile Maker'
Hint = 'Generate an image suitable for tiling'
ShortCut = 0
OnClick = MenuItemToTab
end
object N4: TMenuItem
Caption = '-'
ShortCut = 0
end
end
object Deformation1: TMenuItem
Caption = '&Deformation'
ShortCut = 0
object Bleed1: TMenuItem
Caption = 'Bleed'
Hint = 'Bleed colors of the image'
ShortCut = 0
OnClick = MenuItemToTab
end
object Blur1: TMenuItem
Caption = 'Blur'
Hint = 'Fuzy the image'
ShortCut = 0
OnClick = MenuItemToTab
end
object Engrave1: TMenuItem
Caption = 'Engrave'
Hint = 'Engrave the image'
ShortCut = 0
OnClick = MenuItemToTab
end
object Extrude1: TMenuItem
Caption = 'Extrude'
Hint = 'Extrude the image with pyramids'
ShortCut = 0
OnClick = MenuItemToTab
end
object Jiggle1: TMenuItem
Caption = 'Jiggle'
Hint = 'Jiggle the image'
ShortCut = 0
OnClick = MenuItemToTab
end
object MotionBlur1: TMenuItem
Caption = 'Motion Blur'
Hint = 'Apply a motion effect to the image'
ShortCut = 0
OnClick = MenuItemToTab
end
object Mosaic1: TMenuItem
Caption = 'Mosaic'
Hint = 'Generate a mosiac effect'
ShortCut = 0
OnClick = MenuItemToTab
end
object Noisy1: TMenuItem
Caption = 'Noisify'
Hint = 'Place random pixels onto the image'
ShortCut = 0
OnClick = MenuItemToTab
end
object OilPaint1: TMenuItem
Caption = 'Oil Paint'
Hint = 'Generate an oil painting effect'
ShortCut = 0
OnClick = MenuItemToTab
end
object PinchHole1: TMenuItem
Caption = 'Pinch Hole'
Hint = 'Pinch a hole into the image'
ShortCut = 0
OnClick = MenuItemToTab
end
object Polar1: TMenuItem
Caption = 'Polar'
Hint = 'Apply a polar / fisheye effect'
ShortCut = 0
OnClick = MenuItemToTab
end
object PageCurl1: TMenuItem
Caption = 'Page Curl'
Hint = 'Generate a page curl on the image'
ShortCut = 0
OnClick = MenuItemToTab
end
object Spray1: TMenuItem
Caption = 'Spray'
Hint = 'Spay random colors onto the image'
ShortCut = 0
OnClick = MenuItemToTab
end
object WhirlPool1: TMenuItem
Caption = 'WhirlPool'
Hint = 'Whirl the image'
ShortCut = 0
OnClick = MenuItemToTab
end
object Wave1: TMenuItem
Caption = 'Wave'
Hint = 'Apply a wave onto the image'
ShortCut = 0
OnClick = MenuItemToTab
end
object Warp1: TMenuItem
Caption = 'Warp'
ShortCut = 0
OnClick = MenuItemToTab
end
object N5: TMenuItem
Caption = '-'
ShortCut = 0
end
end
object Correction1: TMenuItem
Caption = '&Correction'
ShortCut = 0
object AutoContrast1: TMenuItem
Caption = 'AutoContrast'
Hint = 'Find the contrast automatically'
ShortCut = 0
OnClick = MenuItemToTab
end
object Bright1: TMenuItem
Caption = 'Bright'
Hint = 'Brighten the image'
ShortCut = 0
OnClick = MenuItemToTab
end
object ColorPalette1: TMenuItem
Caption = 'Color Palette'
ShortCut = 0
OnClick = MenuItemToTab
end
object Color1: TMenuItem
Caption = 'Color'
Hint = 'Decrease the colors of the image'
ShortCut = 0
OnClick = MenuItemToTab
end
object Dark1: TMenuItem
Caption = 'Dark'
Hint = 'Darken the image'
ShortCut = 0
OnClick = MenuItemToTab
end
object Despeckle1: TMenuItem
Caption = 'Despeckle'
Hint = 'Correct the pixels of the image'
ShortCut = 0
OnClick = MenuItemToTab
end
object Enhance1: TMenuItem
Caption = 'Enhance'
Hint = 'Contrast, bright, and gamma correct the image'
ShortCut = 0
OnClick = MenuItemToTab
end
object Gamma1: TMenuItem
Caption = 'Gamma'
Hint = 'gamma correct the image'
ShortCut = 0
OnClick = MenuItemToTab
end
object HalfTone1: TMenuItem
Caption = 'HalfTone'
Hint = 'Apply a Halftone onto the image'
ShortCut = 0
OnClick = MenuItemToTab
end
object HueSaturation1: TMenuItem
Caption = 'Hue and Saturation'
Hint = 'Coorect the Hue/Saturation and Value to the image'
ShortCut = 0
OnClick = MenuItemToTab
end
object Sharp1: TMenuItem
Caption = 'Sharp'
Hint = 'Sharpen the image'
ShortCut = 0
OnClick = MenuItemToTab
end
object Soft1: TMenuItem
Caption = 'Soft'
Hint = 'Soften the image'
ShortCut = 0
OnClick = MenuItemToTab
end
object Threshold1: TMenuItem
Caption = 'Threshold'
Hint = 'Apply a threshold value onto the image'
ShortCut = 0
OnClick = MenuItemToTab
end
object N6: TMenuItem
Caption = '-'
ShortCut = 0
end
end
object Transitions1: TMenuItem
Caption = '&Transitions'
ShortCut = 0
OnClick = Transitions1Click
end
end
object ColorDialog: TColorDialog
Ctl3D = True
CustomColors.Strings = (
'ColorA=141414'
'ColorB=3C3C3C'
'ColorC=646464'
'ColorD=8C8C8C'
'ColorE=FFB4B4B4'
'ColorF=FFDCDCDC'
'ColorG=FFF0F0F0'
'ColorH=FFF0F0F0'
'ColorI=282828'
'ColorJ=505050'
'ColorK=787878'
'ColorL=FFA0A0A0'
'ColorM=FFC8C8C8'
'ColorN=FFF0F0F0'
'ColorO=FFF0F0F0'
'ColorP=FFF0F0F0')
Options = [cdFullOpen, cdAnyColor]
Left = 48
Top = 39
end
object PasteTimer: TTimer
Interval = 3000
OnTimer = PasteTimerTimer
Left = 81
Top = 39
end
object PalOpen: TOpenDialog
DefaultExt = 'IPL'
FileEditStyle = fsEdit
Filter = 'ImageLib 3.0 Palette|*.ILP'
Options = [ofExtensionDifferent, ofPathMustExist, ofFileMustExist]
Left = 17
Top = 76
end
object PalSave: TSaveDialog
DefaultExt = 'IPL'
FileEditStyle = fsEdit
Filter = 'ImageLib 3.0 Palette|*.ILP'
Options = [ofPathMustExist, ofCreatePrompt]
Left = 49
Top = 76
end
end
