> 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....


----------------------------------------------------------
Michael Evans
Manager of Software Development * Photo Systems, Inc.
3301 Wood Valley Road, NW * Atlanta, GA, 30327-1515
Voice: (800) 521-4042 x428 * (404) 846-9386
Fax: (404) 240-0878 * Cell: (734) 604-0488
E-mail: evans@... * michael_evans@...
----------------------------------------------------------