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