||<< Index >>||
|Appendix A - File Object Specifiers||appendix|
include "Tlbx LSOpen.incl"
include "Tlbx CFBundle.incl"
include resources "ReadMe.txt" // file to be copied to <app>/Contents/Resources
local fn OpenReadMe( name as CFStringRef )
dim as CFBundleRef bundle
dim as CFURLRef url
bundle = fn CFBundleGetMainBundle()
if ( bundle )
url = fn CFBundleCopyResourceURL( bundle, name, 0, 0 )
if ( url )
fn LSOpenCFURLRef( url, NULL )
CFRelease( url )
fn OpenReadMe( @"ReadMe.txt" )