perhaps safari does not have the resource that photoshop does, should
it?
to "fix", get photoshop.
gary
On Dec 31, 2008, at 7:58 AM, Lennox Jacob wrote:
Hello,
I got this example from the LR but when I run it I am getting this
message - "Resource not found!".
'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= GetFolderItem("Safari")
If f <> Nil then
rf=f.OpenResourceFork
If rf <> Nil then
p=rf.Geticl(128)
Canvas1.backdrop=p
Else
MsgBox "Resource not found!"
End if
Else
MsgBox "File not found!"
End if
#Else
msgbox "Sorry, but access to the resourcefork is supported only
on Macintosh"
#endif
How can I fix that?
Thanks.
Lennox
_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>
Search the archives:
<http://support.realsoftware.com/listarchives/lists.html>
_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>
Search the archives:
<http://support.realsoftware.com/listarchives/lists.html>
|