Extracting EXIF data on Android

ExtractEXIFAndroid.pas

uses
  Androidapi.JNI.Media, Androidapi.JNIBridge;
  
var
  LEXIF: JExifInterface;
  LLatLong: TJavaArray<Single>;
  LOrientation: Integer;
  LLatitude, LLongitude: Single;
  LDateTaken, LCameraMake, LCameraModel: string;
begin
  LEXIF := TJExifInterface.JavaClass.init(StringToJString(AFileName));
  LDateTaken := JStringToString(LEXIF.getAttribute(TJExifInterface.JavaClass.TAG_DATETIME));
  LCameraMake := JStringToString(LEXIF.getAttribute(TJExifInterface.JavaClass.TAG_MAKE));
  LCameraModel := JStringToString(LEXIF.getAttribute(TJExifInterface.JavaClass.TAG_MODEL));
  LLatLong := TJavaArray<Single>.Create(2);
  try
    if LEXIF.getLatLong(LLatLong) then
    begin
      LLatitude := LLatLong.Items[0];
      LLongitude := LLatLong.Items[1];
    end;
  finally
    LLatLong.Free;
  end;
end;