delphi - 如何获取使用CCR EXIF拍摄图像的日期/时间？

使用CCR EXIF http://delphihaven.wordpress.com/ccr-exif/如何获取拍摄图像的时间？

（只要我可以使用Delphi，我愿意使用其他方法，但是每个人都说CCR EXIF是最好的；我只是在稀疏文档中找不到它）

最佳答案

尝试使用此方法（请注意，我尚未对此进行测试，只是针对返回DateTimeOriginal属性且匹配的DateTimeOriginal标记进行了验证）。

uses
  CCR.Exif;

procedure ShowDateTimeOriginal(const FileName: string);
var
  ExifData: TExifData;
begin
  ExifData := TExifData.Create;
  try
    ExifData.LoadFromGraphic(FileName);
    ShowMessage(DateTimeToStr(ExifData.DateTimeOriginal));
  finally
    ExifData.Free;
  end;
end;