[futurebasic] Re: [FB] Re: futurebasic Digest 27 Jan 1999 10:00:28 -0000 Issue 726

Message: < previous - next > : Reply : Subscribe : Cleanse
Home   : January 1999 : Group Archive : Group : All Groups

From: Sylvain Guillemette <allmedia@...>
Date: Wed, 27 Jan 1999 07:55:03 -0500
>> I want to set the Finder Flag 'Use Custom Icon' for
>> a file or an application. (within FB)
>>
>> How can i set this flag ?
>>
>> After 2 hours of searching my zip disk's for hints,
>> i've found no related infos.
>
>I use:
>
>CLEAR LOCAL
>LOCAL FN MakeFileCustomIcon%(filename$, vRefNum%)
>  DIM pbBlk.80
>  DIM osErr%
>  '_kHasCustomIcon            = 1024
>
>  pbBlk.ioNamePtr& = @filename$
>  pbBlk.ioVRefNum% = vRefNum%
>  osErr% = FN GETFILEINFO (@pbBlk)
>  pbBlk.ioFinderInfo.fdFlags% = pbBlk.ioFinderInfo.fdFlags% OR
>_kHasCustomIcon
>  osErr% = FN SETFILEINFO (@pbBlk)
>END FN = osErr%
>
>
>also use   '_kCustomIconResource      = -16455
>when building the icons....


Thank you Michael!

Now, i guess the hardest part will be to build the icon :-)

Sylvain