Yip its all sorted. I knew this, but you tended to get bogged down with
other ideas, and you stay on the same track...agh

Jeremy

-----Original Message-----
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]] On
Behalf Of James Sugrue
Sent: Friday, 17 January 2003 09:37
To: Multiple recipients of list delphi
Subject: Re: RE: [DUG]: SHGetFileInfo and File Type


Paul beat me to it. Just had a look at the (now Open source) Orpheus
code for getting the Registered file types and it does what Paul
suggests.

1/ Get list of .xxx from HKEY_CLASSES_ROOT
2/ From List created in 1) Search HKEY_CLASSES_ROOT for names in Root
and
Get Default and      associated Icon File

I.E
.doc returns Word.Document.8 which in turn returns "Microsoft Word
Document" and "c:\program files\Microsoft Office\Office\WinWord.exe,1"
for the Icon.




----- Original Message -----
From: Paul Eggleton <[EMAIL PROTECTED]>
To: Multiple recipients of list delphi <[EMAIL PROTECTED]>
Sent: Friday, January 17, 2003 9:27 AM
Subject: RE: RE: [DUG]: SHGetFileInfo and File Type


vss wrote on Friday, 17 January 2003 9:11 a.m.:
> except that if you look at .doc in the registry, it doesnt actually 
> tell you its a "Word Document" it says Word.Document.x x = version
>
> Jeremy

Yep. Then you open up HKEY_CLASSES_ROOT\Word.Document.x, which contains
the info you're after.

Cheers,
Paul
------------------------------------------------------------------------
---
    New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
                  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED]
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/

------------------------------------------------------------------------
---
    New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
                  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/

---------------------------------------------------------------------------
    New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
                  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/

Reply via email to