Re: "Resource not found!" error

[Lennox Jacob <lenpartico@yahoo.com>]

Thanks Thom,

I did this:

  'This example gets the desktop application icon for Photoshop® and displays 
it in a Canvas control.
  #if TargetMacOS then
    Dim rf as ResourceFork
    Dim f as FolderItem
    Dim p as Picture
    'f= GetFolderItem("Photoshop") I don't have Photoshop, but I have Safari
    f= 
SpecialFolder.Applications.child("Safari.app").child("Contents").child("Resources").Child("compass.icns")
    f.launch  'This launches Preview and displays the compass as a picture
    
How could I get the Compass displayed as a picture in Canvas1?

Thanks.

Lennox

--- On Wed, 12/31/08, Thom McGrath <lists@thezaz.com> wrote:

> From: Thom McGrath <lists@thezaz.com>
> Subject: Re: "Resource not found!" error
> To: "REALbasic NUG" <realbasic-nug@lists.realsoftware.com>
> Date: Wednesday, December 31, 2008, 7:35 AM
> Safari is a folder. It's actually Safari.app. It's
> icon is Safari.app/Contents/Resources/compass.icns. No more
> resource forks.
> 
> On Dec 31, 2008,


      

_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>

Search the archives:
<http://support.realsoftware.com/listarchives/lists.html>