14 lines
343 B
Plaintext
14 lines
343 B
Plaintext
void local fn SaveFile
|
|
CFStringRef fileString = @"The quick brown fox jumped over the lazy dog's back."
|
|
CFURLRef url = savepanel 1, @"Choose location to save file.", @"txt", @"Untitled", @"Save"
|
|
if (url)
|
|
fn StringWriteToURL( fileString, url, YES, NSUTF8StringEncoding, NULL )
|
|
else
|
|
// User canceled
|
|
end if
|
|
end fn
|
|
|
|
fn SaveFile
|
|
|
|
HandleEvents
|