Please see "MimeTypeFromExt" function in Synapse project: https://synalist.svn.sourceforge.net/svnroot/synalist/trunk/mimepart.pas
-- Silvio Clécio ============================================ Site - <silvioprog.com.br> LazSolutions - <code.google.com/p/lazsolutions> LazWebSolutions - <github.com/silvioprog/lazwebsolutions> ============================================ -- _______________________________________________ Lazarus mailing list [email protected] http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
