Thanks for your help. I ended up manually setting the file and creator
types. But these more automated solution are helpful and I will try them
out for future use.
At 08:09 PM 12/18/00 +0000, you wrote:
>At 5:56 PM +0000 12/18/00, Peter Reid wrote:
>>>I am unable to get MetaCard 2.3.2 to open my .mc files on the Mac.
>>>I've been creating them on my PC but now need to test them on Mac
>>>and build a Mac standalone. I've got the MSTK document type set to
>>>MetaCard in PC Exchange, but MetaCard doesn't "see" my .mc file from
>>>the Open dialog. When I double click the file, it wants to open it
>>>with SimpleText.
>>>
>>>If anyone has insights, I'd appreciate your help. Thanks,
>>>Leston.
>>
>>
>>I use a shareware utility called FileTyper to create a range of
>>Macintosh auto-typers - these are tiny applications (32k each) on to
>>which you can drag & drop files and folders to convert into specified
>>file types. It is an excellent piece of shareware, well worth the
>>$10 asking price! Using this I have a tiny app that converts any
>>drag&drop files/folder content into Mac MetaCard stacks by setting
>>the Mac creator and file type attributes to be the same as that of a
>>sample real Mac MetaCard stack.
>
>As a free alternative, the following AppleScript will do something
>similar. Save it as an application in the Script Editor application and
>set the name of the file to "MCRDMSTK". Drag a file onto the application
>icon and its creator and type get set according to the title of the
>AppleScript application. To make more "typers" just copy the application
>and rename the copies to the creator-type combinations you want. e.g.
>"ttxtTEXT" for SimpleText documents.
>
>It only does one file at a time but could be altered to do multiple files
>or folders. But I'm nervous about accidently dragging a diskfull of files
>onto it, so I'll leave that to someone else.
>
>--------------------------------------
>set theFile to choose file
>doInfo(theFile)
>
>on open fileList
> if the (count of fileList) > 1 then
> display dialog "Only one file at at time, please!" buttons {"OK"}
> default button 1
>--WARNING above line probably got wrapped in the e-mail.
>--It should be one line from "display dialog"
> else
> doInfo(fileList)
> end if
>end open
>
>on doInfo(theFile)
> set theName to (the path to me) as string
> set oldDelim to my text item delimiters
> set my text item delimiters to ":"
> set theTypeString to last text item of theName
> set theCreator to text from character 1 to 4 of theTypeString
> set theFileType to text from character 5 to 8 of theTypeString
> set my text item delimiters to oldDelim
>
> tell application "Finder"
> set the creator type of file (theFile as string) to theCreator
> set the file type of file (theFile as string) to theFileType
> end tell
>
>end doInfo
>-----------------------------------
>
>
>Cheers
>Dave Cragg
>
>Archives: http://www.mail-archive.com/[email protected]/
>Info: http://www.xworlds.com/metacard/mailinglist.htm
>Please send bug reports to <[EMAIL PROTECTED]>, not this list.
>
Leston Drake, President
LetterPress Software, Inc.
Archives: http://www.mail-archive.com/[email protected]/
Info: http://www.xworlds.com/metacard/mailinglist.htm
Please send bug reports to <[EMAIL PROTECTED]>, not this list.
