BSOne.SFC/EM.Lib/ImageEn_SRC/Demos/ImageEditing/AutoEnhance/umain.dfm

527 lines
12 KiB
Plaintext

object MainForm: TMainForm
Left = 300
Top = 156
Caption = 'Automatic Image Enhancement'
ClientHeight = 562
ClientWidth = 885
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
OldCreateOrder = True
Position = poScreenCenter
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Panel1: TPanel
Left = 657
Top = 39
Width = 228
Height = 523
Align = alRight
BevelOuter = bvNone
TabOrder = 0
object PageControl1: TPageControl
Left = 8
Top = 8
Width = 209
Height = 257
ActivePage = TabSheet4
MultiLine = True
TabOrder = 0
object TabSheet1: TTabSheet
Caption = 'Enhancement 1'
object GroupBox2: TGroupBox
Left = 8
Top = 1
Width = 185
Height = 149
Caption = ' Automatic Image Enhancement 1 '
TabOrder = 0
object Label2: TLabel
Left = 7
Top = 56
Width = 120
Height = 13
Caption = 'Subsampled Size (4...inf)'
end
object Label3: TLabel
Left = 7
Top = 79
Width = 105
Height = 13
Caption = 'Slope (0..90 degrees)'
end
object Label4: TLabel
Left = 7
Top = 102
Width = 60
Height = 13
Caption = 'Cut (0..100)'
end
object Label5: TLabel
Left = 7
Top = 125
Width = 90
Height = 13
Caption = 'Neightbour (1..inf)'
end
object Button3: TButton
Left = 16
Top = 22
Width = 153
Height = 23
Caption = 'Execute'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
TabOrder = 0
OnClick = Button3Click
end
object Edit1: TEdit
Left = 133
Top = 52
Width = 36
Height = 21
ParentShowHint = False
ShowHint = False
TabOrder = 1
Text = '60'
end
object Edit2: TEdit
Left = 133
Top = 75
Width = 36
Height = 21
ParentShowHint = False
ShowHint = False
TabOrder = 2
Text = '20'
end
object Edit3: TEdit
Left = 133
Top = 98
Width = 36
Height = 21
ParentShowHint = False
ShowHint = False
TabOrder = 3
Text = '25'
end
object Edit4: TEdit
Left = 133
Top = 121
Width = 36
Height = 21
ParentShowHint = False
ShowHint = False
TabOrder = 4
Text = '2'
end
end
end
object TabSheet2: TTabSheet
Caption = 'Enhancement 2'
object GroupBox5: TGroupBox
Left = 8
Top = 1
Width = 185
Height = 180
Caption = ' Automatic Image Enhancement 2 '
TabOrder = 0
object Label8: TLabel
Left = 7
Top = 64
Width = 94
Height = 13
Caption = 'Scale Count (1..inf)'
end
object Label9: TLabel
Left = 7
Top = 88
Width = 88
Height = 13
Caption = 'Scale Curve (0..2)'
end
object Label10: TLabel
Left = 7
Top = 112
Width = 92
Height = 13
Caption = 'Variance (0.000...)'
end
object Label11: TLabel
Left = 7
Top = 136
Width = 92
Height = 13
Caption = 'Scale High (4..250)'
end
object Button8: TButton
Left = 16
Top = 24
Width = 153
Height = 23
Caption = 'Execute'
TabOrder = 0
OnClick = Button8Click
end
object Edit7: TEdit
Left = 133
Top = 60
Width = 36
Height = 21
ParentShowHint = False
ShowHint = False
TabOrder = 1
Text = '3'
end
object Edit8: TEdit
Left = 133
Top = 84
Width = 36
Height = 21
ParentShowHint = False
ShowHint = False
TabOrder = 2
Text = '2'
end
object Edit9: TEdit
Left = 133
Top = 108
Width = 36
Height = 21
ParentShowHint = False
ShowHint = False
TabOrder = 3
Text = '1.8'
end
object Edit10: TEdit
Left = 133
Top = 132
Width = 36
Height = 21
ParentShowHint = False
ShowHint = False
TabOrder = 4
Text = '200'
end
object CheckBox1: TCheckBox
Left = 6
Top = 159
Width = 138
Height = 17
Alignment = taLeftJustify
Caption = 'Only luminance'
Checked = True
State = cbChecked
TabOrder = 5
end
end
end
object TabSheet3: TTabSheet
Caption = 'White Balance'
object GroupBox3: TGroupBox
Left = 8
Top = 1
Width = 185
Height = 103
Caption = ' White Balance '
TabOrder = 0
object Button4: TButton
Left = 16
Top = 18
Width = 153
Height = 23
Caption = 'Gray World'
TabOrder = 0
OnClick = Button4Click
end
object Button5: TButton
Left = 16
Top = 45
Width = 153
Height = 23
Caption = 'Auto White'
TabOrder = 1
OnClick = Button5Click
end
object Button6: TButton
Left = 16
Top = 72
Width = 153
Height = 23
Caption = 'Gain Offset'
TabOrder = 2
OnClick = Button6Click
end
end
end
object TabSheet4: TTabSheet
Caption = 'Sharpen'
object GroupBox4: TGroupBox
Left = 8
Top = 1
Width = 185
Height = 113
Caption = ' Auto Sharpen '
TabOrder = 0
object Label6: TLabel
Left = 7
Top = 50
Width = 43
Height = 13
Caption = 'Intensity'
end
object Label7: TLabel
Left = 7
Top = 74
Width = 23
Height = 13
Caption = 'Rate'
end
object Button7: TButton
Left = 16
Top = 18
Width = 153
Height = 23
Caption = 'Execute'
TabOrder = 0
OnClick = Button7Click
end
object Edit5: TEdit
Left = 133
Top = 46
Width = 36
Height = 21
Hint = 'Allowed: 1...INF'
ParentShowHint = False
ShowHint = True
TabOrder = 1
Text = '68'
end
object Edit6: TEdit
Left = 133
Top = 70
Width = 36
Height = 21
Hint = 'Allowed: 1...1000'
ParentShowHint = False
ShowHint = True
TabOrder = 2
Text = '35'
end
end
end
object TabSheet5: TTabSheet
Caption = 'Contrast'
object Label12: TLabel
Left = 8
Top = 48
Width = 80
Height = 13
Caption = 'Amount (0..100)'
end
object Edit11: TEdit
Left = 96
Top = 44
Width = 49
Height = 21
TabOrder = 0
Text = '30'
end
object Button11: TButton
Left = 24
Top = 10
Width = 153
Height = 23
Caption = 'Execute'
TabOrder = 1
OnClick = Button11Click
end
end
object TabSheet6: TTabSheet
Caption = 'Adjust Luma/Sat hist.'
object Label13: TLabel
Left = 8
Top = 48
Width = 93
Height = 13
Caption = 'Saturation (0..100)'
end
object Label14: TLabel
Left = 8
Top = 80
Width = 93
Height = 13
Caption = 'Luminance (0..100)'
end
object Button10: TButton
Left = 24
Top = 10
Width = 153
Height = 23
Caption = 'Execute'
TabOrder = 0
OnClick = Button10Click
end
object Edit12: TEdit
Left = 112
Top = 44
Width = 49
Height = 21
TabOrder = 1
Text = '10'
end
object Edit13: TEdit
Left = 112
Top = 76
Width = 49
Height = 21
TabOrder = 2
Text = '30'
end
end
object TabSheet7: TTabSheet
Caption = 'Enhancement 3'
ImageIndex = 6
object GroupBox1: TGroupBox
Left = 8
Top = 8
Width = 177
Height = 161
Caption = ' Automatic Image Enhancement 3 '
TabOrder = 0
object Label15: TLabel
Left = 8
Top = 72
Width = 35
Height = 13
Caption = 'Gamma'
end
object Label16: TLabel
Left = 8
Top = 96
Width = 50
Height = 13
Caption = 'Saturation'
end
object Edit14: TEdit
Left = 96
Top = 69
Width = 62
Height = 21
TabOrder = 0
Text = '0.35'
end
object Button12: TButton
Left = 16
Top = 26
Width = 153
Height = 23
Caption = 'Execute'
TabOrder = 1
OnClick = Button12Click
end
object Edit15: TEdit
Left = 96
Top = 93
Width = 62
Height = 21
TabOrder = 2
Text = '80'
end
end
end
end
end
object ImageEnView1: TImageEnView
Left = 0
Top = 39
Width = 657
Height = 523
ParentCtl3D = False
OnProgress = ImageEnView1Progress
EnableInteractionHints = True
Align = alClient
TabOrder = 1
end
object Panel2: TPanel
Left = 0
Top = 0
Width = 885
Height = 39
Align = alTop
BevelOuter = bvNone
TabOrder = 2
object Label1: TLabel
Left = 224
Top = 11
Width = 66
Height = 13
Caption = 'Zoom (100%)'
end
object TrackBar1: TTrackBar
Left = 292
Top = 4
Width = 173
Height = 33
Max = 2000
Min = 1
Frequency = 100
Position = 100
TabOrder = 0
OnChange = TrackBar1Change
end
object Panel3: TPanel
Left = 700
Top = 0
Width = 185
Height = 39
Align = alRight
BevelOuter = bvNone
TabOrder = 1
object Button9: TButton
Left = 40
Top = 6
Width = 75
Height = 25
Caption = 'Undo'
TabOrder = 0
OnClick = Button9Click
end
end
object Button1: TButton
Left = 16
Top = 8
Width = 75
Height = 25
Caption = 'Open...'
TabOrder = 2
OnClick = Button1Click
end
object Button2: TButton
Left = 96
Top = 7
Width = 75
Height = 25
Caption = 'Reload'
TabOrder = 3
OnClick = Button2Click
end
object ProgressBar1: TProgressBar
Left = 485
Top = 8
Width = 193
Height = 21
TabOrder = 4
Visible = False
end
end
end