4

CCR EXIF http://delphihaven.wordpress.com/ccr-exif/を使用 して、画像が撮影された時刻を取得するにはどうすればよいですか?

(私は Delphi を使用できる限り、他のものを使用することにオープンですが、CCR EXIF が最適であると誰もが言っています。まばらなドキュメントでこれを見つけることができません)

4

1 に答える 1

6

これを使用してみてください (私はこれをテストしていないことに注意してください。プロパティを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;
于 2012-04-12T11:50:41.437 に答える