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 = 'Meta data'
        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 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
end