Note: You must be registered in order to post a reply.To register, click here. Registration is FREE!
ImageEn1.IO.LoadFromFileAuto(UnknownImage);
SaveToFile(MyFileName + DetectedFileExtension, DetectedImageFormat);
sNewExt := IEFileFormatGetInfo( ImageEnView1.IO.Params.FileType ).SuitableExtension;
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;