272 lines
5.7 KiB
Plaintext
272 lines
5.7 KiB
Plaintext
object MainForm: TMainForm
|
|
Left = 208
|
|
Top = 238
|
|
Caption = 'ImageEn Digital Camera Raw Demo - www.ImageEn.com'
|
|
ClientHeight = 604
|
|
ClientWidth = 780
|
|
Color = clAppWorkSpace
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clBlack
|
|
Font.Height = -11
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = []
|
|
OldCreateOrder = True
|
|
Position = poScreenCenter
|
|
OnCreate = FormCreate
|
|
OnShow = FormShow
|
|
PixelsPerInch = 96
|
|
TextHeight = 13
|
|
object ImageEnView1: TImageEnView
|
|
Left = 136
|
|
Top = 0
|
|
Width = 644
|
|
Height = 604
|
|
Cursor = crDefault
|
|
Background = clBlack
|
|
BorderStyle = bsNone
|
|
MouseInteract = [miSelect]
|
|
SelectionBase = iesbBitmap
|
|
OnProgress = ImageEnView1Progress
|
|
OnFinishWork = ImageEnView1FinishWork
|
|
EnableInteractionHints = True
|
|
Align = alClient
|
|
TabOrder = 0
|
|
end
|
|
object pnlLeft: TPanel
|
|
Left = 0
|
|
Top = 0
|
|
Width = 136
|
|
Height = 604
|
|
Align = alLeft
|
|
BevelOuter = bvNone
|
|
TabOrder = 1
|
|
DesignSize = (
|
|
136
|
|
604)
|
|
object lblOptions: TLabel
|
|
Left = 10
|
|
Top = 192
|
|
Width = 43
|
|
Height = 13
|
|
Caption = 'Options'
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clBlack
|
|
Font.Height = -11
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = [fsBold]
|
|
ParentFont = False
|
|
end
|
|
object lblGamma: TLabel
|
|
Left = 11
|
|
Top = 363
|
|
Width = 39
|
|
Height = 13
|
|
Caption = 'Gamma:'
|
|
end
|
|
object lblSize: TLabel
|
|
Left = 10
|
|
Top = 216
|
|
Width = 23
|
|
Height = 13
|
|
Caption = 'Size:'
|
|
end
|
|
object lblCamera: TLabel
|
|
Left = 9
|
|
Top = 437
|
|
Width = 41
|
|
Height = 13
|
|
Caption = 'Camera:'
|
|
end
|
|
object lblExtraParams: TLabel
|
|
Left = 11
|
|
Top = 392
|
|
Width = 68
|
|
Height = 13
|
|
Caption = 'Extra Params:'
|
|
end
|
|
object btnOpen: TBitBtn
|
|
Left = 10
|
|
Top = 8
|
|
Width = 113
|
|
Height = 25
|
|
Caption = 'Open Image...'
|
|
TabOrder = 0
|
|
OnClick = btnOpenClick
|
|
end
|
|
object btnZoomIn: TBitBtn
|
|
Left = 10
|
|
Top = 75
|
|
Width = 113
|
|
Height = 25
|
|
Action = ZoomIn
|
|
Caption = 'Zoom In'
|
|
TabOrder = 1
|
|
end
|
|
object BtnZoomOut: TBitBtn
|
|
Left = 10
|
|
Top = 106
|
|
Width = 113
|
|
Height = 25
|
|
Action = ZoomOut
|
|
Caption = 'Zoom Out'
|
|
TabOrder = 2
|
|
end
|
|
object btnZoomFull: TBitBtn
|
|
Left = 10
|
|
Top = 137
|
|
Width = 113
|
|
Height = 25
|
|
Action = ZoomFullSize
|
|
Caption = 'Zoom to Full Size'
|
|
TabOrder = 3
|
|
end
|
|
object btnExit: TBitBtn
|
|
Left = 10
|
|
Top = 571
|
|
Width = 113
|
|
Height = 25
|
|
Action = ExitApp
|
|
Anchors = [akLeft, akBottom]
|
|
Caption = 'E&xit'
|
|
TabOrder = 14
|
|
end
|
|
object pbrLoading: TProgressBar
|
|
Left = 10
|
|
Top = 39
|
|
Width = 113
|
|
Height = 17
|
|
TabOrder = 4
|
|
Visible = False
|
|
end
|
|
object edtCamera: TEdit
|
|
Left = 21
|
|
Top = 453
|
|
Width = 106
|
|
Height = 21
|
|
Color = clBtnFace
|
|
ReadOnly = True
|
|
TabOrder = 13
|
|
end
|
|
object trkGamma: TTrackBar
|
|
Left = 52
|
|
Top = 357
|
|
Width = 82
|
|
Height = 25
|
|
Max = 100
|
|
Frequency = 5
|
|
TabOrder = 11
|
|
OnChange = ControlChange
|
|
end
|
|
object cmbSize: TComboBox
|
|
Left = 39
|
|
Top = 212
|
|
Width = 91
|
|
Height = 21
|
|
Style = csDropDownList
|
|
ItemHeight = 13
|
|
ItemIndex = 0
|
|
TabOrder = 5
|
|
Text = 'Thumbnail'
|
|
OnClick = ControlChange
|
|
Items.Strings = (
|
|
'Thumbnail'
|
|
'Half size'
|
|
'Full size')
|
|
end
|
|
object edtExtraParams: TEdit
|
|
Left = 21
|
|
Top = 408
|
|
Width = 106
|
|
Height = 21
|
|
TabOrder = 12
|
|
OnChange = ControlChange
|
|
end
|
|
object chkFourColorRGB: TCheckBox
|
|
Left = 10
|
|
Top = 334
|
|
Width = 120
|
|
Height = 17
|
|
Caption = 'Four Color RGB'
|
|
TabOrder = 10
|
|
OnClick = ControlChange
|
|
end
|
|
object chkQuickInterpolate: TCheckBox
|
|
Left = 10
|
|
Top = 310
|
|
Width = 120
|
|
Height = 17
|
|
Caption = 'Quick Interpolate'
|
|
TabOrder = 9
|
|
OnClick = ControlChange
|
|
end
|
|
object chkUseAutoWB: TCheckBox
|
|
Left = 10
|
|
Top = 262
|
|
Width = 120
|
|
Height = 17
|
|
Caption = 'Auto White Balance'
|
|
TabOrder = 7
|
|
OnClick = ControlChange
|
|
end
|
|
object chkUseCameraWB: TCheckBox
|
|
Left = 10
|
|
Top = 286
|
|
Width = 120
|
|
Height = 17
|
|
Caption = 'Use Camera WB'
|
|
TabOrder = 8
|
|
OnClick = ControlChange
|
|
end
|
|
object chkAutoAdjustColors: TCheckBox
|
|
Left = 10
|
|
Top = 239
|
|
Width = 120
|
|
Height = 17
|
|
Caption = 'Auto Adjust Colors'
|
|
TabOrder = 6
|
|
OnClick = ControlChange
|
|
end
|
|
end
|
|
object ActionList1: TActionList
|
|
Left = 221
|
|
Top = 26
|
|
object ZoomIn: TImageEnViewZoomIn
|
|
Category = 'ImageEnView'
|
|
Caption = 'Zoom In'
|
|
Enabled = False
|
|
Hint = 'Enlarge the image'
|
|
ImageIndex = 22
|
|
ImageEnView = ImageEnView1
|
|
end
|
|
object ZoomOut: TImageEnViewZoomOut
|
|
Category = 'ImageEnView'
|
|
Caption = 'Zoom Out'
|
|
Enabled = False
|
|
Hint = 'Display the image smaller'
|
|
ImageIndex = 23
|
|
ImageEnView = ImageEnView1
|
|
end
|
|
object ZoomFullSize: TImageEnViewZoomFullSize
|
|
Category = 'ImageEnView'
|
|
Caption = 'Zoom to Full Size'
|
|
Enabled = False
|
|
Hint = 'Display the image at full size (100% zoom)'
|
|
ImageIndex = 24
|
|
ImageEnView = ImageEnView1
|
|
end
|
|
object ExitApp: TFileExit
|
|
Category = 'File'
|
|
Caption = 'E&xit'
|
|
Hint = 'Exit|Quits the application'
|
|
ImageIndex = 43
|
|
end
|
|
end
|
|
object tmrReload: TTimer
|
|
Enabled = False
|
|
Interval = 500
|
|
OnTimer = tmrReloadTimer
|
|
Left = 152
|
|
Top = 24
|
|
end
|
|
end
|