Типы файлов (Delphi)

[VadEr]

Уважаемые знатоки!
Предположим имеются файлы различного типа (картинки, видео, музыка и пр.), но не имеющие расширения. Существуют способы узнать тип файла и его расширение? Если да, поделитесь пожалуйста.

[Vikenty]

используй ExtractFileExt(FileName);

[Пепел Феникса]

расширение легко, а вот настоящую сущность очень трудно.(именно узнать)
легко проверить является ли файл такого то типа.(например BitMaP)

[VadEr]

Сообщение от Vikenty

используй ExtractFileExt(FileName);

в имени файла нет расширения

легко проверить является ли файл такого то типа

т.е. а как проверить?

[Пепел Феникса]

ну скажем для BMP/JPG/PNG и многих других это просто проверить сигнатуру файла в известном месте(обычно начало)
ну а для mp3 нужно найти первый mp3 фрэйм(там данные так пишутся).

говорите конкретные форматы, ибо их миллиарды, тогда поговорим

[VadEr]

- а как проверяется сигнатура и фрэймы?
- к примеру форматы avi, mp4, jpeg, mp3, flv, wmv

[Пепел Феникса]

загрузка куска файла в буфер и поиск по нему искомого, если не нашли то грузим след кусок. и тд(это фрейм)
для сигнатур достаточн загрузить некоторое количество байт сначало файла(например GIF-3байта, у BMP-2) и сравнить с некоторым значением(у GIF-сравниваем с 'GIF', у BMP вроде BM(или учитывая что берется байтами чаще, то сравнивается с их численным представленим))
вот так, насчет mp3 я рассказал(на фооруме есть тема в разделе Делфи про mp3)насчет видео не очень знаю...
про jpeg не помню, ибо не люблю этот формат. вообще надо спецификации читать

[VadEr]

Спасибо за разъяснения!
а с чем связана не любовь к jpeg-у?

[Пепел Феникса]

то что сжатие с потерями.(Paint не позволяет качество задать, поэтому в приоритете PNG)