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

Question

使用CCR 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;