FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour Associate file
Posts: 172
Joined: Fri Oct 07, 2005 01:29 PM
Associate file
Posted: Mon Jan 07, 2008 11:19 AM

Hi,

How can I associate a file extension with my piece of software we've written from inside our software?

Posts: 1067
Joined: Wed Nov 09, 2005 02:17 AM
Re: Associate file
Posted: Mon Mar 07, 2011 08:12 PM

I also need it. Any idea how?

Sds,
Vilian F. Arraes
vilian@vfatec.com.br
Belém-Pa-Brazil
Posts: 24
Joined: Mon Jan 11, 2010 08:18 AM
Re: Associate file
Posted: Tue Mar 08, 2011 03:15 AM
Code (fw): Select all Collapse
#Define  nCLASSES_ROOT  1

LOCAL aFileExt := {'.pdf','.rtf','.doc','.xls'} 

AEval(aFileExt, {|a,n|cRet := GetRegistry( nCLASSES_ROOT , a, "" ),;
                            IF (cRet <> nil .Or. cRet == '',,(;
                               IF (a == '.pdf',(cMsg += "   '.pdf'  =  PDF File Format(Acrobat Reader)" + CRLF, nFound := n),),;
                               IF (a == '.rtf',(cMsg += "   '.rtf'  =  RichText File Format(Word Pad) " + CRLF, nFound := n),),;
                               IF (a == '.doc',(cMsg += "   '.doc'  =  MS Word File Format(MS Office or Sun's OpenOffice)"  + CRLF, nFound := n),),;
                               IF (a == '.xls',(cMsg += "   '.xls'  =  MS Excel File Format(MS Office or Sun's OpenOffice)" + CRLF, nFound := n),);
           ))})
FWH10.6|BCC5.82|PELLEC|XMATE
Posts: 3107
Joined: Fri Oct 07, 2005 06:28 PM
Re: Associate file
Posted: Tue Mar 08, 2011 09:01 AM

it can be very good,
can you make a test sample to use it ?

Best Regards, Saludos



Falconi Silvio
Posts: 1067
Joined: Wed Nov 09, 2005 02:17 AM
Re: Associate file
Posted: Fri Mar 11, 2011 12:45 PM

Ammunez,

Thanks, but This is not what I need. I want is to make the association between some types of files with my application. When the user makes a double click on the files, deploy my app.

Any ideas?

Sds,
Vilian F. Arraes
vilian@vfatec.com.br
Belém-Pa-Brazil

Continue the discussion