[Lazarus] Function to get the mimetype from a file extension

[michael.vancanneyt at wisa.be]

On Wed, 9 May 2012, Felipe Monteiro de Carvalho wrote:

> Hello,
>
> I need this now and after some Googling I couldn't find anything. So I
> was wondering, maybe we already have this somewhere in FPC or Lazarus?
> If not it might be something to consider adding to LazUtils.

FPC contains this unit:

fpmimetypes.pp

It is used by fcl-web. On linux, it loads /etc/mime.types.
On windows not yet, I must still look up how to do this.

Michael.