[futurebasic] Re: [FB] Locating Preferences folder

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

From: Herbie Gluender <H.Gluender@...>
Date: Sun, 09 Sep 2001 14:17:25 +0100
Sorry Sirs,

but I have to point out again that you really should stop using WDs!
Continued below...

Bernie Wylde wrote:
> 
> Hi Lads (and Lasses),
> Getting the vRefNum of the Preferences folder (in the System Folder) is not
> a problem in English but how do I go on for international users?
> I've tried adapting parts of the 'FindFolder example' off the cd without
> success.
> I'm sure there was something on the list recently but can't find it.
> 
> tia
> Bernie
>


Alain Pastor wrote:
********************************
Maybe try that:

LOCAL MODE
'~'8
CLEAR LOCAL FN GetPrefsWD
'~'9
DIM oldFldr  AS INT
DIM @ vRef   AS INT
DIM @ dirID  AS LONG
DIM pb.52

oldFldr  = FOLDER("",0)
vRef     = oldFldr

LONG IF FN
FindFolder(_kOnsystemdisk,_kPreferencesFolderType,0,vRef,dirID) = _noErr
pb.ioVRefNum%  = vRef
pb.ioWDDirID&  = dirID
pb.ioWDProcID& = _"ERIK"
LONG IF FN PBOpenWDSync(pb) = _noErr
vRef = FOLDER("",pb.ioVRefNum)
XELSE
EXIT FN
END IF
XELSE
EXIT FN
END IF

END FN = vRef
************************

Alain, as far as I know the

FN FindFolder(...)

returns the desired vRefNum. There is no need for WDs.
(I don't fully understand your approach, although it may work.)

Another question is, how to determine the name of the folder (international systems).
But even for this you don't need WDs.

Furthermore, I very much hope that WDs soon disappear from FB's manuals.
Again, they are outdated since OS 6.

Best regards,

Herbie
**************************
H.Glu@...