fpexif: Fix compilation with Delphi

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@7344 8e941d3f-bd1b-0410-a28a-d453659cc2b4
2020-03-29 21:37:05 +00:00
parent b8eb9fca8b
commit 90366be659
2 changed files with 2 additions and 0 deletions
--- 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;
--- 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;