[futurebasic] Re: [FB] alias of self

Message: < previous - next > : Reply : Subscribe : Cleanse
Home   : March 2001 : Group Archive : Group : All Groups

From: Robert Purves <robert.purves@...>
Date: Mon, 26 Mar 2001 09:38:25 +1200
>I want to give the user the
>option of having the program launch at OS startup. I attempt to create an
>alias file of my application in the startup folder.  To do this you would
>have to create a resource file, set the alias bit and create an 'alis'
>resource ID 0 of the target file.  The only thing that I've been successful
>at doing is placing the file in the startup folder.
>
>Does anyone see whats wrong with what I'm doing.

You are not passing the FSSpec properly in SetFileAttribToAlias. The
variable fileSpec is a pointer, and so you have to preface it with # in a
Toolbox call.


register on // or off

local fn SetFileAttribToAlias( fileSpec as ptr to FSSpec )
dim fInfoRec as FInfo
dim iErr     as short
// purpose is to set the "alias" finder bit on file so
// the finder recognizes the file as an alias
iErr = fn FSpGetFInfo( #fileSpec, fInfoRec )
fInfoRec.fdFlags = fInfoRec.fdFlags or _isAlias
iErr = fn FSpSetFInfo( #fileSpec, fInfoRec )
long if iErr
stop str$( iErr )
end if
end fn = iErr


Robert P.