AppleScript: Visa file- och creatortype på fil

Här är lite kod som visar vilken file- och creatortyp en fil har. Spara som droplet och droppa filer på den.

-- © Wire 2005
-- Visar creator- och filetype på droppat objekt (fil).
--
on open objektet
	-- "Läser" filen (i Finder) och kollar file och creator type
	tell application "Finder"
		try
			set ft to file type of file (objektet as text)
			set ct to creator type of file (objektet as text)
			display dialog "file type=" & ft & return & "creator type=" & ct buttons {"OK"} default button "OK" with icon 1
		on error msg number num
			display dialog "on error msg:" & return & msg & return & return & "on error number:" & return & num buttons {"OK"} default button "OK" with icon 2
		end try
	end tell
	--Avsluta
	return quit {}
end open
on quit {}
	continue quit
end quit

'on quit' är en subrutin som inte exekveras utan anrop.

Mina scriptmallar innehåller alltid en 'on quit'-rutin, om man vill utföra kod när scriptet avslutas. I mitt exempel ovan gör den ingen nytta.