You've already forked lazarus-ccr
f39aad84fe
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@8201 8e941d3f-bd1b-0410-a28a-d453659cc2b4
929 lines
26 KiB
Plaintext
929 lines
26 KiB
Plaintext
object MainForm: TMainForm
|
|
Left = 430
|
|
Height = 714
|
|
Top = 141
|
|
Width = 926
|
|
Caption = 'Metadata viewer'
|
|
ClientHeight = 714
|
|
ClientWidth = 926
|
|
OnCreate = FormCreate
|
|
OnDestroy = FormDestroy
|
|
ShowHint = True
|
|
LCLVersion = '2.3.0.0'
|
|
object ShellPanel: TPanel
|
|
Left = 0
|
|
Height = 691
|
|
Top = 0
|
|
Width = 274
|
|
Align = alLeft
|
|
BevelOuter = bvNone
|
|
ClientHeight = 691
|
|
ClientWidth = 274
|
|
TabOrder = 0
|
|
object ShellTreeView: TShellTreeView
|
|
Left = 0
|
|
Height = 269
|
|
Hint = 'Navigate to the folder with your images.'
|
|
Top = 0
|
|
Width = 274
|
|
Align = alTop
|
|
FileSortType = fstFoldersFirst
|
|
HideSelection = False
|
|
ReadOnly = True
|
|
TabOrder = 0
|
|
OnGetImageIndex = ShellTreeViewGetImageIndex
|
|
OnSelectionChanged = ShellTreeViewSelectionChanged
|
|
Options = [tvoAutoItemHeight, tvoKeepCollapsedNodes, tvoReadOnly, tvoShowButtons, tvoShowLines, tvoShowRoot, tvoToolTips, tvoThemedDraw]
|
|
ObjectTypes = [otFolders]
|
|
ShellListView = ShellListView
|
|
end
|
|
object Splitter1: TSplitter
|
|
Cursor = crVSplit
|
|
Left = 0
|
|
Height = 5
|
|
Top = 269
|
|
Width = 274
|
|
Align = alTop
|
|
ResizeAnchor = akTop
|
|
end
|
|
object ShellListView: TShellListView
|
|
Left = 0
|
|
Height = 250
|
|
Hint = 'Select the image for which you want to see the metadata'
|
|
Top = 274
|
|
Width = 274
|
|
Align = alClient
|
|
Color = clDefault
|
|
HideSelection = False
|
|
Mask = '*.jpg;*.jpeg;*.jpe;*.tiff;*.tif'
|
|
ReadOnly = True
|
|
SortColumn = 0
|
|
TabOrder = 2
|
|
OnSelectItem = ShellListViewSelectItem
|
|
ObjectTypes = [otNonFolders]
|
|
ShellTreeView = ShellTreeView
|
|
end
|
|
object PreviewImage: TImage
|
|
Left = 0
|
|
Height = 144
|
|
Hint = 'Thumbnail image embedded in the image file'
|
|
Top = 547
|
|
Width = 274
|
|
Align = alBottom
|
|
Center = True
|
|
Proportional = True
|
|
Stretch = True
|
|
end
|
|
object Panel4: TPanel
|
|
Left = 0
|
|
Height = 23
|
|
Top = 524
|
|
Width = 274
|
|
Align = alBottom
|
|
AutoSize = True
|
|
BevelOuter = bvNone
|
|
ClientHeight = 23
|
|
ClientWidth = 274
|
|
TabOrder = 3
|
|
object Label1: TLabel
|
|
AnchorSideLeft.Control = Panel4
|
|
AnchorSideTop.Control = Panel4
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 8
|
|
Height = 15
|
|
Top = 4
|
|
Width = 93
|
|
BorderSpacing.Left = 8
|
|
BorderSpacing.Top = 4
|
|
BorderSpacing.Bottom = 4
|
|
Caption = 'Thumbnail image'
|
|
end
|
|
end
|
|
end
|
|
object Splitter2: TSplitter
|
|
Left = 274
|
|
Height = 691
|
|
Top = 0
|
|
Width = 5
|
|
end
|
|
object Panel2: TPanel
|
|
Left = 279
|
|
Height = 691
|
|
Top = 0
|
|
Width = 647
|
|
Align = alClient
|
|
BevelOuter = bvNone
|
|
ClientHeight = 691
|
|
ClientWidth = 647
|
|
TabOrder = 2
|
|
object Panel3: TPanel
|
|
Left = 0
|
|
Height = 23
|
|
Top = 0
|
|
Width = 647
|
|
Align = alTop
|
|
AutoSize = True
|
|
BevelOuter = bvNone
|
|
BorderWidth = 4
|
|
ClientHeight = 23
|
|
ClientWidth = 647
|
|
TabOrder = 0
|
|
object FilenameInfo: TLabel
|
|
Left = 4
|
|
Height = 15
|
|
Top = 4
|
|
Width = 24
|
|
Caption = 'File: '
|
|
end
|
|
end
|
|
object PageControl1: TPageControl
|
|
Left = 0
|
|
Height = 539
|
|
Top = 23
|
|
Width = 647
|
|
ActivePage = PgMetadata
|
|
Align = alClient
|
|
TabIndex = 0
|
|
TabOrder = 1
|
|
OnChange = PageControl1Change
|
|
object PgMetadata: TTabSheet
|
|
Caption = 'EXIF, IPTC'
|
|
ClientHeight = 511
|
|
ClientWidth = 639
|
|
object TagListView: TListView
|
|
Left = 0
|
|
Height = 491
|
|
Top = 0
|
|
Width = 639
|
|
Align = alClient
|
|
AutoSort = False
|
|
Columns = <
|
|
item
|
|
Caption = 'Group'
|
|
Width = 120
|
|
end
|
|
item
|
|
Caption = 'Tag ID'
|
|
Width = 60
|
|
end
|
|
item
|
|
Caption = 'Property'
|
|
Width = 220
|
|
end
|
|
item
|
|
AutoSize = True
|
|
Caption = 'Value'
|
|
Width = 44
|
|
end>
|
|
HideSelection = False
|
|
ReadOnly = True
|
|
RowSelect = True
|
|
SortColumn = 0
|
|
SortType = stText
|
|
TabOrder = 0
|
|
ViewStyle = vsReport
|
|
OnCompare = TagListViewCompare
|
|
OnSelectItem = TagListViewSelectItem
|
|
end
|
|
object Panel1: TPanel
|
|
Left = 0
|
|
Height = 20
|
|
Top = 491
|
|
Width = 639
|
|
Align = alBottom
|
|
AutoSize = True
|
|
BevelOuter = bvNone
|
|
ClientHeight = 20
|
|
ClientWidth = 639
|
|
TabOrder = 1
|
|
object CbDecodeMakerNotes: TCheckBox
|
|
AnchorSideLeft.Control = Panel1
|
|
AnchorSideTop.Control = Panel1
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 0
|
|
Height = 19
|
|
Hint = 'Try to decode information in the MakerNote tag if possible'
|
|
Top = 1
|
|
Width = 125
|
|
Caption = 'Decode MakerNotes'
|
|
Checked = True
|
|
State = cbChecked
|
|
TabOrder = 0
|
|
end
|
|
object CbShowTagIDs: TCheckBox
|
|
AnchorSideLeft.Control = CbDecodeMakerNotes
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = CbDecodeMakerNotes
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 133
|
|
Height = 19
|
|
Hint = 'Show the numerical ID of every tag'
|
|
Top = 1
|
|
Width = 86
|
|
BorderSpacing.Left = 8
|
|
Caption = 'Show tag IDs'
|
|
Checked = True
|
|
OnChange = CbShowTagIDsChange
|
|
State = cbChecked
|
|
TabOrder = 1
|
|
end
|
|
object CbShowParentTagID: TCheckBox
|
|
AnchorSideLeft.Control = CbShowTagIDs
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = CbDecodeMakerNotes
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 227
|
|
Height = 19
|
|
Hint = 'Show the ID of the parent tag.'#13#10'List will be updated when the next file is loaded.'
|
|
Top = 1
|
|
Width = 92
|
|
BorderSpacing.Left = 8
|
|
Caption = 'with parent ID'
|
|
TabOrder = 2
|
|
end
|
|
end
|
|
end
|
|
object PgXMP: TTabSheet
|
|
Caption = 'XMP'
|
|
ClientHeight = 511
|
|
ClientWidth = 639
|
|
inline SynEdit: TSynEdit
|
|
Left = 0
|
|
Height = 231
|
|
Top = 280
|
|
Width = 639
|
|
Align = alClient
|
|
Font.Height = -13
|
|
Font.Name = 'Courier New'
|
|
Font.Pitch = fpFixed
|
|
Font.Quality = fqNonAntialiased
|
|
ParentColor = False
|
|
ParentFont = False
|
|
TabOrder = 0
|
|
Gutter.Width = 57
|
|
Gutter.MouseActions = <>
|
|
RightGutter.Width = 0
|
|
RightGutter.MouseActions = <>
|
|
Highlighter = SynXMLSyn
|
|
Keystrokes = <
|
|
item
|
|
Command = ecUp
|
|
ShortCut = 38
|
|
end
|
|
item
|
|
Command = ecSelUp
|
|
ShortCut = 8230
|
|
end
|
|
item
|
|
Command = ecScrollUp
|
|
ShortCut = 16422
|
|
end
|
|
item
|
|
Command = ecDown
|
|
ShortCut = 40
|
|
end
|
|
item
|
|
Command = ecSelDown
|
|
ShortCut = 8232
|
|
end
|
|
item
|
|
Command = ecScrollDown
|
|
ShortCut = 16424
|
|
end
|
|
item
|
|
Command = ecLeft
|
|
ShortCut = 37
|
|
end
|
|
item
|
|
Command = ecSelLeft
|
|
ShortCut = 8229
|
|
end
|
|
item
|
|
Command = ecWordLeft
|
|
ShortCut = 16421
|
|
end
|
|
item
|
|
Command = ecSelWordLeft
|
|
ShortCut = 24613
|
|
end
|
|
item
|
|
Command = ecRight
|
|
ShortCut = 39
|
|
end
|
|
item
|
|
Command = ecSelRight
|
|
ShortCut = 8231
|
|
end
|
|
item
|
|
Command = ecWordRight
|
|
ShortCut = 16423
|
|
end
|
|
item
|
|
Command = ecSelWordRight
|
|
ShortCut = 24615
|
|
end
|
|
item
|
|
Command = ecPageDown
|
|
ShortCut = 34
|
|
end
|
|
item
|
|
Command = ecSelPageDown
|
|
ShortCut = 8226
|
|
end
|
|
item
|
|
Command = ecPageBottom
|
|
ShortCut = 16418
|
|
end
|
|
item
|
|
Command = ecSelPageBottom
|
|
ShortCut = 24610
|
|
end
|
|
item
|
|
Command = ecPageUp
|
|
ShortCut = 33
|
|
end
|
|
item
|
|
Command = ecSelPageUp
|
|
ShortCut = 8225
|
|
end
|
|
item
|
|
Command = ecPageTop
|
|
ShortCut = 16417
|
|
end
|
|
item
|
|
Command = ecSelPageTop
|
|
ShortCut = 24609
|
|
end
|
|
item
|
|
Command = ecLineStart
|
|
ShortCut = 36
|
|
end
|
|
item
|
|
Command = ecSelLineStart
|
|
ShortCut = 8228
|
|
end
|
|
item
|
|
Command = ecEditorTop
|
|
ShortCut = 16420
|
|
end
|
|
item
|
|
Command = ecSelEditorTop
|
|
ShortCut = 24612
|
|
end
|
|
item
|
|
Command = ecLineEnd
|
|
ShortCut = 35
|
|
end
|
|
item
|
|
Command = ecSelLineEnd
|
|
ShortCut = 8227
|
|
end
|
|
item
|
|
Command = ecEditorBottom
|
|
ShortCut = 16419
|
|
end
|
|
item
|
|
Command = ecSelEditorBottom
|
|
ShortCut = 24611
|
|
end
|
|
item
|
|
Command = ecToggleMode
|
|
ShortCut = 45
|
|
end
|
|
item
|
|
Command = ecCopy
|
|
ShortCut = 16429
|
|
end
|
|
item
|
|
Command = ecPaste
|
|
ShortCut = 8237
|
|
end
|
|
item
|
|
Command = ecDeleteChar
|
|
ShortCut = 46
|
|
end
|
|
item
|
|
Command = ecCut
|
|
ShortCut = 8238
|
|
end
|
|
item
|
|
Command = ecDeleteLastChar
|
|
ShortCut = 8
|
|
end
|
|
item
|
|
Command = ecDeleteLastChar
|
|
ShortCut = 8200
|
|
end
|
|
item
|
|
Command = ecDeleteLastWord
|
|
ShortCut = 16392
|
|
end
|
|
item
|
|
Command = ecUndo
|
|
ShortCut = 32776
|
|
end
|
|
item
|
|
Command = ecRedo
|
|
ShortCut = 40968
|
|
end
|
|
item
|
|
Command = ecLineBreak
|
|
ShortCut = 13
|
|
end
|
|
item
|
|
Command = ecSelectAll
|
|
ShortCut = 16449
|
|
end
|
|
item
|
|
Command = ecCopy
|
|
ShortCut = 16451
|
|
end
|
|
item
|
|
Command = ecBlockIndent
|
|
ShortCut = 24649
|
|
end
|
|
item
|
|
Command = ecLineBreak
|
|
ShortCut = 16461
|
|
end
|
|
item
|
|
Command = ecInsertLine
|
|
ShortCut = 16462
|
|
end
|
|
item
|
|
Command = ecDeleteWord
|
|
ShortCut = 16468
|
|
end
|
|
item
|
|
Command = ecBlockUnindent
|
|
ShortCut = 24661
|
|
end
|
|
item
|
|
Command = ecPaste
|
|
ShortCut = 16470
|
|
end
|
|
item
|
|
Command = ecCut
|
|
ShortCut = 16472
|
|
end
|
|
item
|
|
Command = ecDeleteLine
|
|
ShortCut = 16473
|
|
end
|
|
item
|
|
Command = ecDeleteEOL
|
|
ShortCut = 24665
|
|
end
|
|
item
|
|
Command = ecUndo
|
|
ShortCut = 16474
|
|
end
|
|
item
|
|
Command = ecRedo
|
|
ShortCut = 24666
|
|
end
|
|
item
|
|
Command = ecGotoMarker0
|
|
ShortCut = 16432
|
|
end
|
|
item
|
|
Command = ecGotoMarker1
|
|
ShortCut = 16433
|
|
end
|
|
item
|
|
Command = ecGotoMarker2
|
|
ShortCut = 16434
|
|
end
|
|
item
|
|
Command = ecGotoMarker3
|
|
ShortCut = 16435
|
|
end
|
|
item
|
|
Command = ecGotoMarker4
|
|
ShortCut = 16436
|
|
end
|
|
item
|
|
Command = ecGotoMarker5
|
|
ShortCut = 16437
|
|
end
|
|
item
|
|
Command = ecGotoMarker6
|
|
ShortCut = 16438
|
|
end
|
|
item
|
|
Command = ecGotoMarker7
|
|
ShortCut = 16439
|
|
end
|
|
item
|
|
Command = ecGotoMarker8
|
|
ShortCut = 16440
|
|
end
|
|
item
|
|
Command = ecGotoMarker9
|
|
ShortCut = 16441
|
|
end
|
|
item
|
|
Command = ecSetMarker0
|
|
ShortCut = 24624
|
|
end
|
|
item
|
|
Command = ecSetMarker1
|
|
ShortCut = 24625
|
|
end
|
|
item
|
|
Command = ecSetMarker2
|
|
ShortCut = 24626
|
|
end
|
|
item
|
|
Command = ecSetMarker3
|
|
ShortCut = 24627
|
|
end
|
|
item
|
|
Command = ecSetMarker4
|
|
ShortCut = 24628
|
|
end
|
|
item
|
|
Command = ecSetMarker5
|
|
ShortCut = 24629
|
|
end
|
|
item
|
|
Command = ecSetMarker6
|
|
ShortCut = 24630
|
|
end
|
|
item
|
|
Command = ecSetMarker7
|
|
ShortCut = 24631
|
|
end
|
|
item
|
|
Command = ecSetMarker8
|
|
ShortCut = 24632
|
|
end
|
|
item
|
|
Command = ecSetMarker9
|
|
ShortCut = 24633
|
|
end
|
|
item
|
|
Command = EcFoldLevel1
|
|
ShortCut = 41009
|
|
end
|
|
item
|
|
Command = EcFoldLevel2
|
|
ShortCut = 41010
|
|
end
|
|
item
|
|
Command = EcFoldLevel3
|
|
ShortCut = 41011
|
|
end
|
|
item
|
|
Command = EcFoldLevel4
|
|
ShortCut = 41012
|
|
end
|
|
item
|
|
Command = EcFoldLevel5
|
|
ShortCut = 41013
|
|
end
|
|
item
|
|
Command = EcFoldLevel6
|
|
ShortCut = 41014
|
|
end
|
|
item
|
|
Command = EcFoldLevel7
|
|
ShortCut = 41015
|
|
end
|
|
item
|
|
Command = EcFoldLevel8
|
|
ShortCut = 41016
|
|
end
|
|
item
|
|
Command = EcFoldLevel9
|
|
ShortCut = 41017
|
|
end
|
|
item
|
|
Command = EcFoldLevel0
|
|
ShortCut = 41008
|
|
end
|
|
item
|
|
Command = EcFoldCurrent
|
|
ShortCut = 41005
|
|
end
|
|
item
|
|
Command = EcUnFoldCurrent
|
|
ShortCut = 41003
|
|
end
|
|
item
|
|
Command = EcToggleMarkupWord
|
|
ShortCut = 32845
|
|
end
|
|
item
|
|
Command = ecNormalSelect
|
|
ShortCut = 24654
|
|
end
|
|
item
|
|
Command = ecColumnSelect
|
|
ShortCut = 24643
|
|
end
|
|
item
|
|
Command = ecLineSelect
|
|
ShortCut = 24652
|
|
end
|
|
item
|
|
Command = ecTab
|
|
ShortCut = 9
|
|
end
|
|
item
|
|
Command = ecShiftTab
|
|
ShortCut = 8201
|
|
end
|
|
item
|
|
Command = ecMatchBracket
|
|
ShortCut = 24642
|
|
end
|
|
item
|
|
Command = ecColSelUp
|
|
ShortCut = 40998
|
|
end
|
|
item
|
|
Command = ecColSelDown
|
|
ShortCut = 41000
|
|
end
|
|
item
|
|
Command = ecColSelLeft
|
|
ShortCut = 40997
|
|
end
|
|
item
|
|
Command = ecColSelRight
|
|
ShortCut = 40999
|
|
end
|
|
item
|
|
Command = ecColSelPageDown
|
|
ShortCut = 40994
|
|
end
|
|
item
|
|
Command = ecColSelPageBottom
|
|
ShortCut = 57378
|
|
end
|
|
item
|
|
Command = ecColSelPageUp
|
|
ShortCut = 40993
|
|
end
|
|
item
|
|
Command = ecColSelPageTop
|
|
ShortCut = 57377
|
|
end
|
|
item
|
|
Command = ecColSelLineStart
|
|
ShortCut = 40996
|
|
end
|
|
item
|
|
Command = ecColSelLineEnd
|
|
ShortCut = 40995
|
|
end
|
|
item
|
|
Command = ecColSelEditorTop
|
|
ShortCut = 57380
|
|
end
|
|
item
|
|
Command = ecColSelEditorBottom
|
|
ShortCut = 57379
|
|
end>
|
|
MouseActions = <>
|
|
MouseTextActions = <>
|
|
MouseSelActions = <>
|
|
Lines.Strings = (
|
|
'SynEdit'
|
|
)
|
|
VisibleSpecialChars = [vscSpace, vscTabAtLast]
|
|
SelectedColor.BackPriority = 50
|
|
SelectedColor.ForePriority = 50
|
|
SelectedColor.FramePriority = 50
|
|
SelectedColor.BoldPriority = 50
|
|
SelectedColor.ItalicPriority = 50
|
|
SelectedColor.UnderlinePriority = 50
|
|
SelectedColor.StrikeOutPriority = 50
|
|
BracketHighlightStyle = sbhsBoth
|
|
BracketMatchColor.Background = clNone
|
|
BracketMatchColor.Foreground = clNone
|
|
BracketMatchColor.Style = [fsBold]
|
|
FoldedCodeColor.Background = clNone
|
|
FoldedCodeColor.Foreground = clGray
|
|
FoldedCodeColor.FrameColor = clGray
|
|
MouseLinkColor.Background = clNone
|
|
MouseLinkColor.Foreground = clBlue
|
|
LineHighlightColor.Background = clNone
|
|
LineHighlightColor.Foreground = clNone
|
|
inline SynLeftGutterPartList1: TSynGutterPartList
|
|
object SynGutterMarks1: TSynGutterMarks
|
|
Width = 24
|
|
MouseActions = <>
|
|
end
|
|
object SynGutterLineNumber1: TSynGutterLineNumber
|
|
Width = 17
|
|
MouseActions = <>
|
|
MarkupInfo.Background = clBtnFace
|
|
MarkupInfo.Foreground = clNone
|
|
DigitCount = 2
|
|
ShowOnlyLineNumbersMultiplesOf = 1
|
|
ZeroStart = False
|
|
LeadingZeros = False
|
|
end
|
|
object SynGutterChanges1: TSynGutterChanges
|
|
Width = 4
|
|
MouseActions = <>
|
|
ModifiedColor = 59900
|
|
SavedColor = clGreen
|
|
end
|
|
object SynGutterSeparator1: TSynGutterSeparator
|
|
Width = 2
|
|
MouseActions = <>
|
|
MarkupInfo.Background = clWhite
|
|
MarkupInfo.Foreground = clGray
|
|
end
|
|
object SynGutterCodeFolding1: TSynGutterCodeFolding
|
|
MouseActions = <>
|
|
MarkupInfo.Background = clNone
|
|
MarkupInfo.Foreground = clGray
|
|
MouseActionsExpanded = <>
|
|
MouseActionsCollapsed = <>
|
|
end
|
|
end
|
|
end
|
|
object XMPListView: TListView
|
|
Left = 0
|
|
Height = 275
|
|
Top = 0
|
|
Width = 639
|
|
Align = alTop
|
|
AutoWidthLastColumn = True
|
|
Columns = <
|
|
item
|
|
Caption = 'Description'
|
|
Width = 200
|
|
end
|
|
item
|
|
Caption = 'Value'
|
|
Width = 435
|
|
end>
|
|
TabOrder = 1
|
|
ViewStyle = vsReport
|
|
end
|
|
object Splitter4: TSplitter
|
|
Cursor = crVSplit
|
|
Left = 0
|
|
Height = 5
|
|
Top = 275
|
|
Width = 639
|
|
Align = alTop
|
|
ResizeAnchor = akTop
|
|
end
|
|
end
|
|
object PgImage: TTabSheet
|
|
Caption = 'Image'
|
|
ClientHeight = 511
|
|
ClientWidth = 639
|
|
object Image: TImage
|
|
Left = 0
|
|
Height = 511
|
|
Top = 0
|
|
Width = 639
|
|
Align = alClient
|
|
Center = True
|
|
Proportional = True
|
|
Stretch = True
|
|
StretchOutEnabled = False
|
|
end
|
|
end
|
|
end
|
|
object Messages: TMemo
|
|
Left = 4
|
|
Height = 90
|
|
Top = 567
|
|
Width = 639
|
|
Align = alBottom
|
|
BorderSpacing.Left = 4
|
|
BorderSpacing.Right = 4
|
|
TabOrder = 2
|
|
end
|
|
object Splitter3: TSplitter
|
|
Cursor = crVSplit
|
|
Left = 0
|
|
Height = 5
|
|
Top = 562
|
|
Width = 647
|
|
Align = alBottom
|
|
ResizeAnchor = akBottom
|
|
end
|
|
object DateTimePanel: TPanel
|
|
Left = 0
|
|
Height = 34
|
|
Top = 657
|
|
Width = 647
|
|
Align = alBottom
|
|
AutoSize = True
|
|
BevelOuter = bvNone
|
|
ClientHeight = 34
|
|
ClientWidth = 647
|
|
TabOrder = 4
|
|
object LblChangeDate: TLabel
|
|
AnchorSideLeft.Control = DateTimePanel
|
|
AnchorSideTop.Control = EdChangeDate
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 4
|
|
Height = 15
|
|
Top = 10
|
|
Width = 135
|
|
BorderSpacing.Left = 4
|
|
Caption = 'Change EXIF date/time to'
|
|
end
|
|
object EdChangeDate: TEdit
|
|
AnchorSideLeft.Control = LblChangeDate
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = DateTimePanel
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 144
|
|
Height = 23
|
|
Hint = 'New date to be assigned to the selected image'
|
|
Top = 6
|
|
Width = 152
|
|
BorderSpacing.Left = 5
|
|
BorderSpacing.Bottom = 4
|
|
TabOrder = 0
|
|
end
|
|
object BtnChangeDate: TButton
|
|
AnchorSideLeft.Control = EdChangeDate
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = EdChangeDate
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 304
|
|
Height = 25
|
|
Hint = 'Replaces the image date.'
|
|
Top = 5
|
|
Width = 67
|
|
AutoSize = True
|
|
BorderSpacing.Left = 8
|
|
BorderSpacing.Bottom = 4
|
|
Caption = 'Execute'
|
|
OnClick = BtnChangeDateClick
|
|
TabOrder = 1
|
|
end
|
|
end
|
|
end
|
|
object StatusBar1: TStatusBar
|
|
Left = 0
|
|
Height = 23
|
|
Top = 691
|
|
Width = 926
|
|
Panels = <
|
|
item
|
|
Width = 150
|
|
end
|
|
item
|
|
Width = 150
|
|
end
|
|
item
|
|
Width = 250
|
|
end
|
|
item
|
|
Width = 150
|
|
end
|
|
item
|
|
Width = 100
|
|
end>
|
|
SimplePanel = False
|
|
end
|
|
object ImageList: TImageList
|
|
Left = 89
|
|
Top = 118
|
|
Bitmap = {
|
|
4C7A0300000010000000100000009E0200000000000078DAEDD6DD4F52611CC0
|
|
712EBAE80FE81FE81FE8A69BAE9A372D7BD1B5B979916B6B8A446B85DA666CCE
|
|
CD772D9962A69989180A0A238929948C7CD9508CE1128F0738BC132442CA8B66
|
|
4672CE13CF71C7BC28E141B76E7CB6EFF68C9D0F637BCEEF1C58ACFDB5DA5F52
|
|
1ED2774C843E0A354796BEC635C4E6B00EAD99BABCB3B1A5D12815F7826CDA5E
|
|
556F41C3F825C18D8B499FE167B67E2F684AADF4155F663CD6779B47463090AD
|
|
A7366C8090DCAF67BCFBED93512AEEC9DEA70B681A558C5FD30BE7512C6CC3D0
|
|
6F627CCC34E240F58965A58FF1DBF8C406AADF217489F4199CF9D45E70FE97CF
|
|
B08BEAD367B067ED2DB984BFBAC321C32B00D5C3337048B835FEF19AD754CC83
|
|
EED37DD134CBDDD207621257805CF2282A254E49F90069EE0341651588EB9BE9
|
|
E07E67AE1DACABF974700F3F83D791980C50DE197AEF1EE1CA186F12DC049FBB
|
|
8BE8E0DED2530CCC1D857470BFD4798B36946F16801F9B079E10973EA7BF3787
|
|
1C43EC978B4FAFB108F1DD17F077A0C4D8E32E5C545A6815DF6BFB13BB16DE57
|
|
D97AE768E500E5D202A6945DBDEB92554C2EB45CADC894A1E5CA7542FA48179E
|
|
ED06074D7781A0AE13C4AD531923E4D501D778AD3D977B0FE679D7E83BF5A7FE
|
|
381E1FE434D9A43C632E41CBFACFEB24E63FB9AA0471633F5DCCD09BC445650B
|
|
99667FB13DFF02E3C3733D20E1B720651BAB361EF67F5BC9AD6FFFF4D8201737
|
|
B6E6E7313E62D182C8B2E6A0904909C226F991CF1F97BAC10D7DE0431B88621A
|
|
F4F7DF94F03DF4FEC926905CB3207BA7AA61187A8FBA0ED992513720C61E0BA0
|
|
F74DB622FB1D8F81B40D571541FF75BA1BD9AF1B25DFCD82827384F4E19BF0FC
|
|
20B2F76A9F45E0F9DBA53CEDB6631AD9BB54F5F4FF2FEB306F25B5E940F60E05
|
|
1FDF9F1F363F97D9C744ECB29398DFDF7A8BC172
|
|
}
|
|
end
|
|
object SynXMLSyn: TSynXMLSyn
|
|
DefaultFilter = 'XML Document (*.xml,*.xsd,*.xsl,*.xslt,*.dtd)|*.xml;*.xsd;*.xsl;*.xslt;*.dtd'
|
|
Enabled = False
|
|
WantBracesParsed = False
|
|
Left = 480
|
|
Top = 145
|
|
end
|
|
end
|