On 16 apr 2006, at 20.32, Jeff Justice wrote:
Doesn't work that way either. Besides, don't most Mac apps have
the ".app" extension, which should be a viable way to filter?
Jeff J.
On Apr 16, 2006, at 1:28 PM, Sven E Olsson wrote:
On 16 apr 2006, at 20.07, Jeff Justice wrote:
This is driving me batty...
Here's the code:
Dim AppTypes as New FileType
AppTypes.Name="Application Types"
AppTypes.Extensions=".app"
Dim f as FolderItem = GetOpenFolderItem(AppTypes)
if f <> Nil then
MsgBox f.AbsolutePath
end if
All I want to be selectable in the dialog box is applications,
but with above code, everything is selectable.
What am I missing?
Jeff J.
I think you missing: AppTypes.MacType = "APP"
Sven E Olsson
This code works on OS X 104.5 and RB2006r2
Note I added MacCreator
Dim AppTypes as New FileType
AppTypes.Name="Application Types"
AppTypes.Extensions=".app"
AppTypes.MacType="APP"
AppTypes.MacCreator = "????"
Dim f as FolderItem = GetOpenFolderItem(AppTypes)
if f <> Nil then
MsgBox f.AbsolutePath
end if
Yes Mac apps have extension .app
Sven E Olsson
_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>
Search the archives of this list here:
<http://support.realsoftware.com/listarchives/lists.html>
