Чтение Exif и других метаданных из Jpeg изображений

[andysova]

Кто-нибудь может подсказать хорошую Delphi- библиотеку или компоненты для чтения EXIF и других метаданных из файлов с изображениями в формате JPG? 

Те, про которые мне известно, считывают не все, например, нужен GPS

Изменено 11 марта, 2016 пользователем andysova

[rareMax]

https://delphihaven.wordpress.com/ccr-exif/

[IVGSoft]

Здравствуйте!

Тоже хотел использовать эту библиотеку, да не получилось!  Не работает она нормально с новым FMX и Delphi 10.1. Какие-то проблемы с распределением памяти. Может кто-то сталкивался?

Мне всего-то нужно вытащить ВСЕ метаданные из файла, изменить атрибут Orientation, провести обработку самого изображения и сохранить все в новый файл.

Может есть иные варианты? 

[rareMax]

Не знаю как насчет всех параметров - но ребята из эмбы хвастались на ютубе что можно с метаданными работать. Посмотрите видео - может с его помощью получится?

--------

Русска озвучка:

 

Изменено 5 декабря, 2016 пользователем RareGod
Добавлено видео на русском

[IVGSoft]

Да оно какбы и работает... Но! После чтения свойства ExifData.Orientation программа вываливается в Access Violation при вызове DispatchMessage. И вот именно пока при доступе к Orientation.. Пробовал другие свойства использовать - не вываливается. Не могу понять где появляется пустой указатель и почему. Подозреваю что где-то проблемы с совместимостью TBitmap.

UPD : у меня проект на FMX, а на видео используют VCL. С ним проблем нету. А вот с FMX какая-то беда

UPD2. Проблема разрулилась. Она оказалась совсем не в CCR.Exif (хотя его тоже пришлось править). Странным образом на ситуацию влиял размер изображения. Я грузил в память через TBitmapCodecManager.LoadThumbnailFromFile. В качестве размера передавал размер экрана (мне нужен был такой буффер). До применения CCR.Exif все работало прекрасно. Помог пересчет размера в соответсвии с пропорциями картинки.

Изменено 5 декабря, 2016 пользователем IVGSoft