BRCC32 vs. mimetypes.rc

[himitsu]

ich würde die .RC/.RES ganz weglassen, alles in ein Konsanten-Array legen und dann darin suchen.

[add]

Delphi-Quellcode:

function GetMIMEType(FileExt: String): String;
const
  FileTypes: array[0..641] of record
    Ext, MIME: String;
  end = (
    (Ext: '.3dm';      MIME: 'x-world/x-3dmf'),
    (Ext: '.3dmf';     MIME: 'x-world/x-3dmf'),
    (Ext: '.a';        MIME: 'application/octet-stream'),
    (Ext: '.aab';      MIME: 'application/x-authorware-bin'),
    (Ext: '.aam';      MIME: 'application/x-authorware-map'),
    (Ext: '.aas';      MIME: 'application/x-authorware-seg'),
    (Ext: '.abc';      MIME: 'text/vnd.abc'),
    (Ext: '.acgi';     MIME: 'text/html'),
    (Ext: '.afl';      MIME: 'video/animaflex'),
    (Ext: '.ai';       MIME: 'application/postscript'),
    (Ext: '.aif';      MIME: 'audio/aiff'),
    (Ext: '.aif';      MIME: 'audio/x-aiff'),
    (Ext: '.aifc';     MIME: 'audio/aiff'),
    (Ext: '.aifc';     MIME: 'audio/x-aiff'),
    (Ext: '.aiff';     MIME: 'audio/aiff'),
    (Ext: '.aiff';     MIME: 'audio/x-aiff'),
    (Ext: '.aim';      MIME: 'application/x-aim'),
    (Ext: '.aip';      MIME: 'text/x-audiosoft-intra'),
    (Ext: '.ani';      MIME: 'application/x-navi-animation'),
    (Ext: '.aos';      MIME: 'application/x-nokia-9000-communicator-add-on-software'),
    (Ext: '.aps';      MIME: 'application/mime'),
    (Ext: '.arc';      MIME: 'application/octet-stream'),
    (Ext: '.arj';      MIME: 'application/arj'),
    (Ext: '.arj';      MIME: 'application/octet-stream'),
    (Ext: '.art';      MIME: 'image/x-jg'),
    (Ext: '.asf';      MIME: 'video/x-ms-asf'),
    (Ext: '.asm';      MIME: 'text/x-asm'),
    (Ext: '.asp';      MIME: 'text/asp'),
    (Ext: '.asx';      MIME: 'application/x-mplayer2'),
    (Ext: '.asx';      MIME: 'video/x-ms-asf'),
    (Ext: '.asx';      MIME: 'video/x-ms-asf-plugin'),
    (Ext: '.au';       MIME: 'audio/basic'),
    (Ext: '.au';       MIME: 'audio/x-au'),
    (Ext: '.avi';      MIME: 'application/x-troff-msvideo'),
    (Ext: '.avi';      MIME: 'video/avi'),
    (Ext: '.avi';      MIME: 'video/msvideo'),
    (Ext: '.avi';      MIME: 'video/x-msvideo'),
    (Ext: '.avs';      MIME: 'video/avs-video'),
    (Ext: '.bcpio';    MIME: 'application/x-bcpio'),
    (Ext: '.bin';      MIME: 'application/mac-binary'),
    (Ext: '.bin';      MIME: 'application/macbinary'),
    (Ext: '.bin';      MIME: 'application/octet-stream'),
    (Ext: '.bin';      MIME: 'application/x-binary'),
    (Ext: '.bin';      MIME: 'application/x-macbinary'),
    (Ext: '.bm';       MIME: 'image/bmp'),
    (Ext: '.bmp';      MIME: 'image/bmp'),
    (Ext: '.bmp';      MIME: 'image/x-windows-bmp'),
    (Ext: '.boo';      MIME: 'application/book'),
    (Ext: '.book';     MIME: 'application/book'),
    (Ext: '.boz';      MIME: 'application/x-bzip2'),
    (Ext: '.bsh';      MIME: 'application/x-bsh'),
    (Ext: '.bz';       MIME: 'application/x-bzip'),
    (Ext: '.bz2';      MIME: 'application/x-bzip2'),
    (Ext: '.c';        MIME: 'text/plain'),
    (Ext: '.c';        MIME: 'text/x-c'),
    (Ext: '.c++';      MIME: 'text/plain'),
    (Ext: '.cat';      MIME: 'application/vnd.ms-pki.seccat'),
    (Ext: '.cc';       MIME: 'text/plain'),
    (Ext: '.cc';       MIME: 'text/x-c'),
    (Ext: '.ccad';     MIME: 'application/clariscad'),
    (Ext: '.cco';      MIME: 'application/x-cocoa'),
    (Ext: '.cdf';      MIME: 'application/cdf'),
    (Ext: '.cdf';      MIME: 'application/x-cdf'),
    (Ext: '.cdf';      MIME: 'application/x-netcdf'),
    (Ext: '.cer';      MIME: 'application/pkix-cert'),
    (Ext: '.cer';      MIME: 'application/x-x509-ca-cert'),
    (Ext: '.cha';      MIME: 'application/x-chat'),
    (Ext: '.chat';     MIME: 'application/x-chat'),
    (Ext: '.class';    MIME: 'application/java'),
    (Ext: '.class';    MIME: 'application/java-byte-code'),
    (Ext: '.class';    MIME: 'application/x-java-class'),
    (Ext: '.com';      MIME: 'application/octet-stream'),
    (Ext: '.com';      MIME: 'text/plain'),
    (Ext: '.conf';     MIME: 'text/plain'),
    (Ext: '.cpio';     MIME: 'application/x-cpio'),
    (Ext: '.cpp';      MIME: 'text/x-c'),
    (Ext: '.cpt';      MIME: 'application/mac-compactpro'),
    (Ext: '.cpt';      MIME: 'application/x-compactpro'),
    (Ext: '.cpt';      MIME: 'application/x-cpt'),
    (Ext: '.crl';      MIME: 'application/pkcs-crl'),
    (Ext: '.crl';      MIME: 'application/pkix-crl'),
    (Ext: '.crt';      MIME: 'application/pkix-cert'),
    (Ext: '.crt';      MIME: 'application/x-x509-ca-cert'),
    (Ext: '.crt';      MIME: 'application/x-x509-user-cert'),
    (Ext: '.csh';      MIME: 'application/x-csh'),
    (Ext: '.csh';      MIME: 'text/x-script.csh'),
    (Ext: '.css';      MIME: 'application/x-pointplus'),
    (Ext: '.css';      MIME: 'text/css'),
    (Ext: '.cxx';      MIME: 'text/plain'),
    (Ext: '.dcr';      MIME: 'application/x-director'),
    (Ext: '.deepv';    MIME: 'application/x-deepv'),
    (Ext: '.def';      MIME: 'text/plain'),
    (Ext: '.der';      MIME: 'application/x-x509-ca-cert'),
    (Ext: '.dif';      MIME: 'video/x-dv'),
    (Ext: '.dir';      MIME: 'application/x-director'),
    (Ext: '.dl';       MIME: 'video/dl'),
    (Ext: '.dl';       MIME: 'video/x-dl'),
    (Ext: '.doc';      MIME: 'application/msword'),
    (Ext: '.dot';      MIME: 'application/msword'),
    (Ext: '.dp';       MIME: 'application/commonground'),
    (Ext: '.drw';      MIME: 'application/drafting'),
    (Ext: '.dump';     MIME: 'application/octet-stream'),
    (Ext: '.dv';       MIME: 'video/x-dv'),
    (Ext: '.dvi';      MIME: 'application/x-dvi'),
    (Ext: '.dwf';      MIME: 'drawing/x-dwf (old)'),
    (Ext: '.dwf';      MIME: 'model/vnd.dwf'),
    (Ext: '.dwg';      MIME: 'application/acad'),
    (Ext: '.dwg';      MIME: 'image/vnd.dwg'),
    (Ext: '.dwg';      MIME: 'image/x-dwg'),
    (Ext: '.dxf';      MIME: 'application/dxf'),
    (Ext: '.dxf';      MIME: 'image/vnd.dwg'),
    (Ext: '.dxf';      MIME: 'image/x-dwg'),
    (Ext: '.dxr';      MIME: 'application/x-director'),
    (Ext: '.el';       MIME: 'text/x-script.elisp'),
    (Ext: '.elc';      MIME: 'application/x-bytecode.elisp (compiled elisp)'),
    (Ext: '.elc';      MIME: 'application/x-elc'),
    (Ext: '.env';      MIME: 'application/x-envoy'),
    (Ext: '.eps';      MIME: 'application/postscript'),
    (Ext: '.es';       MIME: 'application/x-esrehber'),
    (Ext: '.etx';      MIME: 'text/x-setext'),
    (Ext: '.evy';      MIME: 'application/envoy'),
    (Ext: '.evy';      MIME: 'application/x-envoy'),
    (Ext: '.exe';      MIME: 'application/octet-stream'),
    (Ext: '.f';        MIME: 'text/plain'),
    (Ext: '.f';        MIME: 'text/x-fortran'),
    (Ext: '.f77';      MIME: 'text/x-fortran'),
    (Ext: '.f90';      MIME: 'text/plain'),
    (Ext: '.f90';      MIME: 'text/x-fortran'),
    (Ext: '.fdf';      MIME: 'application/vnd.fdf'),
    (Ext: '.fif';      MIME: 'application/fractals'),
    (Ext: '.fif';      MIME: 'image/fif'),
    (Ext: '.fli';      MIME: 'video/fli'),
    (Ext: '.fli';      MIME: 'video/x-fli'),
    (Ext: '.flo';      MIME: 'image/florian'),
    (Ext: '.flx';      MIME: 'text/vnd.fmi.flexstor'),
    (Ext: '.fmf';      MIME: 'video/x-atomic3d-feature'),
    (Ext: '.for';      MIME: 'text/plain'),
    (Ext: '.for';      MIME: 'text/x-fortran'),
    (Ext: '.fpx';      MIME: 'image/vnd.fpx'),
    (Ext: '.fpx';      MIME: 'image/vnd.net-fpx'),
    (Ext: '.frl';      MIME: 'application/freeloader'),
    (Ext: '.funk';     MIME: 'audio/make'),
    (Ext: '.g';        MIME: 'text/plain'),
    (Ext: '.g3';       MIME: 'image/g3fax'),
    (Ext: '.gif';      MIME: 'image/gif'),
    (Ext: '.gl';       MIME: 'video/gl'),
    (Ext: '.gl';       MIME: 'video/x-gl'),
    (Ext: '.gsd';      MIME: 'audio/x-gsm'),
    (Ext: '.gsm';      MIME: 'audio/x-gsm'),
    (Ext: '.gsp';      MIME: 'application/x-gsp'),
    (Ext: '.gss';      MIME: 'application/x-gss'),
    (Ext: '.gtar';     MIME: 'application/x-gtar'),
    (Ext: '.gz';       MIME: 'application/x-compressed'),
    (Ext: '.gz';       MIME: 'application/x-gzip'),
    (Ext: '.gzip';     MIME: 'application/x-gzip'),
    (Ext: '.gzip';     MIME: 'multipart/x-gzip'),
    (Ext: '.h';        MIME: 'text/plain'),
    (Ext: '.h';        MIME: 'text/x-h'),
    (Ext: '.hdf';      MIME: 'application/x-hdf'),
    (Ext: '.help';     MIME: 'application/x-helpfile'),
    (Ext: '.hgl';      MIME: 'application/vnd.hp-hpgl'),
    (Ext: '.hh';       MIME: 'text/plain'),
    (Ext: '.hh';       MIME: 'text/x-h'),
    (Ext: '.hlb';      MIME: 'text/x-script'),
    (Ext: '.hlp';      MIME: 'application/hlp'),
    (Ext: '.hlp';      MIME: 'application/x-helpfile'),
    (Ext: '.hlp';      MIME: 'application/x-winhelp'),
    (Ext: '.hpg';      MIME: 'application/vnd.hp-hpgl'),
    (Ext: '.hpgl';     MIME: 'application/vnd.hp-hpgl'),
    (Ext: '.hqx';      MIME: 'application/binhex'),
    (Ext: '.hqx';      MIME: 'application/binhex4'),
    (Ext: '.hqx';      MIME: 'application/mac-binhex'),
    (Ext: '.hqx';      MIME: 'application/mac-binhex40'),
    (Ext: '.hqx';      MIME: 'application/x-binhex40'),
    (Ext: '.hqx';      MIME: 'application/x-mac-binhex40'),
    (Ext: '.hta';      MIME: 'application/hta'),
    (Ext: '.htc';      MIME: 'text/x-component'),
    (Ext: '.htm';      MIME: 'text/html'),
    (Ext: '.html';     MIME: 'text/html'),
    (Ext: '.htmls';    MIME: 'text/html'),
    (Ext: '.htt';      MIME: 'text/webviewhtml'),
    (Ext: '.htx';      MIME: 'text/html'),
    (Ext: '.ice';      MIME: 'x-conference/x-cooltalk'),
    (Ext: '.ico';      MIME: 'image/x-icon'),
    (Ext: '.idc';      MIME: 'text/plain'),
    (Ext: '.ief';      MIME: 'image/ief'),
    (Ext: '.iefs';     MIME: 'image/ief'),
    (Ext: '.iges';     MIME: 'application/iges'),
    (Ext: '.iges';     MIME: 'model/iges'),
    (Ext: '.igs';      MIME: 'application/iges'),
    (Ext: '.igs';      MIME: 'model/iges'),
    (Ext: '.ima';      MIME: 'application/x-ima'),
    (Ext: '.imap';     MIME: 'application/x-httpd-imap'),
    (Ext: '.inf';      MIME: 'application/inf'),
    (Ext: '.ins';      MIME: 'application/x-internett-signup'),
    (Ext: '.ip';       MIME: 'application/x-ip2'),
    (Ext: '.isu';      MIME: 'video/x-isvideo'),
    (Ext: '.it';       MIME: 'audio/it'),
    (Ext: '.iv';       MIME: 'application/x-inventor'),
    (Ext: '.ivr';      MIME: 'i-world/i-vrml'),
    (Ext: '.ivy';      MIME: 'application/x-livescreen'),
    (Ext: '.jam';      MIME: 'audio/x-jam'),
    (Ext: '.jav';      MIME: 'text/plain'),
    (Ext: '.jav';      MIME: 'text/x-java-source'),
    (Ext: '.java';     MIME: 'text/plain'),
    (Ext: '.java';     MIME: 'text/x-java-source'),
    (Ext: '.jcm';      MIME: 'application/x-java-commerce'),
    (Ext: '.jfif';     MIME: 'image/jpeg'),
    (Ext: '.jfif';     MIME: 'image/pjpeg'),
    (Ext: '.jfif-tbnl';MIME: 'image/jpeg'),
    (Ext: '.jpe';      MIME: 'image/jpeg'),
    (Ext: '.jpe';      MIME: 'image/pjpeg'),
    (Ext: '.jpeg';     MIME: 'image/jpeg'),
    (Ext: '.jpeg';     MIME: 'image/pjpeg'),
    (Ext: '.jpg';      MIME: 'image/jpeg'),
    (Ext: '.jpg';      MIME: 'image/pjpeg'),
    (Ext: '.jps';      MIME: 'image/x-jps'),
    (Ext: '.js';       MIME: 'application/x-javascript'),
    (Ext: '.jut';      MIME: 'image/jutvision'),
    (Ext: '.kar';      MIME: 'audio/midi'),
    (Ext: '.kar';      MIME: 'music/x-karaoke'),
    (Ext: '.ksh';      MIME: 'application/x-ksh'),
    (Ext: '.ksh';      MIME: 'text/x-script.ksh'),
    (Ext: '.la';       MIME: 'audio/nspaudio'),
    (Ext: '.la';       MIME: 'audio/x-nspaudio'),
    (Ext: '.lam';      MIME: 'audio/x-liveaudio'),
    (Ext: '.latex';    MIME: 'application/x-latex'),
    (Ext: '.lha';      MIME: 'application/lha'),
    (Ext: '.lha';      MIME: 'application/octet-stream'),
    (Ext: '.lha';      MIME: 'application/x-lha'),
    (Ext: '.lhx';      MIME: 'application/octet-stream'),
    (Ext: '.list';     MIME: 'text/plain'),
    (Ext: '.lma';      MIME: 'audio/nspaudio'),
    (Ext: '.lma';      MIME: 'audio/x-nspaudio'),
    (Ext: '.log';      MIME: 'text/plain'),
    (Ext: '.lsp';      MIME: 'application/x-lisp'),
    (Ext: '.lsp';      MIME: 'text/x-script.lisp'),
    (Ext: '.lst';      MIME: 'text/plain'),
    (Ext: '.lsx';      MIME: 'text/x-la-asf'),
    (Ext: '.ltx';      MIME: 'application/x-latex'),
    (Ext: '.lzh';      MIME: 'application/octet-stream'),
    (Ext: '.lzh';      MIME: 'application/x-lzh'),
    (Ext: '.lzx';      MIME: 'application/lzx'),
    (Ext: '.lzx';      MIME: 'application/octet-stream'),
    (Ext: '.lzx';      MIME: 'application/x-lzx'),
    (Ext: '.m';        MIME: 'text/plain'),
    (Ext: '.m';        MIME: 'text/x-m'),
    (Ext: '.m1v';      MIME: 'video/mpeg'),
    (Ext: '.m2a';      MIME: 'audio/mpeg'),
    (Ext: '.m2v';      MIME: 'video/mpeg'),
    (Ext: '.m3u';      MIME: 'audio/x-mpequrl'),
    (Ext: '.man';      MIME: 'application/x-troff-man'),
    (Ext: '.map';      MIME: 'application/x-navimap'),
    (Ext: '.mar';      MIME: 'text/plain'),
    (Ext: '.mbd';      MIME: 'application/mbedlet'),
    (Ext: '.mc$';      MIME: 'application/x-magic-cap-package-1.0'),
    (Ext: '.mcd';      MIME: 'application/mcad'),
    (Ext: '.mcd';      MIME: 'application/x-mathcad'),
    (Ext: '.mcf';      MIME: 'image/vasa'),
    (Ext: '.mcf';      MIME: 'text/mcf'),
    (Ext: '.mcp';      MIME: 'application/netmc'),
    (Ext: '.me';       MIME: 'application/x-troff-me'),
    (Ext: '.mht';      MIME: 'message/rfc822'),
    (Ext: '.mhtml';    MIME: 'message/rfc822'),
    (Ext: '.mid';      MIME: 'application/x-midi'),
    (Ext: '.mid';      MIME: 'audio/midi'),
    (Ext: '.mid';      MIME: 'audio/x-mid'),
    (Ext: '.mid';      MIME: 'audio/x-midi'),
    (Ext: '.mid';      MIME: 'music/crescendo'),
    (Ext: '.mid';      MIME: 'x-music/x-midi'),
    (Ext: '.midi';     MIME: 'application/x-midi'),
    (Ext: '.midi';     MIME: 'audio/midi'),
    (Ext: '.midi';     MIME: 'audio/x-mid'),
    (Ext: '.midi';     MIME: 'audio/x-midi'),
    (Ext: '.midi';     MIME: 'music/crescendo'),
    (Ext: '.midi';     MIME: 'x-music/x-midi'),
    (Ext: '.mif';      MIME: 'application/x-frame'),
    (Ext: '.mif';      MIME: 'application/x-mif'),
    (Ext: '.mime';     MIME: 'message/rfc822'),
    (Ext: '.mime';     MIME: 'www/mime'),
    (Ext: '.mjf';      MIME: 'audio/x-vnd.audioexplosion.mjuicemediafile'),
    (Ext: '.mjpg';     MIME: 'video/x-motion-jpeg'),
    (Ext: '.mm';       MIME: 'application/base64'),
    (Ext: '.mm';       MIME: 'application/x-meme'),
    (Ext: '.mme';      MIME: 'application/base64'),
    (Ext: '.mod';      MIME: 'audio/mod'),
    (Ext: '.mod';      MIME: 'audio/x-mod'),
    (Ext: '.moov';     MIME: 'video/quicktime'),
    (Ext: '.mov';      MIME: 'video/quicktime'),
    (Ext: '.movie';    MIME: 'video/x-sgi-movie'),
    (Ext: '.mp2';      MIME: 'audio/mpeg'),
    (Ext: '.mp2';      MIME: 'audio/x-mpeg'),
    (Ext: '.mp2';      MIME: 'video/mpeg'),
    (Ext: '.mp2';      MIME: 'video/x-mpeg'),
    (Ext: '.mp2';      MIME: 'video/x-mpeq2a'),
    (Ext: '.mp3';      MIME: 'audio/mpeg3'),
    (Ext: '.mp3';      MIME: 'audio/x-mpeg-3'),
    (Ext: '.mp3';      MIME: 'video/mpeg'),
    (Ext: '.mp3';      MIME: 'video/x-mpeg'),
    (Ext: '.mpa';      MIME: 'audio/mpeg'),
    (Ext: '.mpa';      MIME: 'video/mpeg'),
    (Ext: '.mpc';      MIME: 'application/x-project'),
    (Ext: '.mpe';      MIME: 'video/mpeg'),
    (Ext: '.mpeg';     MIME: 'video/mpeg'),
    (Ext: '.mpg';      MIME: 'audio/mpeg'),
    (Ext: '.mpg';      MIME: 'video/mpeg'),
    (Ext: '.mpga';     MIME: 'audio/mpeg'),
    (Ext: '.mpp';      MIME: 'application/vnd.ms-project'),
    (Ext: '.mpt';      MIME: 'application/x-project'),
    (Ext: '.mpv';      MIME: 'application/x-project'),
    (Ext: '.mpx';      MIME: 'application/x-project'),
    (Ext: '.mrc';      MIME: 'application/marc'),
    (Ext: '.ms';       MIME: 'application/x-troff-ms'),
    (Ext: '.mv';       MIME: 'video/x-sgi-movie'),
    (Ext: '.my';       MIME: 'audio/make'),
    (Ext: '.mzz';      MIME: 'application/x-vnd.audioexplosion.mzz'),
    (Ext: '.nap';      MIME: 'image/naplps'),
    (Ext: '.naplps';   MIME: 'image/naplps'),
    (Ext: '.nc';       MIME: 'application/x-netcdf'),
    (Ext: '.ncm';      MIME: 'application/vnd.nokia.configuration-message'),
    (Ext: '.nif';      MIME: 'image/x-niff'),
    (Ext: '.niff';     MIME: 'image/x-niff'),
    (Ext: '.nix';      MIME: 'application/x-mix-transfer'),
    (Ext: '.nsc';      MIME: 'application/x-conference'),
    (Ext: '.nvd';      MIME: 'application/x-navidoc'),
    (Ext: '.o';        MIME: 'application/octet-stream'),
    (Ext: '.oda';      MIME: 'application/oda'),
    (Ext: '.omc';      MIME: 'application/x-omc'),
    (Ext: '.omcd';     MIME: 'application/x-omcdatamaker'),
    (Ext: '.omcr';     MIME: 'application/x-omcregerator'),
    (Ext: '.p';        MIME: 'text/x-pascal'),
    (Ext: '.p10';      MIME: 'application/pkcs10'),
    (Ext: '.p10';      MIME: 'application/x-pkcs10'),
    (Ext: '.p12';      MIME: 'application/pkcs-12'),
    (Ext: '.p12';      MIME: 'application/x-pkcs12'),
    (Ext: '.p7a';      MIME: 'application/x-pkcs7-signature'),
    (Ext: '.p7c';      MIME: 'application/pkcs7-mime'),
    (Ext: '.p7c';      MIME: 'application/x-pkcs7-mime'),
    (Ext: '.p7m';      MIME: 'application/pkcs7-mime'),
    (Ext: '.p7m';      MIME: 'application/x-pkcs7-mime'),
    (Ext: '.p7r';      MIME: 'application/x-pkcs7-certreqresp'),
    (Ext: '.p7s';      MIME: 'application/pkcs7-signature'),
    (Ext: '.part';     MIME: 'application/pro_eng'),
    (Ext: '.pas';      MIME: 'text/pascal'),
    (Ext: '.pbm';      MIME: 'image/x-portable-bitmap'),
    (Ext: '.pcl';      MIME: 'application/vnd.hp-pcl'),
    (Ext: '.pcl';      MIME: 'application/x-pcl'),
    (Ext: '.pct';      MIME: 'image/x-pict'),
    (Ext: '.pcx';      MIME: 'image/x-pcx'),
    (Ext: '.pdb';      MIME: 'chemical/x-pdb'),
    (Ext: '.pdf';      MIME: 'application/pdf'),
    (Ext: '.pfunk';    MIME: 'audio/make'),
    (Ext: '.pfunk';    MIME: 'audio/make.my.funk'),
    (Ext: '.pgm';      MIME: 'image/x-portable-graymap'),
    (Ext: '.pgm';      MIME: 'image/x-portable-greymap'),
    (Ext: '.pic';      MIME: 'image/pict'),
    (Ext: '.pict';     MIME: 'image/pict'),
    (Ext: '.pkg';      MIME: 'application/x-newton-compatible-pkg'),
    (Ext: '.pko';      MIME: 'application/vnd.ms-pki.pko'),
    (Ext: '.pl';       MIME: 'text/plain'),
    (Ext: '.pl';       MIME: 'text/x-script.perl'),
    (Ext: '.plx';      MIME: 'application/x-pixclscript'),
    (Ext: '.pm';       MIME: 'image/x-xpixmap'),
    (Ext: '.pm';       MIME: 'text/x-script.perl-module'),
    (Ext: '.pm4';      MIME: 'application/x-pagemaker'),
    (Ext: '.pm5';      MIME: 'application/x-pagemaker'),
    (Ext: '.png';      MIME: 'image/png'),
    (Ext: '.pnm';      MIME: 'application/x-portable-anymap'),
    (Ext: '.pnm';      MIME: 'image/x-portable-anymap'),
    (Ext: '.pot';      MIME: 'application/mspowerpoint'),
    (Ext: '.pot';      MIME: 'application/vnd.ms-powerpoint'),
    (Ext: '.pov';      MIME: 'model/x-pov'),
    (Ext: '.ppa';      MIME: 'application/vnd.ms-powerpoint'),
    (Ext: '.ppm';      MIME: 'image/x-portable-pixmap'),
    (Ext: '.pps';      MIME: 'application/mspowerpoint'),
    (Ext: '.pps';      MIME: 'application/vnd.ms-powerpoint'),
    (Ext: '.ppt';      MIME: 'application/mspowerpoint'),
    (Ext: '.ppt';      MIME: 'application/powerpoint'),
    (Ext: '.ppt';      MIME: 'application/vnd.ms-powerpoint'),
    (Ext: '.ppt';      MIME: 'application/x-mspowerpoint'),
    (Ext: '.ppz';      MIME: 'application/mspowerpoint'),
    (Ext: '.pre';      MIME: 'application/x-freelance'),
    (Ext: '.prt';      MIME: 'application/pro_eng'),
    (Ext: '.ps';       MIME: 'application/postscript'),
    (Ext: '.psd';      MIME: 'application/octet-stream'),
    (Ext: '.pvu';      MIME: 'paleovu/x-pv'),
    (Ext: '.pwz';      MIME: 'application/vnd.ms-powerpoint'),
    (Ext: '.py';       MIME: 'text/x-script.phyton'),
    (Ext: '.pyc';      MIME: 'applicaiton/x-bytecode.python'),
    (Ext: '.qcp';      MIME: 'audio/vnd.qcelp'),
    (Ext: '.qd3';      MIME: 'x-world/x-3dmf'),
    (Ext: '.qd3d';     MIME: 'x-world/x-3dmf'),
    (Ext: '.qif';      MIME: 'image/x-quicktime'),
    (Ext: '.qt';       MIME: 'video/quicktime'),
    (Ext: '.qtc';      MIME: 'video/x-qtc'),
    (Ext: '.qti';      MIME: 'image/x-quicktime'),
    (Ext: '.qtif';     MIME: 'image/x-quicktime'),
    (Ext: '.ra';       MIME: 'audio/x-pn-realaudio'),
    (Ext: '.ra';       MIME: 'audio/x-pn-realaudio-plugin'),
    (Ext: '.ra';       MIME: 'audio/x-realaudio'),
    (Ext: '.ram';      MIME: 'audio/x-pn-realaudio'),
    (Ext: '.ras';      MIME: 'application/x-cmu-raster'),
    (Ext: '.ras';      MIME: 'image/cmu-raster'),
    (Ext: '.ras';      MIME: 'image/x-cmu-raster'),
    (Ext: '.rast';     MIME: 'image/cmu-raster'),
    (Ext: '.rexx';     MIME: 'text/x-script.rexx'),
    (Ext: '.rf';       MIME: 'image/vnd.rn-realflash'),
    (Ext: '.rgb';      MIME: 'image/x-rgb'),
    (Ext: '.rm';       MIME: 'application/vnd.rn-realmedia'),
    (Ext: '.rm';       MIME: 'audio/x-pn-realaudio'),
    (Ext: '.rmi';      MIME: 'audio/mid'),
    (Ext: '.rmm';      MIME: 'audio/x-pn-realaudio'),
    (Ext: '.rmp';      MIME: 'audio/x-pn-realaudio'),
    (Ext: '.rmp';      MIME: 'audio/x-pn-realaudio-plugin'),
    (Ext: '.rng';      MIME: 'application/ringing-tones'),
    (Ext: '.rng';      MIME: 'application/vnd.nokia.ringing-tone'),
    (Ext: '.rnx';      MIME: 'application/vnd.rn-realplayer'),
    (Ext: '.roff';     MIME: 'application/x-troff'),
    (Ext: '.rp';       MIME: 'image/vnd.rn-realpix'),
    (Ext: '.rpm';      MIME: 'audio/x-pn-realaudio-plugin'),
    (Ext: '.rt';       MIME: 'text/richtext'),
    (Ext: '.rt';       MIME: 'text/vnd.rn-realtext'),
    (Ext: '.rtf';      MIME: 'application/rtf'),
    (Ext: '.rtf';      MIME: 'application/x-rtf'),
    (Ext: '.rtf';      MIME: 'text/richtext'),
    (Ext: '.rtx';      MIME: 'application/rtf'),
    (Ext: '.rtx';      MIME: 'text/richtext'),
    (Ext: '.rv';       MIME: 'video/vnd.rn-realvideo'),
    (Ext: '.s';        MIME: 'text/x-asm'),
    (Ext: '.s3m';      MIME: 'audio/s3m'),
    (Ext: '.saveme';   MIME: 'application/octet-stream'),
    (Ext: '.sbk';      MIME: 'application/x-tbook'),
    (Ext: '.scm';      MIME: 'application/x-lotusscreencam'),
    (Ext: '.scm';      MIME: 'text/x-script.guile'),
    (Ext: '.scm';      MIME: 'text/x-script.scheme'),
    (Ext: '.scm';      MIME: 'video/x-scm'),
    (Ext: '.sdml';     MIME: 'text/plain'),
    (Ext: '.sdp';      MIME: 'application/sdp'),
    (Ext: '.sdp';      MIME: 'application/x-sdp'),
    (Ext: '.sdr';      MIME: 'application/sounder'),
    (Ext: '.sea';      MIME: 'application/sea'),
    (Ext: '.sea';      MIME: 'application/x-sea'),
    (Ext: '.set';      MIME: 'application/set'),
    (Ext: '.sgm';      MIME: 'text/sgml'),
    (Ext: '.sgm';      MIME: 'text/x-sgml'),
    (Ext: '.sgml';     MIME: 'text/sgml'),
    (Ext: '.sgml';     MIME: 'text/x-sgml'),
    (Ext: '.sh';       MIME: 'application/x-bsh'),
    (Ext: '.sh';       MIME: 'application/x-sh'),
    (Ext: '.sh';       MIME: 'application/x-shar'),
    (Ext: '.sh';       MIME: 'text/x-script.sh'),
    (Ext: '.shar';     MIME: 'application/x-bsh'),
    (Ext: '.shar';     MIME: 'application/x-shar'),
    (Ext: '.shtml';    MIME: 'text/html'),
    (Ext: '.shtml';    MIME: 'text/x-server-parsed-html'),
    (Ext: '.sid';      MIME: 'audio/x-psid'),
    (Ext: '.sit';      MIME: 'application/x-sit'),
    (Ext: '.sit';      MIME: 'application/x-stuffit'),
    (Ext: '.skd';      MIME: 'application/x-koan'),
    (Ext: '.skm';      MIME: 'application/x-koan'),
    (Ext: '.skp';      MIME: 'application/x-koan'),
    (Ext: '.skt';      MIME: 'application/x-koan'),
    (Ext: '.sl';       MIME: 'application/x-seelogo'),
    (Ext: '.smi';      MIME: 'application/smil'),
    (Ext: '.smil';     MIME: 'application/smil'),
    (Ext: '.snd';      MIME: 'audio/basic'),
    (Ext: '.snd';      MIME: 'audio/x-adpcm'),
    (Ext: '.sol';      MIME: 'application/solids'),
    (Ext: '.spc';      MIME: 'application/x-pkcs7-certificates'),
    (Ext: '.spc';      MIME: 'text/x-speech'),
    (Ext: '.spl';      MIME: 'application/futuresplash'),
    (Ext: '.spr';      MIME: 'application/x-sprite'),
    (Ext: '.sprite';   MIME: 'application/x-sprite'),
    (Ext: '.src';      MIME: 'application/x-wais-source'),
    (Ext: '.ssi';      MIME: 'text/x-server-parsed-html'),
    (Ext: '.ssm';      MIME: 'application/streamingmedia'),
    (Ext: '.sst';      MIME: 'application/vnd.ms-pki.certstore'),
    (Ext: '.step';     MIME: 'application/step'),
    (Ext: '.stl';      MIME: 'application/sla'),
    (Ext: '.stl';      MIME: 'application/vnd.ms-pki.stl'),
    (Ext: '.stl';      MIME: 'application/x-navistyle'),
    (Ext: '.stp';      MIME: 'application/step'),
    (Ext: '.sv4cpio';  MIME: 'application/x-sv4cpio'),
    (Ext: '.sv4crc';   MIME: 'application/x-sv4crc'),
    (Ext: '.svf';      MIME: 'image/vnd.dwg'),
    (Ext: '.svf';      MIME: 'image/x-dwg'),
    (Ext: '.svr';      MIME: 'application/x-world'),
    (Ext: '.svr';      MIME: 'x-world/x-svr'),
    (Ext: '.swf';      MIME: 'application/x-shockwave-flash'),
    (Ext: '.t';        MIME: 'application/x-troff'),
    (Ext: '.talk';     MIME: 'text/x-speech'),
    (Ext: '.tar';      MIME: 'application/x-tar'),
    (Ext: '.tbk';      MIME: 'application/toolbook'),
    (Ext: '.tbk';      MIME: 'application/x-tbook'),
    (Ext: '.tcl';      MIME: 'application/x-tcl'),
    (Ext: '.tcl';      MIME: 'text/x-script.tcl'),
    (Ext: '.tcsh';     MIME: 'text/x-script.tcsh'),
    (Ext: '.tex';      MIME: 'application/x-tex'),
    (Ext: '.texi';     MIME: 'application/x-texinfo'),
    (Ext: '.texinfo';  MIME: 'application/x-texinfo'),
    (Ext: '.text';     MIME: 'application/plain'),
    (Ext: '.text';     MIME: 'text/plain'),
    (Ext: '.tgz';      MIME: 'application/gnutar'),
    (Ext: '.tgz';      MIME: 'application/x-compressed'),
    (Ext: '.tif';      MIME: 'image/tiff'),
    (Ext: '.tif';      MIME: 'image/x-tiff'),
    (Ext: '.tiff';     MIME: 'image/tiff'),
    (Ext: '.tiff';     MIME: 'image/x-tiff'),
    (Ext: '.tr';       MIME: 'application/x-troff'),
    (Ext: '.tsi';      MIME: 'audio/tsp-audio'),
    (Ext: '.tsp';      MIME: 'application/dsptype'),
    (Ext: '.tsp';      MIME: 'audio/tsplayer'),
    (Ext: '.tsv';      MIME: 'text/tab-separated-values'),
    (Ext: '.turbot';   MIME: 'image/florian'),
    (Ext: '.txt';      MIME: 'text/plain'),
    (Ext: '.uil';      MIME: 'text/x-uil'),
    (Ext: '.uni';      MIME: 'text/uri-list'),
    (Ext: '.unis';     MIME: 'text/uri-list'),
    (Ext: '.unv';      MIME: 'application/i-deas'),
    (Ext: '.uri';      MIME: 'text/uri-list'),
    (Ext: '.uris';     MIME: 'text/uri-list'),
    (Ext: '.ustar';    MIME: 'application/x-ustar'),
    (Ext: '.ustar';    MIME: 'multipart/x-ustar'),
    (Ext: '.uu';       MIME: 'application/octet-stream'),
    (Ext: '.uu';       MIME: 'text/x-uuencode'),
    (Ext: '.uue';      MIME: 'text/x-uuencode'),
    (Ext: '.vcd';      MIME: 'application/x-cdlink'),
    (Ext: '.vcs';      MIME: 'text/x-vcalendar'),
    (Ext: '.vda';      MIME: 'application/vda'),
    (Ext: '.vdo';      MIME: 'video/vdo'),
    (Ext: '.vew';      MIME: 'application/groupwise'),
    (Ext: '.viv';      MIME: 'video/vivo'),
    (Ext: '.viv';      MIME: 'video/vnd.vivo'),
    (Ext: '.vivo';     MIME: 'video/vivo'),
    (Ext: '.vivo';     MIME: 'video/vnd.vivo'),
    (Ext: '.vmd';      MIME: 'application/vocaltec-media-desc'),
    (Ext: '.vmf';      MIME: 'application/vocaltec-media-file'),
    (Ext: '.voc';      MIME: 'audio/voc'),
    (Ext: '.voc';      MIME: 'audio/x-voc'),
    (Ext: '.vos';      MIME: 'video/vosaic'),
    (Ext: '.vox';      MIME: 'audio/voxware'),
    (Ext: '.vqe';      MIME: 'audio/x-twinvq-plugin'),
    (Ext: '.vqf';      MIME: 'audio/x-twinvq'),
    (Ext: '.vql';      MIME: 'audio/x-twinvq-plugin'),
    (Ext: '.vrml';     MIME: 'application/x-vrml'),
    (Ext: '.vrml';     MIME: 'model/vrml'),
    (Ext: '.vrml';     MIME: 'x-world/x-vrml'),
    (Ext: '.vrt';      MIME: 'x-world/x-vrt'),
    (Ext: '.vsd';      MIME: 'application/x-visio'),
    (Ext: '.vst';      MIME: 'application/x-visio'),
    (Ext: '.vsw';      MIME: 'application/x-visio'),
    (Ext: '.w60';      MIME: 'application/wordperfect6.0'),
    (Ext: '.w61';      MIME: 'application/wordperfect6.1'),
    (Ext: '.w6w';      MIME: 'application/msword'),
    (Ext: '.wav';      MIME: 'audio/wav'),
    (Ext: '.wav';      MIME: 'audio/x-wav'),
    (Ext: '.wb1';      MIME: 'application/x-qpro'),
    (Ext: '.wbmp';     MIME: 'image/vnd.wap.wbmp'),
    (Ext: '.web';      MIME: 'application/vnd.xara'),
    (Ext: '.wiz';      MIME: 'application/msword'),
    (Ext: '.wk1';      MIME: 'application/x-123'),
    (Ext: '.wmf';      MIME: 'windows/metafile'),
    (Ext: '.wml';      MIME: 'text/vnd.wap.wml'),
    (Ext: '.wmlc';     MIME: 'application/vnd.wap.wmlc'),
    (Ext: '.wmls';     MIME: 'text/vnd.wap.wmlscript'),
    (Ext: '.wmlsc';    MIME: 'application/vnd.wap.wmlscriptc'),
    (Ext: '.word';     MIME: 'application/msword'),
    (Ext: '.wp';       MIME: 'application/wordperfect'),
    (Ext: '.wp5';      MIME: 'application/wordperfect'),
    (Ext: '.wp5';      MIME: 'application/wordperfect6.0'),
    (Ext: '.wp6';      MIME: 'application/wordperfect'),
    (Ext: '.wpd';      MIME: 'application/wordperfect'),
    (Ext: '.wpd';      MIME: 'application/x-wpwin'),
    (Ext: '.wq1';      MIME: 'application/x-lotus'),
    (Ext: '.wri';      MIME: 'application/mswrite'),
    (Ext: '.wri';      MIME: 'application/x-wri'),
    (Ext: '.wrl';      MIME: 'application/x-world'),
    (Ext: '.wrl';      MIME: 'model/vrml'),
    (Ext: '.wrl';      MIME: 'x-world/x-vrml'),
    (Ext: '.wrz';      MIME: 'model/vrml'),
    (Ext: '.wrz';      MIME: 'x-world/x-vrml'),
    (Ext: '.wsc';      MIME: 'text/scriplet'),
    (Ext: '.wsrc';     MIME: 'application/x-wais-source'),
    (Ext: '.wtk';      MIME: 'application/x-wintalk'),
    (Ext: '.xbm';      MIME: 'image/x-xbitmap'),
    (Ext: '.xbm';      MIME: 'image/x-xbm'),
    (Ext: '.xbm';      MIME: 'image/xbm'),
    (Ext: '.xdr';      MIME: 'video/x-amt-demorun'),
    (Ext: '.xgz';      MIME: 'xgl/drawing'),
    (Ext: '.xif';      MIME: 'image/vnd.xiff'),
    (Ext: '.xl';       MIME: 'application/excel'),
    (Ext: '.xla';      MIME: 'application/excel'),
    (Ext: '.xla';      MIME: 'application/x-excel'),
    (Ext: '.xla';      MIME: 'application/x-msexcel'),
    (Ext: '.xlb';      MIME: 'application/excel'),
    (Ext: '.xlb';      MIME: 'application/vnd.ms-excel'),
    (Ext: '.xlb';      MIME: 'application/x-excel'),
    (Ext: '.xlc';      MIME: 'application/excel'),
    (Ext: '.xlc';      MIME: 'application/vnd.ms-excel'),
    (Ext: '.xlc';      MIME: 'application/x-excel'),
    (Ext: '.xld';      MIME: 'application/excel'),
    (Ext: '.xld';      MIME: 'application/x-excel'),
    (Ext: '.xlk';      MIME: 'application/excel'),
    (Ext: '.xlk';      MIME: 'application/x-excel'),
    (Ext: '.xll';      MIME: 'application/excel'),
    (Ext: '.xll';      MIME: 'application/vnd.ms-excel'),
    (Ext: '.xll';      MIME: 'application/x-excel'),
    (Ext: '.xlm';      MIME: 'application/excel'),
    (Ext: '.xlm';      MIME: 'application/vnd.ms-excel'),
    (Ext: '.xlm';      MIME: 'application/x-excel'),
    (Ext: '.xls';      MIME: 'application/excel'),
    (Ext: '.xls';      MIME: 'application/vnd.ms-excel'),
    (Ext: '.xls';      MIME: 'application/x-excel'),
    (Ext: '.xls';      MIME: 'application/x-msexcel'),
    (Ext: '.xlt';      MIME: 'application/excel'),
    (Ext: '.xlt';      MIME: 'application/x-excel'),
    (Ext: '.xlv';      MIME: 'application/excel'),
    (Ext: '.xlv';      MIME: 'application/x-excel'),
    (Ext: '.xlw';      MIME: 'application/excel'),
    (Ext: '.xlw';      MIME: 'application/vnd.ms-excel'),
    (Ext: '.xlw';      MIME: 'application/x-excel'),
    (Ext: '.xlw';      MIME: 'application/x-msexcel'),
    (Ext: '.xm';       MIME: 'audio/xm'),
    (Ext: '.xml';      MIME: 'application/xml'),
    (Ext: '.xml';      MIME: 'text/xml'),
    (Ext: '.xmz';      MIME: 'xgl/movie'),
    (Ext: '.xpix';     MIME: 'application/x-vnd.ls-xpix'),
    (Ext: '.xpm';      MIME: 'image/x-xpixmap'),
    (Ext: '.xpm';      MIME: 'image/xpm'),
    (Ext: '.x-png';    MIME: 'image/png'),
    (Ext: '.xsr';      MIME: 'video/x-amt-showrun'),
    (Ext: '.xwd';      MIME: 'image/x-xwd'),
    (Ext: '.xwd';      MIME: 'image/x-xwindowdump'),
    (Ext: '.xyz';      MIME: 'chemical/x-pdb'),
    (Ext: '.z';        MIME: 'application/x-compress'),
    (Ext: '.z';        MIME: 'application/x-compressed'),
    (Ext: '.zip';      MIME: 'application/x-compressed'),
    (Ext: '.zip';      MIME: 'application/x-zip-compressed'),
    (Ext: '.zip';      MIME: 'application/zip'),
    (Ext: '.zip';      MIME: 'multipart/x-zip'),
    (Ext: '.zoo';      MIME: 'application/octet-stream'),
    (Ext: '.zsh';      MIME: 'text/x-script.zsh'));
var
  i: Integer;
begin
  Result := 'text/plain';
  FileExt := AnsiLowerCase(FileExt);
  for i := Low(FileTypes) to High(FileTypes) do
    if FileTypes[i].Ext = FileExt then
    begin
      Result := FileTypes[i].MIME;
      Exit;
    end;
end;

[add2]
wie sieht deine .RC denn aus?

Code:

STRINGTABLE
BEGIN
101, ".3dm x-world/x-3dmf"
...
742, ".zsh text/x-script.zsh"
END