TIOParams.EXIF_ExposureTime
Declaration
property EXIF_ExposureTime: Double;
Description
The exposure time of the photo (reciprocal of the shutter speed). Unit is second.
Note: Use
EXIF_ExposureTime2 for easier access to the value.
if ImageEnView1.IO.Params.EXIF_ExposureTime > 1 then
// It will be something like 4 i.e. 4 seconds
sExifExposureTime := IntToStr( Round( ImageEnView1.IO.Params.EXIF_ExposureTime ))
else
if ImageEnView1.IO.Params.EXIF_ExposureTime > 0 then
// It is something like 0.25, which translates to 1/4 second
sExifExposureTime := DoubleToFraction( Round(1 / ImageEnView1.IO.Params.EXIF_ExposureTime ))
else
sExifExposureTime := '';
// Write the value back to image parameters
if pos( '1/', sExifExposureTime ) > 0 then
ImageEnView1.IO.Params.EXIF_ExposureTime := 1 / FractionToDouble( sExifExposureTime )
else
ImageEnView1.IO.Params.EXIF_ExposureTime := StrToInt( sExifExposureTime );