From 90366be659c41bb58f4fc48d1eddbb5ccb803985 Mon Sep 17 00:00:00 2001
From: wp_xxyyzz <wp_xxyyzz@8e941d3f-bd1b-0410-a28a-d453659cc2b4>
Date: Sun, 29 Mar 2020 21:37:05 +0000
Subject: [PATCH] fpexif: Fix compilation with Delphi

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@7344 8e941d3f-bd1b-0410-a28a-d453659cc2b4
---
 components/fpexif/fpeexifreadwrite.pas | 1 +
 components/fpexif/fpeiptcdata.pas      | 1 +
 2 files changed, 2 insertions(+)

diff --git a/components/fpexif/fpeexifreadwrite.pas b/components/fpexif/fpeexifreadwrite.pas
index 748650dcb..048a9bac1 100644
--- a/components/fpexif/fpeexifreadwrite.pas
+++ b/components/fpexif/fpeexifreadwrite.pas
@@ -126,6 +126,7 @@ const
 
 type
   TReaderItem = class
+  public
     ReaderClass: TMakerNoteReaderClass;
     Make: String;
     Model: String;
diff --git a/components/fpexif/fpeiptcdata.pas b/components/fpexif/fpeiptcdata.pas
index 31b124c5b..3b9edf786 100644
--- a/components/fpexif/fpeiptcdata.pas
+++ b/components/fpexif/fpeiptcdata.pas
@@ -118,6 +118,7 @@ uses
 
 type
   TAdobeImageResourceBlock = class
+  public
     Identifier: Word;
     Name: String;
     Data: TBytes;