Statement

Syntax

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

Revised

February, 2002 (Release 6)

Description

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.

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 Also

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