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

Question

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

（我愿意使用别的东西，只要我可以使用Delphi，但每个人都说CCR EXIF是最好的;我只是在稀疏的文档中找不到这个）

Answer 1

尝试使用此功能（请注意我尚未对此进行测试，只是验证了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;