Futurebasic/Language/Reference/on finderinfo

ON FINDERINFOEdit

StatementEdit

(+) Appearance (+) Standard Console

SyntaxEdit

ON FINDERINFO {FN userFunction|GOSUB{lineNumber|"stmtLabel"}}

RevisedEdit

February, 2002 (Release 6)

DescriptionEdit

You establish this vector before entering your event loop. When a file is dropped onto your application's icon or one of your applications files is double-clicked from the Finder, the specified routine is called with information on how to open the file.

The routines are set up to handle up to 1024 files at a time. If this number is insufficient, you will need to change the DIM statement in the header file named "Subs Files.Incl". There are three global values maintained for this vector.

gFBFndrInfoCount

The number of files pending in the queue.

gFBInfoSpec(1024) as FSSpec

An array of file spec records. There is one file spec record for each file that needs to be opened or printed.

gFBInfoAction%(1024)

A boolean value that is zero if the file is to be opened and non-zero if it is to be printed.

Example:
This routine establishes a function that is called when a file is dropped onto the compiled version of the application. It also shows how to determine if a file is to be printed or opened.

/*
   Build the application,
   then drop a text file on to it

LOCAL FN MyOpenFile ( fs as ^FSSpec )
   PRINT "FileName: ";fs.name
END FN

LOCAL FN MyFinderInfo
   DIM AS FSSpec fs
   DIM AS SHORT<spacer type="horizontal" size="21">@ count, action, j
   DIM AS OSTYPE @ fType
   count = 0 // set to ask "How many?"
   action = FINDERINFO( count, fs, fType ) // FSSpec &
OSType
   LONG IF ( count > 0 ) // at least one file wants in
FOR j = 1 TO count // process them all
count = -j
// FSSpec & OSType
action = FINDERINFO( count, fs, fType )
IF ( action == _finderInfoOpen ) AND ¬
( fType == _"TEXT" ) ¬
THEN FN MyOpenFile( fs )
NEXT
FN ClearFinderInfo // in Subs Common.Incl
   END IF
END FN

ON FINDERINFO FN MyFinderInfo

MENU 1,0,1, "File"
MENU 1,1,1, "Quit/Q"
WINDOW 1
DO
   HANDLEEVENTS
UNTIL 0

See AlsoEdit

FINDERINFO; OPEN; Appendix A: Specifying Files and Directories; Appendix H: File Spec Records; Appendix I: Printing; USR SCANFOLDER; RESOURCES