ImageEn1.IO.LoadFromFileAuto(UnknownImage);

SaveToFile(MyFileName + DetectedFileExtension, DetectedImageFormat);

var
iIOFileType: TIOFileType;
iExtension: string;
begin
  iIOFileType := FindFileFormat('C:\myfile.dat', false);
  or
  iIOFileType := ImageEnView1.IO.Params.FileType;

  case iIOFileType of
    ioJPEG: iExtension := '.jpg';
    ioPNG: iExtension := '.png';
  ...
  end;
end;

sNewExt := IEFileFormatGetInfo( ImageEnView1.IO.Params.FileType ).SuitableExtension;